Changeset 559 for LMDZ4/trunk/libf/phylmd/clouds_gno.F

Timestamp:

Nov 9, 2004, 5:55:41 PM (20 years ago)

Author:

lmdzadmin

Message:

Initialisations diverses YM
LF

File:

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

LMDZ4/trunk/libf/phylmd/clouds_gno.F

@@ -58 +58 @@
        LOGICAL lconv(klon)
 
-
+cym
+      cldf(:,:)=0.0
+      
       pi = ACOS(-1.)
       sqrtpi=sqrt(pi)