Changeset 2567 for trunk/NEMOGCM/NEMO/TOP_SRC/C14b/trcnam_c14b.F90

Timestamp:

2011-01-25T10:36:27+01:00 (13 years ago)

Author:

cetlod

Message:

rename nwritedia to nn_writedia, see ticket #791

File:

• trunk/NEMOGCM/NEMO/TOP_SRC/C14b/trcnam_c14b.F90 (modified) (3 diffs)

trunk/NEMOGCM/NEMO/TOP_SRC/C14b/trcnam_c14b.F90

@@ -59 +59 @@
       NAMELIST/namc14date/ ndate_beg_b, nyear_res_b
 #if defined key_diatrc && ! defined key_iomput
-      NAMELIST/namc14dia/nwritedia, c14dia2d, c14dia3d     ! additional diagnostics
+      NAMELIST/namc14dia/nn_writedia, c14dia2d, c14dia3d     ! additional diagnostics
 #endif
       !!-------------------------------------------------------------------
@@ -85 +85 @@
       ! Namelist namc14dia
       ! -------------------
-      nwritedia = 10                   ! default values
+      nn_writedia = 10                   ! default values
 
       DO jl = 1, jp_c14b_2d
@@ -121 +121 @@
          WRITE(numout,*)
          WRITE(numout,*) ' Namelist : natadd'
-         WRITE(numout,*) '    frequency of outputs for additional arrays nwritedia = ', nwritedia
+         WRITE(numout,*) '    frequency of outputs for additional arrays nn_writedia = ', nn_writedia
          DO jl = 1, jp_c14b_3d
             jn = jp_c14b0_3d + jl - 1