File |
Line number |
Procedure |
Code |
./model/src/diags_phi_hyd.F |
58 |
DIAGS_PHI_HYD |
_RL facP, dPhiRef |
./model/src/diags_phi_hyd.F |
83 |
DIAGS_PHI_HYD |
facP = pStarFacK(i,j,bi,bj) |
./model/src/diags_phi_hyd.F |
87 |
DIAGS_PHI_HYD |
& phiHydC(i,j)*facP |
./model/src/diags_phi_hyd.F |
88 |
DIAGS_PHI_HYD |
& + MAX( dPhiRef, 0. _d 0 )*( facP - 1. _d 0 ) |
./model/src/diags_phi_rlow.F |
145 |
DIAGS_PHI_RLOW |
facP = pStarFacK(i,j,bi,bj) |
./model/src/diags_phi_rlow.F |
149 |
DIAGS_PHI_RLOW |
& phiHydLow(i,j,bi,bj)*facP |
./model/src/diags_phi_rlow.F |
150 |
DIAGS_PHI_RLOW |
& + MAX( dPhiRef, zeroRL )*( facP - 1. _d 0 ) |
./model/src/diags_phi_rlow.F |
64 |
DIAGS_PHI_RLOW |
_RL facP, dPhiRef |