Changeset 2104 for branches/DEV_r2006_merge_TRA_TRC/NEMO/TOP_SRC/trcnam.F90

Timestamp:

2010-09-17T14:35:46+02:00 (14 years ago)

Author:

cetlod

Message:

update DEV_r2006_merge_TRA_TRC according to review

File:

• branches/DEV_r2006_merge_TRA_TRC/NEMO/TOP_SRC/trcnam.F90 (modified) (3 diffs)

branches/DEV_r2006_merge_TRA_TRC/NEMO/TOP_SRC/trcnam.F90

@@ -102 +102 @@
       READ  ( numnat, namtrc )
 
-      !!Chris  computes the first time step of tracer model
-      nittrc000 = nit000 + nn_dttrc - 1
-
       DO jn = 1, jptra
          ctrcnm(jn) = sn_tracer(jn)%clsname
@@ -118 +115 @@
          WRITE(numout,*) ' Namelist : namtrc'
          WRITE(numout,*) '    time step freq. for pass. trac. nn_dttrc             = ', nn_dttrc
-         WRITE(numout,*) '    1st time step for pass. trac. nittrc000              = ', nittrc000
          WRITE(numout,*) '    frequency of outputs for passive tracers nn_writetrc = ', nn_writetrc  
          WRITE(numout,*) '    restart LOGICAL for passive tr. ln_rsttr             = ', ln_rsttr
@@ -200 +196 @@
 #endif
 
+   !!----------------------------------------------------------------------
+   !! NEMO/TOP 3.3 , LOCEAN-IPSL (2010) 
+   !! $Id: $ 
+   !! Software governed by the CeCILL licence (modipsl/doc/NEMO_CeCILL.txt)
    !!======================================================================
 END MODULE  trcnam