source: LMDZ.3.3/branches/LF/libf/phylmd/YOMCST.h @ 4637

Last change on this file since 4637 was 2, checked in by lmdz, 25 years ago

Initial revision

  • Property svn:eol-style set to native
  • Property svn:executable set to *
  • Property svn:keywords set to Author Date Id Revision
File size: 1.2 KB
Line 
1C A1.0 Fundamental constants
2      REAL RPI,RCLUM,RHPLA,RKBOL,RNAVO
3C A1.1 Astronomical constants
4      REAL RDAY,REA,REPSM,RSIYEA,RSIDAY,ROMEGA
5c A1.1.bis Constantes concernant l'orbite de la Terre:
6      REAL R_ecc, R_peri, R_incl
7C A1.2 Geoide
8      REAL RA,RG,R1SA
9C A1.3 Radiation
10      REAL RSIGMA,RI0
11C A1.4 Thermodynamic gas phase
12      REAL R,RMD,RMV,RD,RV,RCPD,RCPV,RCVD,RCVV
13      REAL RKAPPA,RETV
14C A1.5,6 Thermodynamic liquid,solid phases
15      REAL RCW,RCS
16C A1.7 Thermodynamic transition of phase
17      REAL RLVTT,RLSTT,RLMLT,RTT,RATM
18C A1.8 Curve of saturation
19      REAL RESTT,RALPW,RBETW,RGAMW,RALPS,RBETS,RGAMS
20      REAL RALPD,RBETD,RGAMD
21C
22      COMMON/YOMCST/RPI   ,RCLUM ,RHPLA ,RKBOL ,RNAVO
23     S      ,RDAY  ,REA   ,REPSM ,RSIYEA,RSIDAY,ROMEGA
24     s      ,R_ecc, R_peri, R_incl
25     S      ,RA    ,RG    ,R1SA
26     S      ,RSIGMA,RI0
27     S      ,R     ,RMD   ,RMV   ,RD    ,RV    ,RCPD
28     S      ,RCPV  ,RCVD  ,RCVV  ,RKAPPA,RETV
29     S      ,RCW   ,RCS
30     S      ,RLVTT ,RLSTT ,RLMLT ,RTT   ,RATM
31     S      ,RESTT ,RALPW ,RBETW ,RGAMW ,RALPS ,RBETS ,RGAMS
32     S      ,RALPD ,RBETD ,RGAMD
33C    ------------------------------------------------------------------
Note: See TracBrowser for help on using the repository browser.