- Timestamp:
- 2016-11-28T17:04:10+01:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2016/dev_INGV_UKMO_2016/NEMOGCM/NEMO/OPA_SRC/TRD/trdini.F90
r5215 r7351 26 26 27 27 !! * Substitutions 28 # include "domzgr_substitute.h90"29 28 # include "vectopt_loop_substitute.h90" 30 29 !!---------------------------------------------------------------------- … … 91 90 !!gm end 92 91 ! 93 IF( lk_vvl.AND. ( l_trdtra .OR. l_trddyn ) ) CALL ctl_stop( 'trend diagnostics with variable volume not validated' )92 IF( .NOT.ln_linssh .AND. ( l_trdtra .OR. l_trddyn ) ) CALL ctl_stop( 'trend diagnostics with variable volume not validated' ) 94 93 95 94 !!gm : Potential BUG : 3D output only for vector invariant form! add a ctl_stop or code the flux form case
Note: See TracChangeset
for help on using the changeset viewer.