Skip to content
Snippets Groups Projects
Commit 93822b63 authored by Simon Mueller's avatar Simon Mueller Committed by Andrew Coward
Browse files

Resolve "Misleading print statement for TOP initialization"

parent bad665bd
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
Showing
with 3 additions and 7 deletions
src/TOP/trcnam.F90
+ 3
− 7
View file @ 93822b63
...@@ -62,16 +62,12 @@ CONTAINS ...@@ -62,16 +62,12 @@ CONTAINS
! !
! !
IF(lwp) THEN ! control print IF(lwp) THEN ! control print
WRITE(numout,*)
IF( ln_rsttr ) THEN IF( ln_rsttr ) THEN
WRITE(numout,*)
WRITE(numout,*) ' ==>>> Read a restart file for passive tracer : ', TRIM( cn_trcrst_in ) WRITE(numout,*) ' ==>>> Read a restart file for passive tracer : ', TRIM( cn_trcrst_in )
ENDIF ELSE IF( ln_trcdta ) THEN
IF( ln_trcdta .AND. .NOT.ln_rsttr ) THEN
WRITE(numout,*)
WRITE(numout,*) ' ==>>> Some of the passive tracers are initialised from climatologies ' WRITE(numout,*) ' ==>>> Some of the passive tracers are initialised from climatologies '
ENDIF ELSE
IF( .NOT.ln_trcdta ) THEN
WRITE(numout,*)
WRITE(numout,*) ' ==>>> All the passive tracers are initialised with constant values ' WRITE(numout,*) ' ==>>> All the passive tracers are initialised with constant values '
ENDIF ENDIF
ENDIF ENDIF
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment