- Timestamp:
- 2013-05-03T14:35:21+02:00 (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2013/dev_r3853_CNRS9_ConfSetting/NEMOGCM/NEMO/OPA_SRC/IOM/in_out_manager.F90
r3875 r3901 22 22 !! namrun namelist parameters 23 23 !!---------------------------------------------------------------------- 24 CHARACTER(lc) :: cn_exp = "exp0"!: experiment name used for output filename25 CHARACTER(lc) :: cn_ocerst_in = "restart"!: suffix of ocean restart name (input)26 CHARACTER(lc) :: cn_ocerst_out = "restart"!: suffix of ocean restart name (output)27 LOGICAL :: ln_rstart = .FALSE.!: start from (F) rest or (T) a restart file28 INTEGER :: nn_no = 0!: job number29 INTEGER :: nn_rstctl = 0!: control of the time step (0, 1 or 2)24 CHARACTER(lc) :: cn_exp !: experiment name used for output filename 25 CHARACTER(lc) :: cn_ocerst_in !: suffix of ocean restart name (input) 26 CHARACTER(lc) :: cn_ocerst_out !: suffix of ocean restart name (output) 27 LOGICAL :: ln_rstart !: start from (F) rest or (T) a restart file 28 INTEGER :: nn_no !: job number 29 INTEGER :: nn_rstctl !: control of the time step (0, 1 or 2) 30 30 INTEGER :: nn_rstssh = 0 !: hand made initilization of ssh or not (1/0) 31 INTEGER :: nn_it000 = 1!: index of the first time step32 INTEGER :: nn_itend = 10!: index of the last time step33 INTEGER :: nn_date0 = 961115!: initial calendar date aammjj34 INTEGER :: nn_leapy = 0!: Leap year calendar flag (0/1 or 30)35 INTEGER :: nn_istate = 0!: initial state output flag (0/1)36 INTEGER :: nn_write = 10!: model standard output frequency37 INTEGER :: nn_stock = 10!: restart file frequency38 LOGICAL :: ln_dimgnnn = .FALSE.!: type of dimgout. (F): 1 file for all proc31 INTEGER :: nn_it000 !: index of the first time step 32 INTEGER :: nn_itend !: index of the last time step 33 INTEGER :: nn_date0 !: initial calendar date aammjj 34 INTEGER :: nn_leapy !: Leap year calendar flag (0/1 or 30) 35 INTEGER :: nn_istate !: initial state output flag (0/1) 36 INTEGER :: nn_write !: model standard output frequency 37 INTEGER :: nn_stock !: restart file frequency 38 LOGICAL :: ln_dimgnnn !: type of dimgout. (F): 1 file for all proc 39 39 !: (T): 1 file per proc 40 LOGICAL :: ln_mskland = .FALSE.!: mask land points in NetCDF outputs (costly: + ~15%)41 LOGICAL :: ln_clobber = .FALSE.!: clobber (overwrite) an existing file42 INTEGER :: nn_chunksz = 0!: chunksize (bytes) for NetCDF file (works only with iom_nf90 routines)40 LOGICAL :: ln_mskland !: mask land points in NetCDF outputs (costly: + ~15%) 41 LOGICAL :: ln_clobber !: clobber (overwrite) an existing file 42 INTEGER :: nn_chunksz !: chunksize (bytes) for NetCDF file (works only with iom_nf90 routines) 43 43 #if defined key_netcdf4 44 44 !!---------------------------------------------------------------------- … … 49 49 ! for runtime optimisation. The individual netcdf4 chunks can be optionally 50 50 ! gzipped (recommended) leading to significant reductions in I/O volumes 51 ! 52 INTEGER :: nn_nchunks_i = 1!: number of chunks required in the i-dimension53 INTEGER :: nn_nchunks_j = 1!: number of chunks required in the j-dimension54 INTEGER :: nn_nchunks_k = 1!: number of chunks required in the k-dimension55 INTEGER :: nn_nchunks_t = 1!: number of chunks required in the t-dimension56 LOGICAL :: ln_nc4zip = .TRUE.!: netcdf4 usage: (T) chunk and compress output using the HDF5 sublayers of netcdf457 ! 58 ! 51 ! !!!** variables only used with iom_nf90 routines and key_netcdf4 ** 52 INTEGER :: nn_nchunks_i !: number of chunks required in the i-dimension 53 INTEGER :: nn_nchunks_j !: number of chunks required in the j-dimension 54 INTEGER :: nn_nchunks_k !: number of chunks required in the k-dimension 55 INTEGER :: nn_nchunks_t !: number of chunks required in the t-dimension 56 LOGICAL :: ln_nc4zip !: netcdf4 usage: (T) chunk and compress output using the HDF5 sublayers of netcdf4 57 ! ! (F) ignore chunking request and use the netcdf4 library 58 ! ! to produce netcdf3-compatible files 59 59 #endif 60 60 !$AGRIF_DO_NOT_TREAT … … 87 87 !! output monitoring 88 88 !!---------------------------------------------------------------------- 89 LOGICAL :: ln_ctl = .FALSE.!: run control for debugging90 INTEGER :: nn_timing = 0!: run control for timing91 INTEGER :: nn_print = 0!: level of print (0 no print)92 INTEGER :: nn_ictls = 0!: Start i indice for the SUM control93 INTEGER :: nn_ictle = 0!: End i indice for the SUM control94 INTEGER :: nn_jctls = 0!: Start j indice for the SUM control95 INTEGER :: nn_jctle = 0!: End j indice for the SUM control96 INTEGER :: nn_isplt = 1!: number of processors following i97 INTEGER :: nn_jsplt = 1!: number of processors following j98 INTEGER :: nn_bench = 0!: benchmark parameter (0/1)89 LOGICAL :: ln_ctl !: run control for debugging 90 INTEGER :: nn_timing !: run control for timing 91 INTEGER :: nn_print !: level of print (0 no print) 92 INTEGER :: nn_ictls !: Start i indice for the SUM control 93 INTEGER :: nn_ictle !: End i indice for the SUM control 94 INTEGER :: nn_jctls !: Start j indice for the SUM control 95 INTEGER :: nn_jctle !: End j indice for the SUM control 96 INTEGER :: nn_isplt !: number of processors following i 97 INTEGER :: nn_jsplt !: number of processors following j 98 INTEGER :: nn_bench !: benchmark parameter (0/1) 99 99 INTEGER :: nn_bit_cmp = 0 !: bit reproducibility (0/1) 100 100
Note: See TracChangeset
for help on using the changeset viewer.