Changeset 8593 for trunk/NEMOGCM/TOOLS
- Timestamp:
- 2017-10-05T10:28:32+02:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMOGCM/TOOLS/DOMAINcfg/src/domzgr.f90
r7200 r8593 2078 2078 hbatt(:,:) = zenv(:,:) 2079 2079 IF( MINVAL( gphit(:,:) ) * MAXVAL( gphit(:,:) ) <= 0._wp ) THEN 2080 IF ( jphgr_msh == 2 .OR. jphgr_msh == 3) CALL ctl_stop( 'dom:zgr_sco: if jphgr_msh = 2 or 3 and & 2081 & s-coordinates stop, if not correction at Equator is applied, but it is wrong') 2080 2082 CALL ctl_warn( ' s-coordinates are tapered in vicinity of the Equator' ) 2081 2083 DO jj = 1, jpj
Note: See TracChangeset
for help on using the changeset viewer.