Changeset 1221 for trunk/NEMO/OPA_SRC

Timestamp:

2008-10-31T14:48:31+01:00 (16 years ago)

Author:

ctlod

Message:

correct compilation errors when using key_c1d cpp key, see ticket: #274

File:

• trunk/NEMO/OPA_SRC/ZDF/zdftke.F90 (modified) (1 diff)

trunk/NEMO/OPA_SRC/ZDF/zdftke.F90

@@ -62 +62 @@
    REAL(wp), PUBLIC, DIMENSION(jpi,jpj,jpk) ::   e_dis, e_mix        !: dissipation and mixing turbulent lengh scales
    REAL(wp), PUBLIC, DIMENSION(jpi,jpj,jpk) ::   e_pdl, e_ric        !: prandl and local Richardson numbers
+   REAL(wp), PUBLIC, DIMENSION(jpi,jpj)     ::   hlc                 !: save finite Langmuir Circulation depth
 #endif