source: LMDZ4/trunk/libf/phylmd/cvthermo.h

Last change on this file was 766, checked in by Laurent Fairhead, 18 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
RevLine 
[524]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
[766]16c$OMP THREADPRIVATE(/cvthermo/)
Note: See TracBrowser for help on using the repository browser.