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