source: trunk/libf/phyvenus/YOETHF.h @ 4

Last change on this file since 4 was 3, checked in by slebonnois, 15 years ago

Creation de repertoires:

  • chantiers : pour communiquer sur nos projets de modifs
  • documentation : pour stocker les docs

Ajout de:

  • libf/phytitan : physique de Titan
  • libf/chimtitan: chimie de Titan
  • libf/phyvenus : physique de Venus
File size: 614 bytes
Line 
1!
2! $Header: /home/cvsroot/LMDZ4/libf/phylmd/YOETHF.h,v 1.1.1.1 2004/05/19 12:53:08 lmdzadmin Exp $
3!
4C*    COMMON *YOETHF* DERIVED CONSTANTS SPECIFIC TO ECMWF THERMODYNAMICS
5C
6C     *R__ES*   *CONSTANTS USED FOR COMPUTATION OF SATURATION
7C                MIXING RATIO OVER LIQUID WATER(*R_LES*) OR
8C                ICE(*R_IES*).
9C     *RVTMP2*  *RVTMP2=RCPV/RCPD-1.
10C     *RHOH2O*  *DENSITY OF LIQUID WATER.   (RATM/100.)
11C
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.