Changeset 542

Timestamp:

2006-10-20T14:22:53+02:00 (18 years ago)

Author:

opalod

Message:

nemo_v1_bugfix_066:RB:change parameter declaration for compatibility with Agrif

File:

• trunk/NEMO/OPA_SRC/TRD/trdmld_oce.F90 (modified) (1 diff)

trunk/NEMO/OPA_SRC/TRD/trdmld_oce.F90

@@ -18 +18 @@
    !!* mixed layer trends indices
    INTEGER, PARAMETER, PUBLIC ::   jpltrd = 11    !: number of mixed-layer trends arrays
-   INTEGER, PARAMETER, PUBLIC ::   jpktrd = jpk   !: max level for mixed-layer trends diag.
+   INTEGER, PUBLIC   & 
+#if !defined key_agrif
+      , PARAMETER  &
+#endif
+::   jpktrd = jpk   !: max level for mixed-layer trends diag.
    !
-   INTEGER, PUBLIC, PARAMETER ::   jpmld_xad =  1   !:  zonal      \
+   INTEGER, PUBLIC, PARAMETER ::   jpmld_xad =  1   !:  zonal      
    INTEGER, PUBLIC, PARAMETER ::   jpmld_yad =  2   !:  meridonal   > advection
-   INTEGER, PUBLIC, PARAMETER ::   jpmld_zad =  3   !:  vertical   /
+   INTEGER, PUBLIC, PARAMETER ::   jpmld_zad =  3   !:  vertical   
    INTEGER, PUBLIC, PARAMETER ::   jpmld_ldf =  4   !:  lateral diffusion (geopot. or iso-neutral)
    INTEGER, PUBLIC, PARAMETER ::   jpmld_for =  5   !:  forcing