| File |
Line number |
Procedure |
Code |
|
./model/src/calc_grad_phi_hyd.F |
105 |
CALC_GRAD_PHI_HYD |
varLoc(i,j) = phiHydC(i,j) |
|
./model/src/calc_grad_phi_hyd.F |
122 |
CALC_GRAD_PHI_HYD |
varLoc(i,j) = phiHydC(i,j) |
|
./model/src/calc_grad_phi_hyd.F |
12 |
CALC_GRAD_PHI_HYD |
I phiHydC, alphRho, tFld, sFld, |
|
./model/src/calc_grad_phi_hyd.F |
137 |
CALC_GRAD_PHI_HYD |
varLoc(i,j) = phiHydC(i,j)+phi0surf(i,j,bi,bj) |
|
./model/src/calc_grad_phi_hyd.F |
46 |
CALC_GRAD_PHI_HYD |
_RL phiHydC(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/calc_grad_phi_hyd.F |
78 |
CALC_GRAD_PHI_HYD |
varLoc(i,j) = phiHydC(i,j)*pStarFacK(i,j,bi,bj) |
|
./model/src/calc_grad_phi_hyd.F |
85 |
CALC_GRAD_PHI_HYD |
varLoc(i,j) = phiHydC(i,j)*rStarFacC(i,j,bi,bj) |
|
./model/src/calc_phi_hyd.F |
17 |
CALC_PHI_HYD |
O phiHydC, dPhiHydX, dPhiHydY, |
|
./model/src/calc_phi_hyd.F |
231 |
CALC_PHI_HYD |
phiHydC(i,j) = phiHydF(i,j) |
|
./model/src/calc_phi_hyd.F |
245 |
CALC_PHI_HYD |
phiHydC(i,j) = ddRloc*gravity*alphaRho(i,j)*recip_rhoConst |
|
./model/src/calc_phi_hyd.F |
247 |
CALC_PHI_HYD |
phiHydC(i,j) = phiHydF(i,j) |
|
./model/src/calc_phi_hyd.F |
250 |
CALC_PHI_HYD |
phiHydF(i,j) = phiHydC(i,j) |
|
./model/src/calc_phi_hyd.F |
272 |
CALC_PHI_HYD |
phiHydC(i,j) = phiHydF(i,j) |
|
./model/src/calc_phi_hyd.F |
274 |
CALC_PHI_HYD |
phiHydF(i,j) = phiHydC(i,j) |
|
./model/src/calc_phi_hyd.F |
288 |
CALC_PHI_HYD |
phiHydC(i,j) =( MAX(zeroRL,ddRloc)*rec_dRm*dRlocM |
|
./model/src/calc_phi_hyd.F |
292 |
CALC_PHI_HYD |
phiHydC(i,j) = phiHydF(i,j) |
|
./model/src/calc_phi_hyd.F |
295 |
CALC_PHI_HYD |
phiHydF(i,j) = phiHydC(i,j) |
|
./model/src/calc_phi_hyd.F |
373 |
CALC_PHI_HYD |
phiHydC(i,j) = ddRloc*alphaRho(i,j) |
|
./model/src/calc_phi_hyd.F |
380 |
CALC_PHI_HYD |
phiHydC(i,j) = phiHydF(i,j) + halfRL*drF(k)*alphaRho(i,j) |
|
./model/src/calc_phi_hyd.F |
384 |
CALC_PHI_HYD |
phiHydF(i,j) = phiHydC(i,j) + halfRL*drF(k)*alphaRho(i,j) |
|
./model/src/calc_phi_hyd.F |
412 |
CALC_PHI_HYD |
phiHydC(i,j) =( MAX(zeroRL,ddRloc)*rec_dRm*dRlocM |
|
./model/src/calc_phi_hyd.F |
416 |
CALC_PHI_HYD |
phiHydC(i,j) = phiHydF(i,j) + dRlocM*alphaRho(i,j) |
|
./model/src/calc_phi_hyd.F |
418 |
CALC_PHI_HYD |
phiHydF(i,j) = phiHydC(i,j) + dRlocP*alphaRho(i,j) |
|
./model/src/calc_phi_hyd.F |
487 |
CALC_PHI_HYD |
phiHydC(i,j) = phiHydF(i,j) |
|
./model/src/calc_phi_hyd.F |
523 |
CALC_PHI_HYD |
phiHydC(i,j) = phiHydF(i,j) +ddPIm*alphaRho(i,j) |
|
./model/src/calc_phi_hyd.F |
524 |
CALC_PHI_HYD |
phiHydF(i,j) = phiHydC(i,j) +ddPIp*alphaRho(i,j) |
|
./model/src/calc_phi_hyd.F |
551 |
CALC_PHI_HYD |
phiHydC(i,j) = ddRloc*recip_drF(k)*2. _d 0 |
|
./model/src/calc_phi_hyd.F |
554 |
CALC_PHI_HYD |
phiHydC(i,j) = phiHydF(i,j) +ddPIm*alphaRho(i,j) |
|
./model/src/calc_phi_hyd.F |
556 |
CALC_PHI_HYD |
phiHydF(i,j) = phiHydC(i,j) +ddPIp*alphaRho(i,j) |
|
./model/src/calc_phi_hyd.F |
595 |
CALC_PHI_HYD |
phiHydC(i,j) =( MAX(zeroRL,ddRloc)*rec_dRm*ddPIm |
|
./model/src/calc_phi_hyd.F |
599 |
CALC_PHI_HYD |
phiHydC(i,j) = phiHydF(i,j) +ddPIm*alphaRho(i,j) |
|
./model/src/calc_phi_hyd.F |
601 |
CALC_PHI_HYD |
phiHydF(i,j) = phiHydC(i,j) +ddPIp*alphaRho(i,j) |
|
./model/src/calc_phi_hyd.F |
622 |
CALC_PHI_HYD |
I phiHydC, alphaRho, tFld, sFld, |
|
./model/src/calc_phi_hyd.F |
658 |
CALC_PHI_HYD |
I phiHydF, phiHydC, alphaRho, tFld, sFld, |
|
./model/src/calc_phi_hyd.F |
665 |
CALC_PHI_HYD |
I phiHydC, |
|
./model/src/calc_phi_hyd.F |
72 |
CALC_PHI_HYD |
_RL phiHydC(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/diags_phi_hyd.F |
102 |
DIAGS_PHI_HYD |
& phiHydC(i,j)*rStarFacC(i,j,bi,bj) |
|
./model/src/diags_phi_hyd.F |
114 |
DIAGS_PHI_HYD |
& phiHydC(i,j)*rStarFacC(i,j,bi,bj) |
|
./model/src/diags_phi_hyd.F |
12 |
DIAGS_PHI_HYD |
I phiHydC, |
|
./model/src/diags_phi_hyd.F |
45 |
DIAGS_PHI_HYD |
_RL phiHydC(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/diags_phi_hyd.F |
65 |
DIAGS_PHI_HYD |
totPhiHyd(i,j,k,bi,bj) = phiHydC(i,j) |
|
./model/src/diags_phi_hyd.F |
87 |
DIAGS_PHI_HYD |
& phiHydC(i,j)*facP |
|
./model/src/diags_phi_rlow.F |
108 |
DIAGS_PHI_RLOW |
phiHydLow(i,j,bi,bj) = phiHydC(i,j) |
|
./model/src/diags_phi_rlow.F |
11 |
DIAGS_PHI_RLOW |
I phiHydF, phiHydC, alphRho, tFld, sFld, |
|
./model/src/diags_phi_rlow.F |
49 |
DIAGS_PHI_RLOW |
_RL phiHydC(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/diags_phi_rlow.F |
90 |
DIAGS_PHI_RLOW |
phiHydLow(i,j,bi,bj) = phiHydC(i,j) |
|
./model/src/dynamics.F |
146 |
DYNAMICS |
_RL phiHydC (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/dynamics.F |
318 |
DYNAMICS |
phiHydC (i,j) = 0. _d 0 |
|
./model/src/dynamics.F |
485 |
DYNAMICS |
O phiHydC, dPhiHydX, dPhiHydY, |
|
./model/src/ini_pressure.F |
118 |
INI_PRESSURE |
O phiHydC, dPhiHydX, dPhiHydY, |