- Timestamp:
- 2013-11-04T12:51:55+01:00 (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2013/dev_LOCEAN_2013/NEMOGCM/NEMO/OPA_SRC/ZDF/zdf_oce.F90
r2715 r4147 22 22 #endif 23 23 24 ! 25 REAL(wp), PUBLIC :: rn_avm0 = 1.e-4_wp!: vertical eddy viscosity (m2/s)26 REAL(wp), PUBLIC :: rn_avt0 = 1.e-5_wp!: vertical eddy diffusivity (m2/s)27 INTEGER , PUBLIC :: nn_avb = 0!: constant or profile background on avt (=0/1)28 INTEGER , PUBLIC :: nn_havtb = 1!: horizontal shape or not for avtb (=0/1)29 LOGICAL , PUBLIC :: ln_zdfexp = .FALSE.!: explicit vertical diffusion scheme flag30 INTEGER , PUBLIC :: nn_zdfexp = 3!: number of sub-time step (explicit time stepping)31 LOGICAL , PUBLIC :: ln_zdfevd = .TRUE.!: convection: enhanced vertical diffusion flag32 INTEGER , PUBLIC :: nn_evdm = 1!: =0/1 flag to apply enhanced avm or not33 REAL(wp), PUBLIC :: rn_avevd = 1._wp!: vertical eddy coeff. for enhanced vert. diff. (m2/s)34 LOGICAL , PUBLIC :: ln_zdfnpc = .FALSE.!: convection: non-penetrative convection flag35 INTEGER , PUBLIC :: nn_npc = 1!: non penetrative convective scheme call frequency36 INTEGER , PUBLIC :: nn_npcp = 15!: non penetrative convective scheme print frequency24 ! !!* namelist namzdf: vertical diffusion * 25 REAL(wp), PUBLIC :: rn_avm0 !: vertical eddy viscosity (m2/s) 26 REAL(wp), PUBLIC :: rn_avt0 !: vertical eddy diffusivity (m2/s) 27 INTEGER , PUBLIC :: nn_avb !: constant or profile background on avt (=0/1) 28 INTEGER , PUBLIC :: nn_havtb !: horizontal shape or not for avtb (=0/1) 29 LOGICAL , PUBLIC :: ln_zdfexp !: explicit vertical diffusion scheme flag 30 INTEGER , PUBLIC :: nn_zdfexp !: number of sub-time step (explicit time stepping) 31 LOGICAL , PUBLIC :: ln_zdfevd !: convection: enhanced vertical diffusion flag 32 INTEGER , PUBLIC :: nn_evdm !: =0/1 flag to apply enhanced avm or not 33 REAL(wp), PUBLIC :: rn_avevd !: vertical eddy coeff. for enhanced vert. diff. (m2/s) 34 LOGICAL , PUBLIC :: ln_zdfnpc !: convection: non-penetrative convection flag 35 INTEGER , PUBLIC :: nn_npc !: non penetrative convective scheme call frequency 36 INTEGER , PUBLIC :: nn_npcp !: non penetrative convective scheme print frequency 37 37 38 38
Note: See TracChangeset
for help on using the changeset viewer.