source: LMDZ4/branches/IPSL-CM4_IPCC_patches/libf/phylmd/YOETHF.inc @ 5022

Last change on this file since 5022 was 524, checked in by lmdzadmin, 20 years ago

Initial revision

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 529 bytes
Line 
1!
2! $Header$
3!
4!*    COMMON *YOETHF* DERIVED CONSTANTS SPECIFIC TO ECMWF THERMODYNAMICS
5!
6!     *R__ES*   *CONSTANTS USED FOR COMPUTATION OF SATURATION
7!                MIXING RATIO OVER LIQUID WATER(*R_LES*) OR
8!                ICE(*R_IES*).
9!     *RVTMP2*  *RVTMP2=RCPV/RCPD-1.
10!     *RHOH2O*  *DENSITY OF LIQUID WATER.   (RATM/100.)
11!
12      REAL R2ES, R3LES, R3IES, R4LES, R4IES, R5LES, R5IES
13      REAL RVTMP2, RHOH2O
14      COMMON /YOETHF/R2ES, R3LES, R3IES, R4LES, R4IES, R5LES, R5IES, &
15     &               RVTMP2, RHOH2O
Note: See TracBrowser for help on using the repository browser.