File |
Line number |
Procedure |
Code |
./model/src/ini_p_ground.F |
134 |
INI_P_GROUND |
PiHvR(1) = atm_Cp*(pLevHvR(1)**atm_kappa) |
./model/src/ini_p_ground.F |
137 |
INI_P_GROUND |
PiHvR(k+1) = atm_Cp*(pLevHvR(k+1)**atm_kappa) |
./model/src/ini_p_ground.F |
139 |
INI_P_GROUND |
dPiHvR(k) = PiHvR(k) - PiHvR(k+1) |
./model/src/ini_p_ground.F |
193 |
INI_P_GROUND |
PiLoc = PiHvR(k) |
./model/src/ini_p_ground.F |
339 |
INI_P_GROUND |
dzLoc = ( PiHvR(kLev)-atm_Cp*(psNorm**atm_kappa) ) |
./model/src/ini_p_ground.F |
70 |
INI_P_GROUND |
_RL thetaHvR(nLevHvR), PiHvR(nLevHvR+1), dPiHvR(nLevHvR) |