Changeset 1999 for LMDZ5/branches/testing/libf/phylmd/cvthermo.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/cvthermo.h (modified) (2 diffs)

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

@@ -2 +2 @@
 ! $Header$
 !
-c Thermodynamical constants for convectL:
+! Thermodynamical constants for convectL:
 
       real cpd, cpv, cl, ci, rrv, rrd, lv0, lf0, g, rowl, t0
@@ -10 +10 @@
       real grav
 
-      COMMON /cvthermo/ cpd, cpv, cl, ci, rrv, rrd, lv0, lf0, g, rowl
-     :                 ,t0, clmcpv, clmcpd, cpdmcp, cpvmcpd, cpvmcl 
-     :                 ,clmci, eps, epsi, epsim1, ginv, hrd, grav
+      COMMON /cvthermo/ cpd, cpv, cl, ci, rrv, rrd, lv0, lf0, g, rowl &
+                       ,t0, clmcpv, clmcpd, cpdmcp, cpvmcpd, cpvmcl  &
+                       ,clmci, eps, epsi, epsim1, ginv, hrd, grav
 
-c$OMP THREADPRIVATE(/cvthermo/)
+!$OMP THREADPRIVATE(/cvthermo/)