Changeset 1175 for trunk/NEMO/TOP_SRC/TRP/trp_trc.F90

Timestamp:

2008-09-11T18:26:34+02:00 (16 years ago)

Author:

cetlod

Message:

update transport modules to take into account new trends organization, see ticket:248

File:

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

trunk/NEMO/TOP_SRC/TRP/trp_trc.F90

@@ -51 +51 @@
 
 # if defined key_trc_diatrd
-   
+
    !!  non conservative trends (biological, ...)
    !! --------------------------------------------------
-   LOGICAL, PUBLIC, DIMENSION (jptra) ::   luttrd   !: large trends diagnostic to write or not (namelist)
-   
    !!  Advection-diffusion trends
    REAL(wp), PUBLIC, DIMENSION(:,:,:,:,:), ALLOCATABLE ::   trtrd   !: trends of the tracer equations
-   
+
    INTEGER, PUBLIC, DIMENSION(jptra) :: ikeep ! indice of tracer for which dyn trends are stored
-   INTEGER, PUBLIC                   :: nkeep ! number of tracers for which dyn trends are stored 
+   INTEGER, PUBLIC                   :: nkeep ! number of tracers for which dyn trends are stored
    !                                          ! (used to allocate trtrd buffer)
 
-   !! netcdf files and index common
-   !! --------------------------------------------------
    INTEGER , PUBLIC ::   nwritetrd   !: frequency of additional arrays outputs(namelist)
-   
-# endif 
-
+# endif
 #else
    !!----------------------------------------------------------------------