Changeset 7017 for branches/NERC/dev_r5518_NOC_MEDUSA_Stable/NEMOGCM/NEMO/TOP_SRC/MEDUSA/trcini_medusa.F90

Timestamp:

2016-10-11T16:20:23+02:00 (8 years ago)

Author:

jpalmier

Message:

Jpalm -- 11-10-2016 -- Improve MEDUSA reproducibility - change carb-chem calling/restart

File:

• branches/NERC/dev_r5518_NOC_MEDUSA_Stable/NEMOGCM/NEMO/TOP_SRC/MEDUSA/trcini_medusa.F90 (modified) (1 diff)

branches/NERC/dev_r5518_NOC_MEDUSA_Stable/NEMOGCM/NEMO/TOP_SRC/MEDUSA/trcini_medusa.F90

@@ -80 +80 @@
       IF(lwp) WRITE(numout,*) ' trc_ini_medusa: initialisation of MEDUSA model'
       IF(lwp) WRITE(numout,*) ' ~~~~~~~~~~~~~~'
-      IF(lwp) WRITE(numout,*) ' second Test with Julien'
 # if defined key_debug_medusa
             CALL flush(numout)