- Timestamp:
- 2016-10-29T01:21:05+02:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2016/dev_v3_6_STABLE_r6506_AGRIF_LIM3/NEMOGCM/NEMO/OFF_SRC/domrea.F90
r5504 r7158 124 124 & nn_write, ln_dimgnnn, ln_mskland , ln_cfmeta , ln_clobber, nn_chunksz, nn_euler 125 125 NAMELIST/namdom/ nn_bathy , rn_bathy, rn_e3zps_min, rn_e3zps_rat, nn_msh , rn_hmin, & 126 & nn_acc , rn_atfp , rn_rdt , rn_rdtmin , & 127 & rn_rdtmax, rn_rdth , nn_baro , nn_closea , ln_crs, & 126 & rn_atfp , rn_rdt , nn_baro , nn_closea , ln_crs, & 128 127 & jphgr_msh, & 129 128 & ppglam0, ppgphi0, ppe1_deg, ppe2_deg, ppe1_m, ppe2_m, & … … 194 193 ! parameters correspondting to nit000 - 1 (as we start the step loop with a call to day) 195 194 ndastp = ndate0 - 1 ! ndate0 read in the namelist in dom_nam, we assume that we start run at 00:00 196 adatrj = ( REAL( nit000-1, wp ) * rdt tra(1)) / rday195 adatrj = ( REAL( nit000-1, wp ) * rdt ) / rday 197 196 198 197 #if defined key_agrif … … 239 238 WRITE(numout,*) ' asselin time filter parameter rn_atfp = ', rn_atfp 240 239 WRITE(numout,*) ' time-splitting: nb of sub time-step nn_baro = ', nn_baro 241 WRITE(numout,*) ' acceleration of converge nn_acc = ', nn_acc242 WRITE(numout,*) ' nn_acc=1: surface tracer rdt rn_rdtmin = ', rn_rdtmin243 WRITE(numout,*) ' bottom tracer rdt rdtmax = ', rn_rdtmax244 WRITE(numout,*) ' depth of transition rn_rdth = ', rn_rdth245 240 WRITE(numout,*) ' suppression of closed seas (=0) nn_closea = ', nn_closea 246 241 WRITE(numout,*) ' type of horizontal mesh jphgr_msh = ', jphgr_msh … … 268 263 e3zps_rat = rn_e3zps_rat 269 264 nmsh = nn_msh 270 nacc = nn_acc271 265 atfp = rn_atfp 272 266 rdt = rn_rdt 273 rdtmin = rn_rdtmin274 rdtmax = rn_rdtmin275 rdth = rn_rdth276 267 277 268 REWIND( numnam_ref ) ! Namelist namcla in reference namelist : Cross land advection
Note: See TracChangeset
for help on using the changeset viewer.