File |
Line number |
Procedure |
Code |
./model/src/ini_p_ground.F |
235 |
INI_P_GROUND |
& thetaHvR, nLevHvR, mythid) |
./model/src/ini_p_ground.F |
240 |
INI_P_GROUND |
dzLoc = dPiHvR(k)*thetaHvR(k)*recip_gravity |
./model/src/ini_p_ground.F |
244 |
INI_P_GROUND |
& - gravity*(Hfld(i,j,bi,bj)-zLoc)/thetaHvR(k) |
./model/src/ini_p_ground.F |
377 |
INI_P_GROUND |
& thetaHvR, kLev, mythid) |
./model/src/ini_p_ground.F |
380 |
INI_P_GROUND |
dzLoc = dPiHvR(k)*thetaHvR(k)*recip_gravity |
./model/src/ini_p_ground.F |
384 |
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) |