Changeset 8882 for branches/2017/dev_CNRS_2017/NEMOGCM/CONFIG/TEST_CASES/SAS_BIPER/MY_SRC/usrdef_zgr.F90
- Timestamp:
- 2017-12-01T18:44:09+01:00 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2017/dev_CNRS_2017/NEMOGCM/CONFIG/TEST_CASES/SAS_BIPER/MY_SRC/usrdef_zgr.F90
r7355 r8882 62 62 ! 63 63 IF(lwp) WRITE(numout,*) 64 IF(lwp) WRITE(numout,*) 'usr_def_zgr : LOCK_EXCHANGE configuration (z-coordinate closed box ocean without cavities)'64 IF(lwp) WRITE(numout,*) 'usr_def_zgr : SAS_BIPER configuration (slab ocean - advection of an ice patch in a biperiodic square box domain)' 65 65 IF(lwp) WRITE(numout,*) '~~~~~~~~~~~' 66 66 ! … … 68 68 ! type of vertical coordinate 69 69 ! --------------------------- 70 ! set in usrdef_nam.F90 by reading the namusr_def namelist only ln_zco 71 ln_zco = .TRUE. ! z-partial-step coordinate 72 ln_zps = .FALSE. ! z-partial-step coordinate 73 ln_sco = .FALSE. ! s-coordinate 70 ld_zco = .TRUE. ! z-full-step coordinate 71 ld_zps = .FALSE. ! z-partial-step coordinate 72 ld_sco = .FALSE. ! s-coordinate 74 73 ld_isfcav = .FALSE. ! ISF Ice Shelves Flag 75 74 !
Note: See TracChangeset
for help on using the changeset viewer.