Changeset 289 for LMDZ.3.3/branches/rel-1-0-patch/libf

Timestamp:

Oct 30, 2001, 11:31:59 AM (23 years ago)

Author:

lmdzadmin

Message:

Correction de bug: definition de variable (FH), type de variable (OB)
LF

File:

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

LMDZ.3.3/branches/rel-1-0-patch/libf/phylmd/physiq.F

@@ -519 +519 @@
 
       REAL ratqs(klon,klev)
-      LOGICAL zpt_conv(klon,klev)
+      real zpt_conv(klon,klev)
 
 c
@@ -930 +930 @@
 c
          zsto = dtime
-         zout = dtime * ecrit_mth
+         zout = dtime * FLOAT(ecrit_mth)
 c
          CALL histdef(nid_mth, "phis", "Surface geop. height", "-",