File |
Line number |
Procedure |
Code |
./pkg/generic_advdiff/gad_advection.F |
134 |
GAD_ADVECTION |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/generic_advdiff/gad_advection.F |
281 |
GAD_ADVECTION |
xA(i,j) = _dyG(i,j,bi,bj)*deepFacC(k) |
./pkg/generic_advdiff/gad_advection.F |
291 |
GAD_ADVECTION |
uTrans(i,j) = uFld(i,j,k)*xA(i,j)*rhoFacC(k) |
./pkg/generic_advdiff/gad_biharm_x.F |
12 |
GAD_BIHARM_X |
I xA,del2T,diffK4, |
./pkg/generic_advdiff/gad_biharm_x.F |
36 |
GAD_BIHARM_X |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/generic_advdiff/gad_biharm_x.F |
55 |
GAD_BIHARM_X |
dfx(i,j) = dfx(i,j) + diffK4*xA(i,j) |
./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 |
202 |
GAD_CALC_RHS |
CALL GAD_GRAD_X(bi,bj,k,xA,localT,fZon,myThid) |
./pkg/generic_advdiff/gad_calc_rhs.F |
300 |
GAD_CALC_RHS |
CALL GAD_DIFF_X(bi,bj,k,xA,diffKh,localT,df,myThid) |
./pkg/generic_advdiff/gad_calc_rhs.F |
311 |
GAD_CALC_RHS |
CALL GAD_BIHARM_X(bi,bj,k,xA,df4,diffK4,df,myThid) |
./pkg/generic_advdiff/gad_calc_rhs.F |
319 |
GAD_CALC_RHS |
I xA, TracerN, |
./pkg/generic_advdiff/gad_calc_rhs.F |
90 |
GAD_CALC_RHS |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/generic_advdiff/gad_diff_x.F |
12 |
GAD_DIFF_X |
I xA, diffKh, |
./pkg/generic_advdiff/gad_diff_x.F |
37 |
GAD_DIFF_X |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/generic_advdiff/gad_diff_x.F |
54 |
GAD_DIFF_X |
dfx(i,j) = -diffKh*xA(i,j) |
./pkg/generic_advdiff/gad_grad_x.F |
12 |
GAD_GRAD_X |
I xA, |
./pkg/generic_advdiff/gad_grad_x.F |
33 |
GAD_GRAD_X |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/generic_advdiff/gad_grad_x.F |
62 |
GAD_GRAD_X |
dTdx(i,j) = xA(i,j) |
./pkg/generic_advdiff/gad_som_advect.F |
246 |
GAD_SOM_ADVECT |
xA(i,j) = _dyG(i,j,bi,bj)*deepFacC(k) |
./pkg/generic_advdiff/gad_som_advect.F |
256 |
GAD_SOM_ADVECT |
uTrans(i,j) = uFld(i,j,k)*xA(i,j)*rhoFacC(k) |
./pkg/generic_advdiff/gad_som_advect.F |
95 |
GAD_SOM_ADVECT |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/ggl90/ggl90_calc.F |
121 |
GGL90_CALC |
_RL xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/ggl90/ggl90_calc.F |
198 |
GGL90_CALC |
xA(i,j) = 0. _d 0 |
./pkg/ggl90/ggl90_calc.F |
373 |
GGL90_CALC |
xA(i,j) = _dyG(i,j,bi,bj)*drC(k)* |
./pkg/ggl90/ggl90_calc.F |
386 |
GGL90_CALC |
dfx(i,j) = -GGL90diffTKEh*xA(i,j) |
./pkg/gmredi/gmredi_xtransport.F |
129 |
GMREDI_XTRANSPORT |
& -xA(i,j) |
./pkg/gmredi/gmredi_xtransport.F |
179 |
GMREDI_XTRANSPORT |
df(i,j) = df(i,j) - xA(i,j)*Kuz(i,j,k,bi,bj)*dTdz(i,j) |
./pkg/gmredi/gmredi_xtransport.F |
18 |
GMREDI_XTRANSPORT |
I xA, Tracer, |
./pkg/gmredi/gmredi_xtransport.F |
63 |
GMREDI_XTRANSPORT |
_RS xA(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./model/src/calc_adv_flow.F |
110 |
CALC_ADV_FLOW |
uTrans(i,j) = uFld(i,j,k)*xA(i,j)*rhoFacC(k) |
./model/src/calc_adv_flow.F |
14 |
CALC_ADV_FLOW |
O maskUp, xA, yA, |
./model/src/calc_adv_flow.F |
61 |
CALC_ADV_FLOW |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./model/src/calc_adv_flow.F |
75 |
CALC_ADV_FLOW |
xA(i,j) = _dyG(i,j,bi,bj)*deepFacC(k) |
./model/src/calc_div_ghat.F |
117 |
CALC_DIV_GHAT |
& ) * xA(i,j) / deltaTMom |
./model/src/calc_div_ghat.F |
59 |
CALC_DIV_GHAT |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./model/src/calc_div_ghat.F |
67 |
CALC_DIV_GHAT |
xA(i,j) = _dyG(i,j,bi,bj)*deepFacC(k) |
./model/src/calc_div_ghat.F |
83 |
CALC_DIV_GHAT |
pf(i,j) = xA(i,j)*gU(i,j,k,bi,bj) / deltaTMom |
./model/src/calc_div_ghat.F |
92 |
CALC_DIV_GHAT |
& *xA(i,j)*gU(i,j,k,bi,bj) / deltaTMom |
./model/src/calc_gw.F |
103 |
CALC_GW |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./model/src/calc_gw.F |
222 |
CALC_GW |
xA(i,j) = _dyG(i,j,bi,bj)*rThickC_W(i,j) |
./model/src/calc_gw.F |
269 |
CALC_GW |
xA(i,j) = _dyG(i,j,bi,bj)*rThickC_W(i,j) |
./model/src/calc_gw.F |
315 |
CALC_GW |
& *_recip_dxC(i,j,bi,bj)*xA(i,j) |
./model/src/calc_gw.F |
370 |
CALC_GW |
& *_recip_dxC(i,j,bi,bj)*xA(i,j) |
./model/src/calc_gw.F |
374 |
CALC_GW |
& *_recip_dxC(i,j,bi,bj)*xA(i,j) |
./pkg/mom_fluxform/mom_fluxform.F |
136 |
MOM_FLUXFORM |
_RS xA(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/mom_fluxform/mom_fluxform.F |
271 |
MOM_FLUXFORM |
xA(i,j) = _dyG(i,j,bi,bj)*deepFacC(k) |
./pkg/mom_fluxform/mom_fluxform.F |
303 |
MOM_FLUXFORM |
uTrans(i,j) = uFld(i,j)*xA(i,j)*rhoFacC(k) |
./pkg/ptracers/ptracers_integrate.F |
100 |
PTRACERS_INTEGRATE |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/ptracers/ptracers_integrate.F |
290 |
PTRACERS_INTEGRATE |
O maskUp, xA, yA, |
./pkg/ptracers/ptracers_integrate.F |
315 |
PTRACERS_INTEGRATE |
I xA, yA, maskUp, uFld(1-OLx,1-OLy,k), |
./pkg/seaice/seaice_advdiff.F |
102 |
SEAICE_ADVDIFF |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/seaice/seaice_advdiff.F |
128 |
SEAICE_ADVDIFF |
xA(i,j,bi,bj) = _dyG(i,j,bi,bj)*_maskW(i,j,ks,bi,bj) |
./pkg/seaice/seaice_advdiff.F |
207 |
SEAICE_ADVDIFF |
uTrans(i,j) = uc(i,j,bi,bj)*xA(i,j,bi,bj) |
./pkg/seaice/seaice_advdiff.F |
233 |
SEAICE_ADVDIFF |
I xA(1-OLx,1-OLy,bi,bj), yA(1-OLx,1-OLy,bi,bj), |
./pkg/seaice/seaice_advdiff.F |
276 |
SEAICE_ADVDIFF |
I xA(1-OLx,1-OLy,bi,bj), yA(1-OLx,1-OLy,bi,bj), |
./pkg/seaice/seaice_advdiff.F |
307 |
SEAICE_ADVDIFF |
I xA(1-OLx,1-OLy,bi,bj), yA(1-OLx,1-OLy,bi,bj), |
./pkg/seaice/seaice_advdiff.F |
343 |
SEAICE_ADVDIFF |
I xA(1-OLx,1-OLy,bi,bj), yA(1-OLx,1-OLy,bi,bj), |
./pkg/seaice/seaice_advdiff.F |
386 |
SEAICE_ADVDIFF |
I xA(1-OLx,1-OLy,bi,bj), yA(1-OLx,1-OLy,bi,bj), |
./pkg/seaice/seaice_advdiff.F |
452 |
SEAICE_ADVDIFF |
I xA(1-OLx,1-OLy,bi,bj), yA(1-OLx,1-OLy,bi,bj), |
./pkg/seaice/seaice_advdiff.F |
574 |
SEAICE_ADVDIFF |
I xA(1-OLx,1-OLy,bi,bj), yA(1-OLx,1-OLy,bi,bj), |
./pkg/seaice/seaice_advdiff.F |
617 |
SEAICE_ADVDIFF |
I xA(1-OLx,1-OLy,bi,bj), yA(1-OLx,1-OLy,bi,bj), |
./pkg/seaice/seaice_advdiff.F |
643 |
SEAICE_ADVDIFF |
I xA(1-OLx,1-OLy,bi,bj), yA(1-OLx,1-OLy,bi,bj), |
./pkg/seaice/seaice_advdiff.F |
675 |
SEAICE_ADVDIFF |
I xA(1-OLx,1-OLy,bi,bj), yA(1-OLx,1-OLy,bi,bj), |
./pkg/seaice/seaice_advdiff.F |
719 |
SEAICE_ADVDIFF |
I xA(1-OLx,1-OLy,bi,bj), yA(1-OLx,1-OLy,bi,bj), |
./pkg/seaice/seaice_diffusion.F |
15 |
SEAICE_DIFFUSION |
I iceFld, iceMask, xA, yA, |
./pkg/seaice/seaice_diffusion.F |
50 |
SEAICE_DIFFUSION |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/seaice/seaice_diffusion.F |
88 |
SEAICE_DIFFUSION |
CALL GAD_DIFF_X(bi,bj,k,xA,diffKh,iceFld,fZon,myThid) |
./pkg/smooth/smooth_rhs.F |
114 |
SMOOTH_RHS |
& -xA(i,j,bi,bj) |
./pkg/smooth/smooth_rhs.F |
137 |
SMOOTH_RHS |
& - xA(i,j,bi,bj)*smooth3D_Kuz(i,j,k,bi,bj)*dTdz(bi,bj) |
./pkg/smooth/smooth_rhs.F |
158 |
SMOOTH_RHS |
& - xA(i,j,bi,bj)*smooth3D_Kuy(i,j,k,bi,bj)*dTdy(bi,bj) |
./pkg/smooth/smooth_rhs.F |
55 |
SMOOTH_RHS |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/smooth/smooth_rhs.F |
96 |
SMOOTH_RHS |
xA(i,j,bi,bj) = _dyG(i,j,bi,bj) |
./model/src/salt_integrate.F |
122 |
SALT_INTEGRATE |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./model/src/salt_integrate.F |
317 |
SALT_INTEGRATE |
O maskUp, xA, yA, |
./model/src/salt_integrate.F |
343 |
SALT_INTEGRATE |
I xA, yA, maskUp, uFld(1-OLx,1-OLy,k), |
./model/src/salt_integrate.F |
358 |
SALT_INTEGRATE |
I xA, yA, maskUp, uFld(1-OLx,1-OLy,k), |
./model/src/temp_integrate.F |
126 |
TEMP_INTEGRATE |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./model/src/temp_integrate.F |
325 |
TEMP_INTEGRATE |
O maskUp, xA, yA, |
./model/src/temp_integrate.F |
351 |
TEMP_INTEGRATE |
I xA, yA, maskUp, uFld(1-OLx,1-OLy,k), |
./model/src/temp_integrate.F |
366 |
TEMP_INTEGRATE |
I xA, yA, maskUp, uFld(1-OLx,1-OLy,k), |