Changeset 8525 for branches/2015/nemo_v3_6_STABLE/NEMOGCM/NEMO/OPA_SRC/TRA/traldf.F90

Timestamp:

2017-09-15T15:27:33+02:00 (7 years ago)

Author:

cbricaud

Message:

fix in nemo_v3_6_STABLE for ticket #1741

File:

• branches/2015/nemo_v3_6_STABLE/NEMOGCM/NEMO/OPA_SRC/TRA/traldf.F90 (modified) (1 diff)

branches/2015/nemo_v3_6_STABLE/NEMOGCM/NEMO/OPA_SRC/TRA/traldf.F90

@@ -215 +215 @@
       IF( ierr == 1 )   CALL ctl_stop( ' iso-level in z-coordinate - partial step, not allowed' )
       IF( ierr == 2 )   CALL ctl_stop( ' isoneutral bilaplacian operator does not exist' )
+      IF( ln_traldf_hor .AND. ln_traldf_grif )    &
+            &   CALL ctl_stop( ' horizontal operator and Griffies triads not available; sitch to isoneutral operator' )
       IF( ln_traldf_grif .AND. ln_isfcav         )   &
            CALL ctl_stop( ' ice shelf and traldf_grif not tested')