File |
Line number |
Procedure |
Code |
./model/src/ini_p_ground.F |
184 |
INI_P_GROUND |
& thetaHvR, nLevHvR, mythid) |
./model/src/ini_p_ground.F |
189 |
INI_P_GROUND |
dzLoc = dPiHvR(k)*thetaHvR(k)*recip_gravity |
./model/src/ini_p_ground.F |
193 |
INI_P_GROUND |
& - gravity*(Hfld(i,j,bi,bj)-zLoc)/thetaHvR(k) |
./model/src/ini_p_ground.F |
332 |
INI_P_GROUND |
& thetaHvR, kLev, mythid) |
./model/src/ini_p_ground.F |
335 |
INI_P_GROUND |
dzLoc = dPiHvR(k)*thetaHvR(k)*recip_gravity |
./model/src/ini_p_ground.F |
339 |
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) |