Changeset 6225 for branches/2014/dev_r4704_NOC5_MPP_BDY_UPDATE/NEMOGCM/NEMO/OPA_SRC/IOM/in_out_manager.F90
- Timestamp:
- 2016-01-08T10:35:19+01:00 (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2014/dev_r4704_NOC5_MPP_BDY_UPDATE/NEMOGCM/NEMO/OPA_SRC/IOM/in_out_manager.F90
r4624 r6225 13 13 !!---------------------------------------------------------------------- 14 14 USE par_oce ! ocean parameter 15 USE lib_print ! formated print library16 15 USE nc4interface ! NetCDF4 interface 17 16 … … 26 25 CHARACTER(lc) :: cn_exp !: experiment name used for output filename 27 26 CHARACTER(lc) :: cn_ocerst_in !: suffix of ocean restart name (input) 27 CHARACTER(lc) :: cn_ocerst_indir !: restart input directory 28 28 CHARACTER(lc) :: cn_ocerst_out !: suffix of ocean restart name (output) 29 CHARACTER(lc) :: cn_ocerst_outdir !: restart output directory 29 30 LOGICAL :: ln_rstart !: start from (F) rest or (T) a restart file 31 LOGICAL :: ln_rst_list !: output restarts at list of times (T) or by frequency (F) 30 32 INTEGER :: nn_no !: job number 31 33 INTEGER :: nn_rstctl !: control of the time step (0, 1 or 2) … … 34 36 INTEGER :: nn_itend !: index of the last time step 35 37 INTEGER :: nn_date0 !: initial calendar date aammjj 38 INTEGER :: nn_time0 !: initial time of day in hhmm 36 39 INTEGER :: nn_leapy !: Leap year calendar flag (0/1 or 30) 37 40 INTEGER :: nn_istate !: initial state output flag (0/1) 38 41 INTEGER :: nn_write !: model standard output frequency 39 42 INTEGER :: nn_stock !: restart file frequency 40 LOGICAL :: ln_dimgnnn !: type of dimgout. (F): 1 file for all proc 41 !: (T): 1 file per proc 43 INTEGER, DIMENSION(10) :: nn_stocklist !: restart dump times 42 44 LOGICAL :: ln_mskland !: mask land points in NetCDF outputs (costly: + ~15%) 45 LOGICAL :: ln_cfmeta !: output additional data to netCDF files required for compliance with the CF metadata standard 43 46 LOGICAL :: ln_clobber !: clobber (overwrite) an existing file 44 47 INTEGER :: nn_chunksz !: chunksize (bytes) for NetCDF file (works only with iom_nf90 routines) … … 78 81 INTEGER :: nwrite !: model standard output frequency 79 82 INTEGER :: nstock !: restart file frequency 83 INTEGER, DIMENSION(10) :: nstocklist !: restart dump times 80 84 81 85 !!---------------------------------------------------------------------- … … 84 88 INTEGER :: nitrst !: time step at which restart file should be written 85 89 LOGICAL :: lrst_oce !: logical to control the oce restart write 86 INTEGER :: numror, numrow !: logical unit for cean restart (read and write) 90 INTEGER :: numror = 0 !: logical unit for ocean restart (read). Init to 0 is needed for SAS (in daymod.F90) 91 INTEGER :: numrow !: logical unit for ocean restart (write) 92 INTEGER :: nrst_lst !: number of restart to output next 87 93 88 94 !!---------------------------------------------------------------------- … … 91 97 LOGICAL :: ln_ctl !: run control for debugging 92 98 INTEGER :: nn_timing !: run control for timing 99 INTEGER :: nn_diacfl !: flag whether to create CFL diagnostics 93 100 INTEGER :: nn_print !: level of print (0 no print) 94 101 INTEGER :: nn_ictls !: Start i indice for the SUM control … … 111 118 INTEGER :: numstp = -1 !: logical unit for time step 112 119 INTEGER :: numtime = -1 !: logical unit for timing 113 INTEGER :: numout = 6 !: logical unit for output print 120 INTEGER :: numout = 6 !: logical unit for output print; Set to stdout to ensure any early 121 ! output can be collected; do not change 114 122 INTEGER :: numnam_ref = -1 !: logical unit for reference namelist 115 123 INTEGER :: numnam_cfg = -1 !: logical unit for configuration specific namelist 116 INTEGER :: numond = 7!: logical unit for Output Namelist Dynamics124 INTEGER :: numond = -1 !: logical unit for Output Namelist Dynamics 117 125 INTEGER :: numnam_ice_ref = -1 !: logical unit for ice reference namelist 118 126 INTEGER :: numnam_ice_cfg = -1 !: logical unit for ice reference namelist 119 INTEGER :: numoni = 8!: logical unit for Output Namelist Ice127 INTEGER :: numoni = -1 !: logical unit for Output Namelist Ice 120 128 INTEGER :: numevo_ice = -1 !: logical unit for ice variables (temp. evolution) 121 129 INTEGER :: numsol = -1 !: logical unit for solver statistics … … 141 149 LOGICAL :: lwp = .FALSE. !: boolean : true on the 1st processor only .OR. ln_ctl 142 150 LOGICAL :: lsp_area = .TRUE. !: to make a control print over a specific area 151 CHARACTER(lc) :: cxios_context !: context name used in xios 143 152 144 153 !!----------------------------------------------------------------------
Note: See TracChangeset
for help on using the changeset viewer.