Changeset 6352 for trunk/NEMOGCM/NEMO/OPA_SRC/TRA

Timestamp:

2016-02-24T19:52:54+01:00 (8 years ago)

Author:

mathiot

Message:

Fixe ticket #1662 about slope limitiation beneath an ice shelf in trunk

File:

• trunk/NEMOGCM/NEMO/OPA_SRC/TRA/traldf.F90 (modified) (1 diff)

trunk/NEMOGCM/NEMO/OPA_SRC/TRA/traldf.F90

@@ -178 +178 @@
       IF( ln_ldfeiv .AND. .NOT.( ln_traldf_iso .OR. ln_traldf_triad ) )                                    &
            &            CALL ctl_stop( 'eddy induced velocity on tracers requires iso-neutral laplacian diffusion' )
+      IF( ln_isfcav .AND. ln_traldf_triad ) &
+           &            CALL ctl_stop( ' ice shelf cavity and traldf_triad not tested' )
            !
       IF(  nldf == np_lap_i .OR. nldf == np_lap_it .OR. &