source: LMDZ5/branches/IPSLCM6.0.8/libf/phylmd/cvthermo.h @ 3046

Last change on this file since 3046 was 1999, checked in by Laurent Fairhead, 11 years ago

Merged trunk changes r1920:1997 into testing branch

  • Property copyright set to
    Name of program: LMDZ
    Creation date: 1984
    Version: LMDZ5
    License: CeCILL version 2
    Holder: Laboratoire de m\'et\'eorologie dynamique, CNRS, UMR 8539
    See the license file in the root directory
  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 486 bytes
Line 
1!
2! $Header$
3!
4! Thermodynamical constants for convectL:
5
6      real cpd, cpv, cl, ci, rrv, rrd, lv0, lf0, g, rowl, t0
7      real clmcpv, clmcpd, cpdmcp, cpvmcpd, cpvmcl, clmci
8      real eps, epsi, epsim1
9      real ginv, hrd
10      real grav
11
12      COMMON /cvthermo/ cpd, cpv, cl, ci, rrv, rrd, lv0, lf0, g, rowl &
13                       ,t0, clmcpv, clmcpd, cpdmcp, cpvmcpd, cpvmcl  &
14                       ,clmci, eps, epsi, epsim1, ginv, hrd, grav
15
16!$OMP THREADPRIVATE(/cvthermo/)
Note: See TracBrowser for help on using the repository browser.