Changeset 10566 for NEMO/trunk/tests/CANAL

Timestamp:

2019-01-24T14:01:12+01:00 (5 years ago)

Author:

clem

Message:

debug canal test case

File:

• NEMO/trunk/tests/CANAL/MY_SRC/stpctl.F90 (modified) (1 diff)

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

@@ -148 +148 @@
          &  zmax(4) >= 100._wp .OR.   &                    ! too large sea surface salinity ( > 100 )
          &  zmax(4) < -100._wp .OR.   &                    ! too large sea surface salinity (keep this line for sea-ice)
-         &  ISNAN( zmax(1) + zmax(2) + zmax(3) )  ) THEN   ! NaN encounter in the tests
+         &  ISNAN( zmax(1) + zmax(2) + zmax(3) ) ) ) THEN  ! NaN encounter in the tests
          IF( lk_mpp .AND. ln_ctl ) THEN
             CALL mpp_maxloc( 'stpctl', ABS(sshn)        , ssmask(:,:)  , zzz, ih  )