Ignore:
Timestamp:
2015-09-16T11:40:14+02:00 (5 years ago)
Author:
rfurner
Message:

changes to add restart directory names

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/UKMO/2014_Surge_Modelling/NEMOGCM/NEMO/OPA_SRC/DOM/domain.F90

    r5747 r5750  
    136136      !!---------------------------------------------------------------------- 
    137137      USE ioipsl 
    138 ! Added ln_rstdate, eventually should include separate branch for this 
    139       NAMELIST/namrun/ nn_no   , cn_exp    , cn_ocerst_in, cn_ocerst_out, ln_rstart , ln_rstdate, nn_rstctl,   & 
     138! Added ln_rstdate and rstdir, eventually should include separate branch for this 
     139      NAMELIST/namrun/ nn_no   , cn_exp    , cn_ocerst_in, cn_ocerst_out, ln_rstart , nn_rstctl,   & 
     140         &             ln_rstdate, cn_ocerst_indir, cn_ocerst_outdir,                              & 
    140141         &             nn_it000, nn_itend  , nn_date0    , nn_leapy     , nn_istate , nn_stock ,   & 
    141142         &             nn_write, ln_dimgnnn, ln_mskland  , ln_clobber   , nn_chunksz, nn_euler 
     
    174175         WRITE(numout,*) '      restart logical                 ln_rstart  = ', ln_rstart 
    175176         WRITE(numout,*) '      datestamping of restarts        ln_rstdate = ', ln_rstdate 
     177         WRITE(numout,*) '      restart input directory         cn_ocerst_indir= ', cn_ocerst_indir 
     178         WRITE(numout,*) '      restart output directory        cn_ocerst_outdir= ', cn_ocerst_outdir 
    176179         WRITE(numout,*) '      start with forward time step    nn_euler   = ', nn_euler 
    177180         WRITE(numout,*) '      control of time step            nn_rstctl  = ', nn_rstctl 
Note: See TracChangeset for help on using the changeset viewer.