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 10566 – NEMO

Changeset 10566


Ignore:
Timestamp:
2019-01-24T14:01:12+01:00 (6 years ago)
Author:
clem
Message:

debug canal test case

File:
1 edited

Legend:

Unmodified
Added
Removed

  • NEMO/trunk/tests/CANAL/MY_SRC/stpctl.F90

    r10425 r10566  
    148148         &  zmax(4) >= 100._wp .OR.   &                    ! too large sea surface salinity ( > 100 ) 
    149149         &  zmax(4) < -100._wp .OR.   &                    ! too large sea surface salinity (keep this line for sea-ice) 
    150          &  ISNAN( zmax(1) + zmax(2) + zmax(3) )  ) THEN   ! NaN encounter in the tests 
     150         &  ISNAN( zmax(1) + zmax(2) + zmax(3) ) ) ) THEN  ! NaN encounter in the tests 
    151151         IF( lk_mpp .AND. ln_ctl ) THEN 
    152152            CALL mpp_maxloc( 'stpctl', ABS(sshn)        , ssmask(:,:)  , zzz, ih  ) 
Note: See TracChangeset for help on using the changeset viewer.