Changeset 287 for LMDZ.3.3/branches/rel-LF/libf/phylmd/physiq.F

Timestamp:

Oct 30, 2001, 11:18:36 AM (23 years ago)

Author:

lmdzadmin

Message:

Pb de definition de variable
LF

File:

• LMDZ.3.3/branches/rel-LF/libf/phylmd/physiq.F (modified) (2 diffs)

LMDZ.3.3/branches/rel-LF/libf/phylmd/physiq.F

@@ -533 +533 @@
 
       REAL ratqs(klon,klev)
-      LOGICAL zpt_conv(klon,klev)
+      real zpt_conv(klon,klev)
 
 c
@@ -1845 +1845 @@
          fder(i) = dlw(i) + dsens(i) + devap(i)
       ENDDO
+
 
       DO k = 1, klev