| File |
Line number |
Procedure |
Code |
|
./model/src/calc_phi_hyd.F |
199 |
CALC_PHI_HYD |
dRlocP=rC(k)-rF(k+1) |
|
./model/src/calc_phi_hyd.F |
201 |
CALC_PHI_HYD |
dRlocP=half*drC(k+1) |
|
./model/src/calc_phi_hyd.F |
213 |
CALC_PHI_HYD |
& +dRlocP*gravity*alphaRho(i,j)*recip_rhoConst |
|
./model/src/calc_phi_hyd.F |
295 |
CALC_PHI_HYD |
dRlocP=rC(k)-rF(k+1) |
|
./model/src/calc_phi_hyd.F |
297 |
CALC_PHI_HYD |
dRlocP=half*drC(k+1) |
|
./model/src/calc_phi_hyd.F |
313 |
CALC_PHI_HYD |
& +MIN(zero,ddRloc)*rec_dRp*dRlocP |
|
./model/src/calc_phi_hyd.F |
318 |
CALC_PHI_HYD |
phiHydF(i,j) = phiHydC(i,j) + dRlocP*alphaRho(i,j) |
|
./model/src/calc_phi_hyd.F |
83 |
CALC_PHI_HYD |
_RL dRlocM,dRlocP, ddRloc, locAlpha |