File |
Line number |
Procedure |
Code |
./pkg/generic_advdiff/gad_calc_rhs.F |
12 |
GAD_CALC_RHS |
I xA, yA, maskUp, uFld, vFld, wFld, |
./pkg/generic_advdiff/gad_calc_rhs.F |
547 |
GAD_CALC_RHS |
fVerT(i,j,kUp) = fVerT(i,j,kUp) + df(i,j)*maskUp(i,j) |
./pkg/generic_advdiff/gad_calc_rhs.F |
595 |
GAD_CALC_RHS |
& + df(i,j)*maskUp(i,j)*rhoFacF(k) |
./pkg/generic_advdiff/gad_calc_rhs.F |
91 |
GAD_CALC_RHS |
_RS maskUp(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/generic_advdiff/gad_som_adv_r.F |
12 |
GAD_SOM_ADV_R |
I deltaTloc, rTrans, maskUp, |
./pkg/generic_advdiff/gad_som_adv_r.F |
187 |
GAD_SOM_ADV_R |
wLoc = maskUp(i,j)*rTrans(i,j)*deltaTloc |
./pkg/generic_advdiff/gad_som_adv_r.F |
57 |
GAD_SOM_ADV_R |
_RS maskUp(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/generic_advdiff/gad_som_advect.F |
551 |
GAD_SOM_ADVECT |
maskUp(i,j) = 0. |
./pkg/generic_advdiff/gad_som_advect.F |
563 |
GAD_SOM_ADVECT |
maskUp(i,j) = 1. |
./pkg/generic_advdiff/gad_som_advect.F |
575 |
GAD_SOM_ADVECT |
maskUp(i,j) = maskC(i,j,km1,bi,bj)*maskC(i,j,k,bi,bj) |
./pkg/generic_advdiff/gad_som_advect.F |
595 |
GAD_SOM_ADVECT |
I deltaTLev(k), rTrans, maskUp, |
./pkg/generic_advdiff/gad_som_advect.F |
96 |
GAD_SOM_ADVECT |
_RS maskUp (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/longstep/longstep_thermodynamics.F |
109 |
LONGSTEP_THERMODYNAMICS |
_RS maskUp (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/longstep/longstep_thermodynamics.F |
337 |
LONGSTEP_THERMODYNAMICS |
maskUp(i,j) = 0. _d 0 |
./pkg/longstep/longstep_thermodynamics.F |
347 |
LONGSTEP_THERMODYNAMICS |
maskUp(i,j) = maskC(i,j,k-1,bi,bj)*maskC(i,j,k,bi,bj) |
./pkg/longstep/longstep_thermodynamics.F |
348 |
LONGSTEP_THERMODYNAMICS |
rTrans(i,j) = wFld(i,j)*rA(i,j,bi,bj)*maskUp(i,j) |
./pkg/longstep/longstep_thermodynamics.F |
416 |
LONGSTEP_THERMODYNAMICS |
I maskUp, |
./pkg/longstep/longstep_thermodynamics.F |
425 |
LONGSTEP_THERMODYNAMICS |
I xA, yA, maskUp, uFld, vFld, wFld, |
./model/src/calc_diffusivity.F |
12 |
CALC_DIFFUSIVITY |
I maskUp, |
./model/src/calc_diffusivity.F |
181 |
CALC_DIFFUSIVITY |
KappaRT(i,j) = maskUp(i,j)*KappaRT(i,j) |
./model/src/calc_diffusivity.F |
182 |
CALC_DIFFUSIVITY |
KappaRS(i,j) = maskUp(i,j)*KappaRS(i,j) |
./model/src/calc_diffusivity.F |
50 |
CALC_DIFFUSIVITY |
_RS maskUp(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/calc_gs.F |
12 |
CALC_GS |
I xA, yA, maskUp, uFld, vFld, wFld, |
./model/src/calc_gs.F |
164 |
CALC_GS |
I xA, yA, maskUp, uFld, vFld, wFld, |
./model/src/calc_gs.F |
176 |
CALC_GS |
I xA, yA, maskUp, uFld, vFld, wFld, |
./model/src/calc_gs.F |
90 |
CALC_GS |
_RS maskUp (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./model/src/calc_gt.F |
12 |
CALC_GT |
I xA, yA, maskUp, uFld, vFld, wFld, |
./model/src/calc_gt.F |
163 |
CALC_GT |
I xA, yA, maskUp, uFld, vFld, wFld, |
./model/src/calc_gt.F |
175 |
CALC_GT |
I xA, yA, maskUp, uFld, vFld, wFld, |
./model/src/calc_gt.F |
89 |
CALC_GT |
_RS maskUp (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/ptracers/ptracers_calc_diff.F |
11 |
PTRACERS_CALC_DIFF |
I maskUp, |
./pkg/ptracers/ptracers_calc_diff.F |
151 |
PTRACERS_CALC_DIFF |
KappaRtr(i,j,iTr) = maskUp(i,j)*KappaRtr(i,j,iTr) |
./pkg/ptracers/ptracers_calc_diff.F |
51 |
PTRACERS_CALC_DIFF |
_RS maskUp(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/ptracers/ptracers_integrate.F |
12 |
PTRACERS_INTEGRATE |
I xA, yA, maskUp, uFld, vFld, wFld, |
./pkg/ptracers/ptracers_integrate.F |
139 |
PTRACERS_INTEGRATE |
I xA, yA, maskUp, uFld, vFld, wFld, |
./pkg/ptracers/ptracers_integrate.F |
60 |
PTRACERS_INTEGRATE |
_RS maskUp (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/shelfice/shelfice_u_drag.F |
55 |
SHELFICE_U_DRAG |
_RL rdrckp1,maskUp |
./pkg/shelfice/shelfice_u_drag.F |
74 |
SHELFICE_U_DRAG |
maskUp=_maskW(i,j,kUp,bi,bj) |
./pkg/shelfice/shelfice_u_drag.F |
81 |
SHELFICE_U_DRAG |
& )*(1.-maskUp)*uFld(i,j) |
./pkg/shelfice/shelfice_u_drag.F |
86 |
SHELFICE_U_DRAG |
& *(1.-maskUp)*uFld(i,j) |
./pkg/shelfice/shelfice_v_drag.F |
55 |
SHELFICE_V_DRAG |
_RL rdrckp1,maskUp |
./pkg/shelfice/shelfice_v_drag.F |
74 |
SHELFICE_V_DRAG |
maskUp=_maskS(i,j,kUp,bi,bj) |
./pkg/shelfice/shelfice_v_drag.F |
81 |
SHELFICE_V_DRAG |
& )*(1.-maskUp)*vFld(i,j) |
./pkg/shelfice/shelfice_v_drag.F |
86 |
SHELFICE_V_DRAG |
& *(1.-maskUp)*vFld(i,j) |
./pkg/smooth/smooth_rhs.F |
105 |
SMOOTH_RHS |
maskUp(i,j,bi,bj) = 0. |
./pkg/smooth/smooth_rhs.F |
107 |
SMOOTH_RHS |
maskUp(i,j,bi,bj) = |
./pkg/smooth/smooth_rhs.F |
319 |
SMOOTH_RHS |
& df(i,j,bi,bj)*maskUp(i,j,bi,bj) |
./pkg/smooth/smooth_rhs.F |
58 |
SMOOTH_RHS |
_RS maskUp(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./model/src/thermodynamics.F |
167 |
THERMODYNAMICS |
_RS maskUp (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./model/src/thermodynamics.F |
508 |
THERMODYNAMICS |
maskUp(i,j) = 0. _d 0 |
./model/src/thermodynamics.F |
518 |
THERMODYNAMICS |
maskUp(i,j) = maskC(i,j,k-1,bi,bj)*maskC(i,j,k,bi,bj) |
./model/src/thermodynamics.F |
519 |
THERMODYNAMICS |
rTrans(i,j) = wFld(i,j)*rA(i,j,bi,bj)*maskUp(i,j) |
./model/src/thermodynamics.F |
554 |
THERMODYNAMICS |
I maskUp, |
./model/src/thermodynamics.F |
626 |
THERMODYNAMICS |
I xA, yA, maskUp, uFld, vFld, wFld, |
./model/src/thermodynamics.F |
676 |
THERMODYNAMICS |
I xA, yA, maskUp, uFld, vFld, wFld, |
./model/src/thermodynamics.F |
706 |
THERMODYNAMICS |
I maskUp, |
./model/src/thermodynamics.F |
715 |
THERMODYNAMICS |
I xA, yA, maskUp, uFld, vFld, wFld, |