module comcstphy real :: rradius ! planet radius (m) real :: rr ! recuced gas constant: R/molar mass of atm real :: rg ! gravity real :: rcpp ! specific heat of the atmosphere end module comcstphy