Changeset 8323 for branches/UKMO

Timestamp:

2017-07-12T12:31:07+02:00 (7 years ago)

Author:

marc

Message:

Changing four parameters in OPA_SRC/TRD/trd_oce.F90

File:

• branches/UKMO/dev_r5518_GO6_allow_trends/NEMOGCM/NEMO/OPA_SRC/TRD/trd_oce.F90 (modified) (2 diffs)

branches/UKMO/dev_r5518_GO6_allow_trends/NEMOGCM/NEMO/OPA_SRC/TRD/trd_oce.F90

@@ -33 +33 @@
 # endif
    !                                                  !!!* Active tracers trends indexes
-   INTEGER, PUBLIC, PARAMETER ::   jptot_tra  = 20     !: Total trend nb: change it when adding/removing one indice below
+   INTEGER, PUBLIC, PARAMETER ::   jptot_tra  = 23     !: Total trend nb: change it when adding/removing one indice below
    !                               ===============     !  
    INTEGER, PUBLIC, PARAMETER ::   jptra_xad  =  1     !: x- horizontal advection
@@ -57 +57 @@
    !
    !                                                  !!!* Passive tracers trends indices (use if "key_top" defined)
-   INTEGER, PUBLIC, PARAMETER ::   jptra_sms  = 19     !: sources m. sinks
-   INTEGER, PUBLIC, PARAMETER ::   jptra_radn = 20     !: corr. trn<0 in trcrad
-   INTEGER, PUBLIC, PARAMETER ::   jptra_radb = 21     !: corr. trb<0 in trcrad (like atf)
+   INTEGER, PUBLIC, PARAMETER ::   jptra_sms  = 21     !: sources m. sinks
+   INTEGER, PUBLIC, PARAMETER ::   jptra_radn = 22     !: corr. trn<0 in trcrad
+   INTEGER, PUBLIC, PARAMETER ::   jptra_radb = 23     !: corr. trb<0 in trcrad (like atf)
    !
    !                                                  !!!* Momentum trends indices