File |
Line number |
Procedure |
Code |
./pkg/generic_advdiff/gad_advection.F |
125 |
GAD_ADVECTION |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/generic_advdiff/gad_advection.F |
205 |
GAD_ADVECTION |
xA(i,j) = 0. _d 0 |
./pkg/generic_advdiff/gad_advection.F |
260 |
GAD_ADVECTION |
O uFld, vFld, uTrans, vTrans, xA, yA, |
./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 |
204 |
GAD_CALC_RHS |
CALL GAD_GRAD_X(bi,bj,k,xA,localT,fZon,myThid) |
./pkg/generic_advdiff/gad_calc_rhs.F |
274 |
GAD_CALC_RHS |
CALL GAD_DIFF_X(bi,bj,k,xA,diffKh,localT,df,myThid) |
./pkg/generic_advdiff/gad_calc_rhs.F |
285 |
GAD_CALC_RHS |
CALL GAD_BIHARM_X(bi,bj,k,xA,df4,diffK4,df,myThid) |
./pkg/generic_advdiff/gad_calc_rhs.F |
295 |
GAD_CALC_RHS |
I xA,TracerN,tracerIdentity, |
./pkg/generic_advdiff/gad_calc_rhs.F |
301 |
GAD_CALC_RHS |
I xA,TracAB, tracerIdentity, |
./pkg/generic_advdiff/gad_calc_rhs.F |
89 |
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 |
252 |
GAD_SOM_ADVECT |
O uFld, vFld, uTrans, vTrans, xA, yA, |
./pkg/generic_advdiff/gad_som_advect.F |
98 |
GAD_SOM_ADVECT |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/ggl90/ggl90_calc.F |
109 |
GGL90_CALC |
_RL xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/ggl90/ggl90_calc.F |
348 |
GGL90_CALC |
xA(i,j) = _dyG(i,j,bi,bj) |
./pkg/ggl90/ggl90_calc.F |
359 |
GGL90_CALC |
dfx(i,j) = -GGL90diffTKEh*xA(i,j) |
./pkg/gmredi/gmredi_xtransport.F |
107 |
GMREDI_XTRANSPORT |
& -xA(i,j) |
./pkg/gmredi/gmredi_xtransport.F |
158 |
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 |
40 |
GMREDI_XTRANSPORT |
_RS xA(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/gmredi/gmredi_xtransport.F |
8 |
GMREDI_XTRANSPORT |
I xA,Tracer,tracerIdentity, |
./pkg/longstep/longstep_thermodynamics.F |
100 |
LONGSTEP_THERMODYNAMICS |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/longstep/longstep_thermodynamics.F |
181 |
LONGSTEP_THERMODYNAMICS |
xA(i,j) = 0. _d 0 |
./pkg/longstep/longstep_thermodynamics.F |
328 |
LONGSTEP_THERMODYNAMICS |
O uFld, vFld, uTrans, vTrans, xA, yA, |
./pkg/longstep/longstep_thermodynamics.F |
425 |
LONGSTEP_THERMODYNAMICS |
I xA, yA, maskUp, uFld, vFld, wFld, |
./model/src/calc_common_factors.F |
11 |
CALC_COMMON_FACTORS |
O uFld, vFld, uTrans, vTrans, xA, yA, |
./model/src/calc_common_factors.F |
54 |
CALC_COMMON_FACTORS |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./model/src/calc_common_factors.F |
80 |
CALC_COMMON_FACTORS |
xA(i,j) = _dyG(i,j,bi,bj)*deepFacC(k) |
./model/src/calc_common_factors.F |
99 |
CALC_COMMON_FACTORS |
uTrans(i,j) = uFld(i,j)*xA(i,j)*rhoFacC(k) |
./model/src/calc_div_ghat.F |
114 |
CALC_DIV_GHAT |
& ) * xA(i,j) / deltaTmom |
./model/src/calc_div_ghat.F |
56 |
CALC_DIV_GHAT |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./model/src/calc_div_ghat.F |
64 |
CALC_DIV_GHAT |
xA(i,j) = _dyG(i,j,bi,bj)*deepFacC(k) |
./model/src/calc_div_ghat.F |
80 |
CALC_DIV_GHAT |
pf(i,j) = xA(i,j)*gU(i,j,k,bi,bj) / deltaTmom |
./model/src/calc_div_ghat.F |
89 |
CALC_DIV_GHAT |
& *xA(i,j)*gU(i,j,k,bi,bj) / deltaTmom |
./pkg/mom_fluxform/mom_fluxform.F |
123 |
MOM_FLUXFORM |
_RS xA(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/mom_fluxform/mom_fluxform.F |
257 |
MOM_FLUXFORM |
xA(i,j) = _dyG(i,j,bi,bj)*deepFacC(k) |
./pkg/mom_fluxform/mom_fluxform.F |
276 |
MOM_FLUXFORM |
uTrans(i,j) = uFld(i,j)*xA(i,j)*rhoFacC(k) |
./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 |
88 |
CALC_GS |
_RS xA (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 |
87 |
CALC_GT |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./model/src/calc_gw.F |
195 |
CALC_GW |
xA(i,j) = _dyG(i,j,bi,bj)*rThickC_W(i,j) |
./model/src/calc_gw.F |
242 |
CALC_GW |
xA(i,j) = _dyG(i,j,bi,bj)*rThickC_W(i,j) |
./model/src/calc_gw.F |
288 |
CALC_GW |
& *_recip_dxC(i,j,bi,bj)*xA(i,j) |
./model/src/calc_gw.F |
337 |
CALC_GW |
& *_recip_dxC(i,j,bi,bj)*xA(i,j) |
./model/src/calc_gw.F |
341 |
CALC_GW |
& *_recip_dxC(i,j,bi,bj)*xA(i,j) |
./model/src/calc_gw.F |
77 |
CALC_GW |
_RS xA (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 |
58 |
PTRACERS_INTEGRATE |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/seaice/seaice_advdiff.F |
174 |
SEAICE_ADVDIFF |
xA(i,j) = _dyG(i,j,bi,bj)*_maskW(i,j,ks,bi,bj) |
./pkg/seaice/seaice_advdiff.F |
181 |
SEAICE_ADVDIFF |
uTrans(i,j) = uc(i,j,bi,bj)*xA(i,j) |
./pkg/seaice/seaice_advdiff.F |
198 |
SEAICE_ADVDIFF |
I HEFF(1-OLx,1-OLy,bi,bj), HEFFM, xA, yA, |
./pkg/seaice/seaice_advdiff.F |
224 |
SEAICE_ADVDIFF |
I AREA(1-OLx,1-OLy,bi,bj), HEFFM, xA, yA, |
./pkg/seaice/seaice_advdiff.F |
250 |
SEAICE_ADVDIFF |
I HSNOW(1-OLx,1-OLy,bi,bj), HEFFM, xA, yA, |
./pkg/seaice/seaice_advdiff.F |
277 |
SEAICE_ADVDIFF |
I HSALT(1-OLx,1-OLy,bi,bj), HEFFM, xA, yA, |
./pkg/seaice/seaice_advdiff.F |
305 |
SEAICE_ADVDIFF |
I IceAge(1-OLx,1-OLy,bi,bj), HEFFM, xA, yA, |
./pkg/seaice/seaice_advdiff.F |
78 |
SEAICE_ADVDIFF |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/seaice/seaice_diffusion.F |
11 |
SEAICE_DIFFUSION |
I iceFld, iceMask, xA, yA, |
./pkg/seaice/seaice_diffusion.F |
45 |
SEAICE_DIFFUSION |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/seaice/seaice_diffusion.F |
82 |
SEAICE_DIFFUSION |
CALL GAD_DIFF_X(bi,bj,k,xA,diff1,iceFld,fZon,myThid) |
./pkg/smooth/smooth_rhs.F |
100 |
SMOOTH_RHS |
xA(i,j,bi,bj) = _dyG(i,j,bi,bj) |
./pkg/smooth/smooth_rhs.F |
119 |
SMOOTH_RHS |
& -xA(i,j,bi,bj) |
./pkg/smooth/smooth_rhs.F |
142 |
SMOOTH_RHS |
& - xA(i,j,bi,bj)*smooth3D_Kuz(i,j,k,bi,bj)*dTdz(bi,bj) |
./pkg/smooth/smooth_rhs.F |
163 |
SMOOTH_RHS |
& - xA(i,j,bi,bj)*smooth3D_Kuy(i,j,k,bi,bj)*dTdy(bi,bj) |
./pkg/smooth/smooth_rhs.F |
56 |
SMOOTH_RHS |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./model/src/thermodynamics.F |
158 |
THERMODYNAMICS |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./model/src/thermodynamics.F |
264 |
THERMODYNAMICS |
xA(i,j) = 0. _d 0 |
./model/src/thermodynamics.F |
499 |
THERMODYNAMICS |
O uFld, vFld, uTrans, vTrans, xA, yA, |
./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 |
715 |
THERMODYNAMICS |
I xA, yA, maskUp, uFld, vFld, wFld, |