Changeset 4906 for branches/2014/dev_CNRS_2014/NEMOGCM/NEMO/OPA_SRC/TRD

Timestamp:

2014-11-27T21:01:30+01:00 (10 years ago)

Author:

cetlod

Message:

2014/dev_CNRS_2014/NEMOGCM : minor corrections

File:

• branches/2014/dev_CNRS_2014/NEMOGCM/NEMO/OPA_SRC/TRD/trdini.F90 (modified) (1 diff)

branches/2014/dev_CNRS_2014/NEMOGCM/NEMO/OPA_SRC/TRD/trdini.F90

@@ -91 +91 @@
 !!gm end
       !
-      IF( lk_vvl )   CALL ctl_stop( 'trend diagnostics with variable volume not validated' )
+      IF( lk_vvl .AND. ( l_trdtra .OR. l_trddyn ) )  CALL ctl_stop( 'trend diagnostics with variable volume not validated' )
       
 !!gm  : Potential BUG : 3D output only for vector invariant form!  add a ctl_stop or code the flux form case