MODULE YOMCST_mod
  IMPLICIT NONE

  ! A1.0 Fundamental constants
  REAL, SAVE :: RPI, RCLUM, RHPLA, RKBOL, RNAVO
  ! A1.1 Astronomical constants
  REAL, SAVE :: RDAY, REA, REPSM, RSIYEA, RSIDAY, ROMEGA
  ! A1.1.bis Constantes concernant l'orbite de la Terre:
  REAL, SAVE :: R_ecc, R_peri, R_incl
  ! A1.2 Geoide
  REAL, SAVE :: RA, RG, R1SA
  ! A1.3 Radiation
  REAL, SAVE :: RSIGMA
  ! A1.4 Thermodynamic gas phase
  REAL, SAVE :: R, RMD, RMV, RD, RV, RCPD, RCPV, RCVD, RCVV
  REAL, SAVE :: RKAPPA, RETV
  ! A1.5,6 Thermodynamic liquid,solid phases
  REAL, SAVE :: RCW, RCS
  ! A1.7 Thermodynamic transition of phase
  REAL, SAVE :: RLVTT, RLSTT, RLMLT, RTT, RATM
  ! A1.8 Curve of saturation
  REAL, SAVE :: RESTT, RALPW, RBETW, RGAMW, RALPS, RBETS, RGAMS
  REAL, SAVE :: RALPD, RBETD, RGAMD

END MODULE YOMCST_mod