Changeset 1119 for trunk/NEMO/TOP_SRC/trcctl.F90

Timestamp:

2008-06-20T17:17:41+02:00 (16 years ago)

Author:

cetlod

Message:

style of all top namelist has been modified ; update modules to take it into account, see ticket:196

File:

• trunk/NEMO/TOP_SRC/trcctl.F90 (modified) (1 diff)

trunk/NEMO/TOP_SRC/trcctl.F90

@@ -65 +65 @@
       ENDIF
 
-      ! Don't USE non penetrative convective mixing option
-      ! it's not implemented for passive tracer
-      IF( ln_zdfnpc ) THEN
-         IF(lwp) WRITE (numout,*) ' ===>>>> : w a r n i n g '
-         IF(lwp) WRITE (numout,*) ' =======   ============= '
-         IF(lwp) WRITE (numout,*) ' STOP, this sheme is not implemented'
-         IF(lwp) WRITE (numout,*) ' in passive tracer model:'
-         IF(lwp) WRITE (numout,*) ' non penetrative convect. mixing scheme'
-         istop = istop + 1
-      ENDIF
-
       ! transport scheme option
       CALL trc_trp_ctl