Changeset 541 for trunk/NEMO/OPA_SRC/TRA/tradmp.F90

Timestamp:

2006-10-20T14:21:28+02:00 (18 years ago)

Author:

opalod

Message:

nemo_v1_bugfix_065:RB: move namelist declaration for compatibility with Agrif

File:

• trunk/NEMO/OPA_SRC/TRA/tradmp.F90 (modified) (2 diffs)

trunk/NEMO/OPA_SRC/TRA/tradmp.F90

@@ -57 +57 @@
    REAL(wp) ::   bdmp   =  360.   ! bottom time scale for internal damping (days)
    REAL(wp) ::   hdmp   =  800.   ! depth of transition between sdmp and bdmp (meters)
-   NAMELIST/namtdp/ ndmp, ndmpf, nmldmp, sdmp, bdmp, hdmp
 
    !! * Substitutions
@@ -190 +189 @@
       !! ** Method  :   read the nammbf namelist and check the parameters
       !!      called by tra_dmp at the first timestep (nit000)
+      !!----------------------------------------------------------------------
+      NAMELIST/namtdp/ ndmp, ndmpf, nmldmp, sdmp, bdmp, hdmp
       !!----------------------------------------------------------------------