Changeset 4740 for branches/2014/dev_r4650_UKMO3_masked_damping/NEMOGCM/NEMO/TOP_SRC

Timestamp:

2014-08-13T16:58:34+02:00 (10 years ago)

Author:

timgraham

Message:

Corrected bugs in trcdmp and trcnam_trp
Modifications to nam_tradmp in configuration namelists

Location:

branches/2014/dev_r4650_UKMO3_masked_damping/NEMOGCM/NEMO/TOP_SRC/TRP

Files:

• trcdmp.F90 (modified) (2 diffs)
• trcnam_trp.F90 (modified) (1 diff)

branches/2014/dev_r4650_UKMO3_masked_damping/NEMOGCM/NEMO/TOP_SRC/TRP/trcdmp.F90

@@ -24 +24 @@
    USE trdtra
    USE trdmod_oce
+   USE iom
 
    IMPLICIT NONE
@@ -302 +303 @@
       !!----------------------------------------------------------------------
       !
-      INTEGER, imask  !local file handle
+      INTEGER :: imask  !local file handle
 
       IF( nn_timing == 1 )  CALL timing_start('trc_dmp_init')

branches/2014/dev_r4650_UKMO3_masked_damping/NEMOGCM/NEMO/TOP_SRC/TRP/trcnam_trp.F90

@@ -78 +78 @@
       NAMELIST/namtrc_zdf/ ln_trczdf_exp  , nn_trczdf_exp
       NAMELIST/namtrc_rad/ ln_trcrad
-      NAMELIST/namtrc_dmp/ nn_zdmp_tr , nn_file_tr
+      NAMELIST/namtrc_dmp/ nn_zdmp_tr , cn_resto_tr
       !!----------------------------------------------------------------------