- Timestamp:
- 2015-12-16T16:44:35+01:00 (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2015/dev_merge_2015/NEMOGCM/NEMO/OPA_SRC/DOM/domain.F90
r6060 r6069 140 140 ! 141 141 CALL dom_stp ! time step 142 IF( nmsh /= 0 ) CALL dom_wri ! Create a domain file 142 IF( nmsh /= 0 .AND. .NOT. ln_iscpl ) CALL dom_wri ! Create a domain file 143 IF( nmsh /= 0 .AND. ln_iscpl .AND. .NOT. ln_rstart ) CALL dom_wri ! Create a domain file 143 144 IF( .NOT.ln_rstart ) CALL dom_ctl ! Domain control 144 145 ! … … 159 160 !!---------------------------------------------------------------------- 160 161 USE ioipsl 161 NAMELIST/namrun/ cn_ocerst_indir, cn_ocerst_outdir, nn_stocklist, ln_rst_list, & 162 & nn_no , cn_exp , cn_ocerst_in, cn_ocerst_out, ln_rstart , nn_rstctl, & 163 & nn_it000, nn_itend , nn_date0 , nn_leapy , nn_istate , nn_stock , & 164 & nn_write, ln_dimgnnn, ln_mskland , ln_cfmeta , ln_clobber, nn_chunksz, nn_euler 165 NAMELIST/namdom/ nn_bathy, rn_bathy , rn_e3zps_min, rn_e3zps_rat, nn_msh, rn_hmin, & 166 & nn_acc , rn_atfp , rn_rdt , rn_rdtmin , & 167 & rn_rdtmax, rn_rdth , nn_closea , ln_crs, & 168 & jphgr_msh, & 169 & ppglam0, ppgphi0, ppe1_deg, ppe2_deg, ppe1_m, ppe2_m, & 170 & ppsur, ppa0, ppa1, ppkth, ppacr, ppdzmin, pphmax, ldbletanh, & 162 NAMELIST/namrun/ cn_ocerst_indir, cn_ocerst_outdir, nn_stocklist, ln_rst_list, & 163 nn_no , cn_exp , cn_ocerst_in, cn_ocerst_out, ln_rstart , nn_rstctl , & 164 & nn_it000, nn_itend , nn_date0 , nn_time0 , nn_leapy , nn_istate , & 165 & nn_stock, nn_write , ln_dimgnnn , ln_mskland , ln_clobber, nn_chunksz, & 166 & nn_euler, ln_cfmeta, ln_iscpl 167 NAMELIST/namdom/ nn_bathy, rn_bathy , rn_e3zps_min, rn_e3zps_rat, nn_msh, rn_hmin, rn_isfhmin, & 168 & nn_acc , rn_atfp , rn_rdt , rn_rdtmin , & 169 & rn_rdtmax, rn_rdth , nn_closea , ln_crs , & 170 & jphgr_msh, & 171 & ppglam0, ppgphi0, ppe1_deg, ppe2_deg, ppe1_m, ppe2_m, & 172 & ppsur, ppa0, ppa1, ppkth, ppacr, ppdzmin, pphmax, ldbletanh, & 171 173 & ppa2, ppkth2, ppacr2 172 174 #if defined key_netcdf4 … … 202 204 WRITE(numout,*) ' number of the last time step nn_itend = ', nn_itend 203 205 WRITE(numout,*) ' initial calendar date aammjj nn_date0 = ', nn_date0 206 WRITE(numout,*) ' initial time of day in hhmm nn_time0 = ', nn_time0 204 207 WRITE(numout,*) ' leap year calendar (0/1) nn_leapy = ', nn_leapy 205 208 WRITE(numout,*) ' initial state output nn_istate = ', nn_istate … … 215 218 WRITE(numout,*) ' overwrite an existing file ln_clobber = ', ln_clobber 216 219 WRITE(numout,*) ' NetCDF chunksize (bytes) nn_chunksz = ', nn_chunksz 220 WRITE(numout,*) ' IS coupling at the restart step ln_iscpl = ', ln_iscpl 217 221 ENDIF 218 222 … … 282 286 WRITE(numout,*) ' min depth of the ocean (>0) or rn_hmin = ', rn_hmin 283 287 WRITE(numout,*) ' min number of ocean level (<0) ' 288 WRITE(numout,*) ' treshold to open the isf cavity rn_isfhmin = ', rn_isfhmin, ' (m)' 284 289 WRITE(numout,*) ' minimum thickness of partial rn_e3zps_min = ', rn_e3zps_min, ' (m)' 285 290 WRITE(numout,*) ' step level rn_e3zps_rat = ', rn_e3zps_rat
Note: See TracChangeset
for help on using the changeset viewer.