Changeset 1480 for trunk/NEMO

Timestamp:

2009-07-03T15:52:57+02:00 (16 years ago)

Author:

ctlod

Message:

Bug in zdftmx when using zdfddm, see ticket: #462

File:

• trunk/NEMO/OPA_SRC/step.F90 (modified) (1 diff)

trunk/NEMO/OPA_SRC/step.F90

@@ -250 +250 @@
       IF( ln_zdfevd )   CALL zdf_evd( kstp )                 ! enhanced vertical eddy diffusivity
 
+      IF( lk_zdftmx )   CALL zdf_tmx( kstp )                 ! tidal vertical mixing
+
       IF( lk_zdfddm .AND. .NOT. lk_zdfkpp )   &
          &              CALL zdf_ddm( kstp )                 ! double diffusive mixing
 
-      IF( lk_zdftmx )   CALL zdf_tmx( kstp )                 ! tidal vertical mixing
 
                         CALL zdf_bfr( kstp )                 ! bottom friction