Changeset 9789 for NEMO/trunk/tests/ICEDYN/MY_SRC/usrdef_hgr.F90
- Timestamp:
- 2018-06-13T12:16:12+02:00 (6 years ago)
- Location:
- NEMO/trunk/tests/ICEDYN
- Files:
-
- 1 edited
- 1 copied
Legend:
- Unmodified
- Added
- Removed
-
NEMO/trunk/tests/ICEDYN/MY_SRC/usrdef_hgr.F90
r9763 r9789 3 3 !! *** MODULE usrdef_hgr *** 4 4 !! 5 !! === SAS_BIPERconfiguration ===5 !! === ICEDYN configuration === 6 6 !! 7 7 !! User defined : mesh and Coriolis parameter of a user configuration … … 11 11 12 12 !!---------------------------------------------------------------------- 13 !! usr_def_hgr : initialize the horizontal mesh for SAS_BIPERconfiguration13 !! usr_def_hgr : initialize the horizontal mesh for ICEDYN configuration 14 14 !!---------------------------------------------------------------------- 15 15 USE dom_oce ! ocean space and time domain … … 45 45 !! 46 46 !! ** Method : set all intent(out) argument to a proper value 47 !! SAS_BIPERconfiguration : uniform grid spacing (rn_dx)47 !! ICEDYN configuration : uniform grid spacing (rn_dx) 48 48 !! without Coriolis force (f=0) 49 49 !! … … 68 68 ! 69 69 IF(lwp) WRITE(numout,*) 70 IF(lwp) WRITE(numout,*) 'usr_def_hgr : SAS_BIPERconfiguration bassin'70 IF(lwp) WRITE(numout,*) 'usr_def_hgr : ICEDYN configuration bassin' 71 71 IF(lwp) WRITE(numout,*) 72 72 IF(lwp) WRITE(numout,*) ' f-plane with irregular grid-spacing (+- 10%)'
Note: See TracChangeset
for help on using the changeset viewer.