File |
Line number |
Procedure |
Code |
./model/src/correction_step.F |
107 |
CORRECTION_STEP |
& psFac*phiSurfX(i,j) |
./model/src/correction_step.F |
120 |
CORRECTION_STEP |
& psFac*phiSurfY(i,j) |
./model/src/correction_step.F |
58 |
CORRECTION_STEP |
_RL psFac, nhFac |
./model/src/correction_step.F |
70 |
CORRECTION_STEP |
psFac = pfFacMom*implicSurfPress |
./model/src/correction_step.F |
76 |
CORRECTION_STEP |
& -psFac*dU_psFacX(i,j,k,bi,bj)*phiSurfX(i,j) |
./model/src/correction_step.F |
85 |
CORRECTION_STEP |
& -psFac*dV_psFacY(i,j,k,bi,bj)*phiSurfY(i,j) |
./model/src/correction_step.F |
94 |
CORRECTION_STEP |
psFac = pfFacMom*implicSurfPress |
./model/src/timestep.F |
363 |
TIMESTEP |
& - psFac*phiSurfX(i,j) |
./model/src/timestep.F |
375 |
TIMESTEP |
& - psFac*phiSurfY(i,j) |
./model/src/timestep.F |
64 |
TIMESTEP |
_RL phxFac,phyFac, psFac |
./model/src/timestep.F |
81 |
TIMESTEP |
psFac = pfFacMom*(1. _d 0 - implicSurfPress) |