4 |
#ifdef ALLOW_AIM |
#ifdef ALLOW_AIM |
5 |
|
|
6 |
C-- COMMON /PHYCON/: Physical constants (initial. in INPHYS) |
C-- COMMON /PHYCON/: Physical constants (initial. in INPHYS) |
7 |
C P0 = reference pressure |
C P0 = reference pressure [Pa=N/m2] |
8 |
C GG = gravity accel. |
C GG = gravity accel. [m/s2] |
9 |
C RD = gas constant for dry air |
C RD = gas constant for dry air [J/kg/K] |
10 |
C CP = specific heat at constant pressure |
C CP = specific heat at constant pressure [J/kg/K] |
11 |
C ALHC = latent heat of condensation |
C ALHC = latent heat of condensation [J/g] |
12 |
C SBC = Stefan-Boltzmann constant |
C ALHF = latent heat of freezing [J/g] |
13 |
COMMON /PHYCON/ P0, GG, RD, CP, ALHC, SBC |
C SBC = Stefan-Boltzmann constant |
14 |
_RL P0, GG, RD, CP, ALHC, SBC |
C rainCP = heat capacity of liquid water [J/g/K] |
15 |
|
C tFreeze = freezing temperature of pure water [K] |
16 |
|
COMMON /PHYCON/ P0, GG, RD, CP, ALHC, ALHF, SBC, rainCP, tFreeze |
17 |
|
_RL P0, GG, RD, CP, ALHC, ALHF, SBC, rainCP, tFreeze |
18 |
|
|
19 |
C-- COMMON /FSIGLT/: Functions of sigma and latitude (initial. in INPHYS) |
C-- COMMON /FSIGLT/: Functions of sigma and latitude (initial. in INPHYS) |
20 |
C (execpt SLAT & CLAT init. in aim_dyn2aim.F) |
C (execpt SLAT & CLAT init. in aim_dyn2aim.F) |