New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 8593 – NEMO

Changeset 8593


Ignore:
Timestamp:
2017-10-05T10:28:32+02:00 (6 years ago)
Author:
flavoni
Message:

#1665, stop : don't apply modification at Equator when mesh is given in Km and s-coordinates

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/NEMOGCM/TOOLS/DOMAINcfg/src/domzgr.f90

    r7200 r8593  
    20782078      hbatt(:,:) = zenv(:,:)  
    20792079      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') 
    20802082         CALL ctl_warn( ' s-coordinates are tapered in vicinity of the Equator' ) 
    20812083         DO jj = 1, jpj 
Note: See TracChangeset for help on using the changeset viewer.