source: trunk/LMDZ.MARS/libf/phymars/comcstfi_h.F90 @ 1720

Last change on this file since 1720 was 1524, checked in by emillour, 9 years ago

All GCMS:
More updates to enforce dynamics/physics separation:

get rid of references to "temps_mod" from physics packages;
make a "time_phylmdz_mod.F90" module to store that
information and fill it via "iniphysiq".

EM

File size: 413 bytes
RevLine 
[1226]1      MODULE comcstfi_h
2      IMPLICIT NONE
3
[1524]4      REAL pi ! something like 3.14159
5      REAL rad ! radius of the planet (m)
6      REAL g ! gravity (m/s2)
7      REAL r ! reduced gas constant (r=8.314511/(mugaz/1000.0))
8      REAL cpp ! Cp of the atmosphere
9      REAL rcp ! r/cpp
10      REAL mugaz ! molar mass of the atmosphere (g/mol)
11      REAL omeg ! planet rotation rate (rad/s)
[1226]12
13      END MODULE comcstfi_h
Note: See TracBrowser for help on using the repository browser.