Changeset 1999 for LMDZ5/branches/testing/libf/phylmd/cvparam.h

Timestamp:

Mar 20, 2014, 10:57:19 AM (10 years ago)

Author:

Laurent Fairhead

Message:

Merged trunk changes r1920:1997 into testing branch

Location:

LMDZ5/branches/testing

Files:

• . (modified) (1 prop)
• libf/phylmd/cvparam.h (modified) (2 diffs)

LMDZ5/branches/testing/libf/phylmd/cvparam.h

@@ -2 +2 @@
 ! $Header$
 !
-c------------------------------------------------------------
-c Parameters for convectL:
-c (includes - microphysical parameters, 
-c                       - parameters that control the rate of approach 
-c               to quasi-equilibrium)
-c                       - noff & minorig (previously in input of convect1)
-c------------------------------------------------------------
+!------------------------------------------------------------
+! Parameters for convectL:
+! (includes - microphysical parameters, 
+!                       - parameters that control the rate of approach 
+!               to quasi-equilibrium)
+!                       - noff & minorig (previously in input of convect1)
+!------------------------------------------------------------
 
       integer noff, minorig, nl, nlp, nlm
@@ -21 +21 @@
       real delta
 
-      COMMON /cvparam/ noff, minorig, nl, nlp, nlm
-     :                ,elcrit, tlcrit
-     :                ,entp, sigs, sigd
-     :                ,omtrain, omtsnow, coeffr, coeffs
-     :                ,dtmax, cu, betad, alpha, damp, delta
+      COMMON /cvparam/ noff, minorig, nl, nlp, nlm &
+                      ,elcrit, tlcrit &
+                      ,entp, sigs, sigd &
+                      ,omtrain, omtsnow, coeffr, coeffs &
+                      ,dtmax, cu, betad, alpha, damp, delta
 
-c$OMP THREADPRIVATE(/cvparam/)
+!$OMP THREADPRIVATE(/cvparam/)