Changeset 7646 for trunk/NEMOGCM/NEMO/OPA_SRC/ZDF/zdfini.F90
- Timestamp:
- 2017-02-06T10:25:03+01:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMOGCM/NEMO/OPA_SRC/ZDF/zdfini.F90
r5836 r7646 51 51 INTEGER :: ioptio, ios ! local integers 52 52 !! 53 NAMELIST/namzdf/ rn_avm0, rn_avt0, nn_avb, nn_havtb, ln_zdfexp, nn_zdfexp, & 54 & ln_zdfevd, nn_evdm, rn_avevd, ln_zdfnpc, nn_npc, nn_npcp 53 NAMELIST/namzdf/ rn_avm0, rn_avt0, nn_avb, nn_havtb, ln_zdfexp, nn_zdfexp, & 54 & ln_zdfevd, nn_evdm, rn_avevd, ln_zdfnpc, nn_npc, nn_npcp, & 55 & ln_zdfqiao 55 56 !!---------------------------------------------------------------------- 56 57 … … 66 67 IF(lwp) THEN !* Parameter print 67 68 WRITE(numout,*) 68 WRITE(numout,*) 'zdf_init : vertical physics'69 WRITE(numout,*) 'zdf_init : vertical physics' 69 70 WRITE(numout,*) '~~~~~~~~' 70 71 WRITE(numout,*) ' Namelist namzdf : set vertical mixing mixing parameters' … … 81 82 WRITE(numout,*) ' npc call frequency nn_npc = ', nn_npc 82 83 WRITE(numout,*) ' npc print frequency nn_npcp = ', nn_npcp 84 WRITE(numout,*) ' Qiao formulation flag ln_zdfqiao=', ln_zdfqiao 83 85 ENDIF 84 86
Note: See TracChangeset
for help on using the changeset viewer.