File |
Line number |
Procedure |
Code |
./model/src/ini_p_ground.F |
185 |
INI_P_GROUND |
& thetaHvR, nLevHvR, myThid ) |
./model/src/ini_p_ground.F |
190 |
INI_P_GROUND |
dzLoc = dPiHvR(k)*thetaHvR(k)*recip_gravity |
./model/src/ini_p_ground.F |
194 |
INI_P_GROUND |
& - gravity*( phiLoc - zLoc )/thetaHvR(k) |
./model/src/ini_p_ground.F |
333 |
INI_P_GROUND |
& thetaHvR, kLev, myThid ) |
./model/src/ini_p_ground.F |
336 |
INI_P_GROUND |
dzLoc = dPiHvR(k)*thetaHvR(k)*recip_gravity |
./model/src/ini_p_ground.F |
340 |
INI_P_GROUND |
& * thetaHvR(kLev)*recip_gravity |
./model/src/ini_p_ground.F |
70 |
INI_P_GROUND |
_RL thetaHvR(nLevHvR), PiHvR(nLevHvR+1), dPiHvR(nLevHvR) |