source: LMDZ4/branches/LMDZ4V5.0-dev/libf/phylmd/cvthermo.h @ 1373

Last change on this file since 1373 was 766, checked in by Laurent Fairhead, 17 years ago

Merge entre la version V3_conv et le HEAD
YM, JG, LF

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 450 bytes
Line 
1!
2! $Header$
3!
4c Thermodynamical constants for convectL:
5
6      real cpd, cpv, cl, rrv, rrd, lv0, g, rowl, t0
7      real clmcpv, clmcpd, cpdmcp, cpvmcpd, cpvmcl
8      real eps, epsi, epsim1
9      real ginv, hrd
10      real grav
11
12      COMMON /cvthermo/ cpd, cpv, cl, rrv, rrd, lv0, g, rowl, t0
13     :                 ,clmcpv, clmcpd, cpdmcp, cpvmcpd, cpvmcl 
14     :                 ,eps, epsi, epsim1, ginv, hrd, grav
15
16c$OMP THREADPRIVATE(/cvthermo/)
Note: See TracBrowser for help on using the repository browser.