MODULE comcstfi_h
      IMPLICIT NONE

      REAL pi ! something like 3.14159
      REAL rad ! radius of the planet (m)
      REAL g ! gravity (m/s2)
      REAL r ! reduced gas constant (r=8.314511/(mugaz/1000.0))
      REAL cpp ! Cp of the atmosphere
      REAL rcp ! r/cpp
      REAL mugaz ! molar mass of the atmosphere (g/mol)
      REAL omeg ! planet rotation rate (rad/s)

      END MODULE comcstfi_h