Changeset 982 for LMDZ4/trunk/libf/phylmd/phyetat0.F

Timestamp:

Jun 25, 2008, 10:54:57 AM (16 years ago)

Author:

Laurent Fairhead

Message:

Ooooops again
LF

File:

• LMDZ4/trunk/libf/phylmd/phyetat0.F (modified) (1 diff)

LMDZ4/trunk/libf/phylmd/phyetat0.F

@@ -63 +63 @@
       REAL zmax0_glo(klon_glo), f0_glo(klon)
       REAL ema_work1_glo(klon_glo, klev), ema_work2_glo(klon_glo, klev)
-      REAL wake_deltat_glo(klon_glo,klev), wake_deltaq_glo(klon_glo,klev)
+      REAL wake_deltat_glo(klon_glo,klev)
+      REAL wake_deltaq_glo(klon_glo,klev)
       REAL wake_s_glo(klon_glo), wake_cstar_glo(klon_glo)
       REAL wake_fip_glo(klon_glo)