Changeset 10516 for NEMO/trunk/tests/ICE_AGRIF/MY_SRC/usrdef_zgr.F90
- Timestamp:
- 2019-01-15T17:31:25+01:00 (5 years ago)
- Location:
- NEMO/trunk/tests/ICE_AGRIF
- Files:
-
- 1 edited
- 1 moved
Legend:
- Unmodified
- Added
- Removed
-
NEMO/trunk/tests/ICE_AGRIF/MY_SRC/usrdef_zgr.F90
r10074 r10516 3 3 !! *** MODULE usrdef_zgr *** 4 4 !! 5 !! === ICE DYNcase ===5 !! === ICE_AGRIF case === 6 6 !! 7 7 !! Ocean domain : user defined vertical coordinate system … … 59 59 ! 60 60 IF(lwp) WRITE(numout,*) 61 IF(lwp) WRITE(numout,*) 'usr_def_zgr : ICE DYN configuration (slab ocean - advection of an ice patch in a biperiodic square box domain)'62 IF(lwp) WRITE(numout,*) '~~~~~~~~~~~ '61 IF(lwp) WRITE(numout,*) 'usr_def_zgr : ICE_AGRIF configuration ' 62 IF(lwp) WRITE(numout,*) '~~~~~~~~~~~ (slab ocean - advection of an ice patch in a biperiodic square box domain)' 63 63 ! 64 64 ! 65 ! type of vertical coordinate ==>>> here ICE DYN: slab ocean always65 ! type of vertical coordinate ==>>> here ICE_AGRIF : slab ocean always 66 66 ! --------------------------- 67 67 ld_zco = .TRUE. ! z-full-step coordinate
Note: See TracChangeset
for help on using the changeset viewer.