[94] | 1 | ! A1.0 Fundamental constants |
---|
[112] | 2 | REAL :: RPI,RCLUM,RHPLA,RKBOL,RNAVO |
---|
[94] | 3 | ! A1.1 Astronomical constants |
---|
[112] | 4 | REAL :: RDAY,REA,REPSM,RSIYEA,RSIDAY,ROMEGA |
---|
[94] | 5 | ! A1.1.bis Constantes concernant l'orbite de la Terre: |
---|
[112] | 6 | REAL :: R_ecc, R_peri, R_incl |
---|
[94] | 7 | ! A1.2 Geoide |
---|
[112] | 8 | REAL :: RA,RG,R1SA |
---|
[94] | 9 | ! A1.3 Radiation |
---|
[112] | 10 | REAL :: RSIGMA,RI0 |
---|
[94] | 11 | ! A1.4 Thermodynamic gas phase |
---|
[112] | 12 | REAL :: R,RMD,RMV,RD,RV,RCPD,RCPV,RCVD,RCVV |
---|
| 13 | REAL :: RKAPPA,RETV |
---|
[94] | 14 | ! A1.5,6 Thermodynamic liquid,solid phases |
---|
[112] | 15 | REAL :: RCW,RCS |
---|
[94] | 16 | ! A1.7 Thermodynamic transition of phase |
---|
[112] | 17 | REAL :: RLVTT,RLSTT,RLMLT,RTT,RATM |
---|
[94] | 18 | ! A1.8 Curve of saturation |
---|
[112] | 19 | REAL :: RESTT,RALPW,RBETW,RGAMW,RALPS,RBETS,RGAMS |
---|
| 20 | REAL :: RALPD,RBETD,RGAMD |
---|
[94] | 21 | ! |
---|
| 22 | COMMON/YOMCST/RPI ,RCLUM ,RHPLA ,RKBOL ,RNAVO & |
---|
| 23 | & ,RDAY ,REA ,REPSM ,RSIYEA,RSIDAY,ROMEGA & |
---|
| 24 | & ,R_ecc, R_peri, R_incl & |
---|
| 25 | & ,RA ,RG ,R1SA & |
---|
| 26 | & ,RSIGMA,RI0 & |
---|
| 27 | & ,R ,RMD ,RMV ,RD ,RV ,RCPD & |
---|
| 28 | & ,RCPV ,RCVD ,RCVV ,RKAPPA,RETV & |
---|
| 29 | & ,RCW ,RCS & |
---|
| 30 | & ,RLVTT ,RLSTT ,RLMLT ,RTT ,RATM & |
---|
| 31 | & ,RESTT ,RALPW ,RBETW ,RGAMW ,RALPS ,RBETS ,RGAMS & |
---|
[112] | 32 | & ,RALPD ,RBETD ,RGAMD |
---|