| File |
Line number |
Procedure |
Code |
|
./model/src/calc_phi_hyd.F |
390 |
CALC_PHI_HYD |
ddPIm=atm_Cp*( ((rF( k )/atm_Po)**atm_kappa) |
|
./model/src/calc_phi_hyd.F |
393 |
CALC_PHI_HYD |
ddPIm=atm_Cp*( ((rC(k-1)/atm_Po)**atm_kappa) |
|
./model/src/calc_phi_hyd.F |
406 |
CALC_PHI_HYD |
phiHydC(i,j) = phiHydF(i,j) +ddPIm*alphaRho(i,j) |
|
./model/src/calc_phi_hyd.F |
423 |
CALC_PHI_HYD |
ddPIm=atm_Cp*( ((rF( k )/atm_Po)**atm_kappa) |
|
./model/src/calc_phi_hyd.F |
435 |
CALC_PHI_HYD |
& *ddPIm*alphaRho(i,j) |
|
./model/src/calc_phi_hyd.F |
437 |
CALC_PHI_HYD |
phiHydC(i,j) = phiHydF(i,j) +ddPIm*alphaRho(i,j) |
|
./model/src/calc_phi_hyd.F |
456 |
CALC_PHI_HYD |
ddPIm=atm_Cp*( ((rF( k )/atm_Po)**atm_kappa) |
|
./model/src/calc_phi_hyd.F |
459 |
CALC_PHI_HYD |
ddPIm=atm_Cp*( ((rC(k-1)/atm_Po)**atm_kappa) |
|
./model/src/calc_phi_hyd.F |
478 |
CALC_PHI_HYD |
phiHydC(i,j) =( MAX(zero,ddRloc)*rec_dRm*ddPIm |
|
./model/src/calc_phi_hyd.F |
482 |
CALC_PHI_HYD |
phiHydC(i,j) = phiHydF(i,j) +ddPIm*alphaRho(i,j) |
|
./model/src/calc_phi_hyd.F |
84 |
CALC_PHI_HYD |
_RL ddPIm, ddPIp, rec_dRm, rec_dRp |