| File |
Line number |
Procedure |
Code |
|
./model/src/calc_grad_phi_hyd.F |
101 |
CALC_GRAD_PHI_HYD |
varLoc(i,j) = factPI*alphRho(i,j) |
|
./model/src/calc_grad_phi_hyd.F |
104 |
CALC_GRAD_PHI_HYD |
factPI = (rC(k)/Ro_surf(i,j,bi,bj))**atm_kappa |
|
./model/src/calc_grad_phi_hyd.F |
106 |
CALC_GRAD_PHI_HYD |
& *(pStarFacK(i,j,bi,bj) - factPI) |
|
./model/src/calc_grad_phi_hyd.F |
107 |
CALC_GRAD_PHI_HYD |
& /(1. _d 0 -factPI) |
|
./model/src/calc_grad_phi_hyd.F |
63 |
CALC_GRAD_PHI_HYD |
_RL factorZ, factorP, factPI |
|
./model/src/calc_grad_phi_hyd.F |
98 |
CALC_GRAD_PHI_HYD |
factPI=atm_Cp*( ((etaH(i,j,bi,bj)+rC(k))/atm_Po)**atm_kappa |