Changeset 5494 for branches/UKMO/dev_r5107_restart_date/NEMOGCM/NEMO/OPA_SRC/DOM/domain.F90

Timestamp:

2015-06-26T12:30:56+02:00 (9 years ago)

Author:

dancopsey

Message:

Upgraded NEMO3,5 branch dev/hadco/vn3.5_beta_restart_date to this revision.

File:

• branches/UKMO/dev_r5107_restart_date/NEMOGCM/NEMO/OPA_SRC/DOM/domain.F90 (modified) (2 diffs)

branches/UKMO/dev_r5107_restart_date/NEMOGCM/NEMO/OPA_SRC/DOM/domain.F90

@@ -137 +137 @@
       NAMELIST/namrun/ nn_no   , cn_exp    , cn_ocerst_in, cn_ocerst_out, ln_rstart , nn_rstctl,   &
          &             nn_it000, nn_itend  , nn_date0    , nn_leapy     , nn_istate , nn_stock ,   &
-         &             nn_write, ln_dimgnnn, ln_mskland  , ln_clobber   , nn_chunksz, nn_euler
+         &             nn_write, ln_dimgnnn, ln_mskland  , ln_clobber   , nn_chunksz, nn_euler ,   &
+         &             ln_rstdate
       NAMELIST/namdom/ nn_bathy, rn_bathy , rn_e3zps_min, rn_e3zps_rat, nn_msh, rn_hmin,   &
          &             nn_acc   , rn_atfp     , rn_rdt      , rn_rdtmin ,                  &
@@ -179 +180 @@
          WRITE(numout,*) '      initial state output            nn_istate  = ', nn_istate
          WRITE(numout,*) '      frequency of restart file       nn_stock   = ', nn_stock
+         WRITE(numout,*) '      use date in restart name        ln_rstdate = ', ln_rstdate 
          WRITE(numout,*) '      frequency of output file        nn_write   = ', nn_write
          WRITE(numout,*) '      multi file dimgout              ln_dimgnnn = ', ln_dimgnnn