| File |
Line number |
Procedure |
Code |
|
./pkg/gmredi/gmredi_residual_flow.F |
106 |
GMREDI_RESIDUAL_FLOW |
delPsi = GM_PsiX(i,j,kp1,bi,bj)*maskp1 |
|
./pkg/gmredi/gmredi_residual_flow.F |
108 |
GMREDI_RESIDUAL_FLOW |
ustar = delPsi*recip_drF(k)*_recip_hFacW(i,j,k,bi,bj) |
|
./pkg/gmredi/gmredi_residual_flow.F |
114 |
GMREDI_RESIDUAL_FLOW |
delPsi = GM_PsiY(i,j,kp1,bi,bj)*maskp1 |
|
./pkg/gmredi/gmredi_residual_flow.F |
116 |
GMREDI_RESIDUAL_FLOW |
vstar = delPsi*recip_drF(k)*_recip_hFacS(i,j,k,bi,bj) |
|
./pkg/gmredi/gmredi_residual_flow.F |
51 |
GMREDI_RESIDUAL_FLOW |
_RL delPsi |
|
./pkg/gmredi/gmredi_residual_flow.F |
67 |
GMREDI_RESIDUAL_FLOW |
delPsi = GM_PsiX(i,j,kp1,bi,bj)*maskp1 |
|
./pkg/gmredi/gmredi_residual_flow.F |
70 |
GMREDI_RESIDUAL_FLOW |
& + delPsi*recip_drF(k)*_recip_hFacW(i,j,k,bi,bj) |
|
./pkg/gmredi/gmredi_residual_flow.F |
75 |
GMREDI_RESIDUAL_FLOW |
delPsi = GM_PsiY(i,j,kp1,bi,bj)*maskp1 |
|
./pkg/gmredi/gmredi_residual_flow.F |
78 |
GMREDI_RESIDUAL_FLOW |
& + delPsi*recip_drF(k)*_recip_hFacS(i,j,k,bi,bj) |
|
./pkg/gmredi/gmredi_residual_flow.F |
83 |
GMREDI_RESIDUAL_FLOW |
delPsi = ( dyG(i+1,j,bi,bj)*GM_PsiX(i+1,j,k,bi,bj) |
|
./pkg/gmredi/gmredi_residual_flow.F |
88 |
GMREDI_RESIDUAL_FLOW |
wFld(i,j,k) = wFld(i,j,k) + delPsi*recip_rA(i,j,bi,bj) |
|
./pkg/layers/layers_fluxcalc.F |
115 |
LAYERS_FLUXCALC |
_RL delPsi, maskp1 |
|
./pkg/layers/layers_fluxcalc.F |
226 |
LAYERS_FLUXCALC |
delPsi = 0.25 _d 0 *( |
|
./pkg/layers/layers_fluxcalc.F |
236 |
LAYERS_FLUXCALC |
delPsi = GM_PsiX(i,j,kcip1,bi,bj)*maskp1 |
|
./pkg/layers/layers_fluxcalc.F |
241 |
LAYERS_FLUXCALC |
& + delPsi*recip_drF(kci)*_recip_hFacW(i,j,kci,bi,bj) |
|
./pkg/layers/layers_fluxcalc.F |
315 |
LAYERS_FLUXCALC |
delPsi = 0.25 _d 0 *( |
|
./pkg/layers/layers_fluxcalc.F |
325 |
LAYERS_FLUXCALC |
delPsi = GM_PsiY(i,j,kcip1,bi,bj)*maskp1 |
|
./pkg/layers/layers_fluxcalc.F |
330 |
LAYERS_FLUXCALC |
& + delPsi*recip_drF(kci)*_recip_hFacS(i,j,kci,bi,bj) |