| File |
Line number |
Procedure |
Code |
|
./pkg/ptracers/ptracers_integrate.F |
12 |
PTRACERS_INTEGRATE |
I xA, yA, maskUp, uFld, vFld, wFld, |
|
./pkg/ptracers/ptracers_integrate.F |
137 |
PTRACERS_INTEGRATE |
I xA, yA, maskUp, uFld, vFld, wFld, |
|
./pkg/ptracers/ptracers_integrate.F |
53 |
PTRACERS_INTEGRATE |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/gmredi/gmredi_xtransport.F |
100 |
GMREDI_XTRANSPORT |
& -xA(i,j) |
|
./pkg/gmredi/gmredi_xtransport.F |
147 |
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 |
41 |
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/mom_fluxform/mom_fluxform.F |
123 |
MOM_FLUXFORM |
_RS xA(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_fluxform/mom_fluxform.F |
254 |
MOM_FLUXFORM |
xA(i,j) = _dyG(i,j,bi,bj) |
|
./pkg/mom_fluxform/mom_fluxform.F |
272 |
MOM_FLUXFORM |
uTrans(i,j) = uFld(i,j)*xA(i,j) |
|
./model/src/thermodynamics.F |
143 |
THERMODYNAMICS |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/thermodynamics.F |
231 |
THERMODYNAMICS |
xA(i,j) = 0. _d 0 |
|
./model/src/thermodynamics.F |
423 |
THERMODYNAMICS |
O uFld, vFld, uTrans, vTrans, xA, yA, |
|
./model/src/thermodynamics.F |
526 |
THERMODYNAMICS |
I xA, yA, maskUp, uFld, vFld, wFld, |
|
./model/src/thermodynamics.F |
559 |
THERMODYNAMICS |
I xA, yA, maskUp, uFld, vFld, wFld, |
|
./model/src/thermodynamics.F |
597 |
THERMODYNAMICS |
I xA, yA, maskUp, uFld, vFld, wFld, |
|
./model/src/calc_gw.F |
165 |
CALC_GW |
xA(i,j) = _dyG(i,j,bi,bj)*rThickC_W(i,j) |
|
./model/src/calc_gw.F |
181 |
CALC_GW |
& *_recip_dxC(i,j,bi,bj)*xA(i,j) |
|
./model/src/calc_gw.F |
242 |
CALC_GW |
& *_recip_dxC(i,j,bi,bj)*xA(i,j) |
|
./model/src/calc_gw.F |
247 |
CALC_GW |
& *_recip_dxC(i,j,bi,bj)*xA(i,j) |
|
./model/src/calc_gw.F |
72 |
CALC_GW |
_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 |
148 |
CALC_GT |
I xA, yA, maskUp, uFld, vFld, wFld, |
|
./model/src/calc_gt.F |
159 |
CALC_GT |
I xA, yA, maskUp, uFld, vFld, wFld, |
|
./model/src/calc_gt.F |
86 |
CALC_GT |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/calc_div_ghat.F |
11 |
CALC_DIV_GHAT |
I xA,yA, |
|
./model/src/calc_div_ghat.F |
46 |
CALC_DIV_GHAT |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/calc_div_ghat.F |
68 |
CALC_DIV_GHAT |
pf(i,j) = xA(i,j)*gU(i,j,k,bi,bj) / deltaTmom |
|
./model/src/calc_div_ghat.F |
77 |
CALC_DIV_GHAT |
& *xA(i,j)*gU(i,j,k,bi,bj) / deltaTmom |
|
./model/src/calc_div_ghat.F |
99 |
CALC_DIV_GHAT |
& ) * xA(i,j) / deltaTmom |
|
./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)*drF(k)*_hFacW(i,j,k,bi,bj) |
|
./model/src/calc_common_factors.F |
96 |
CALC_COMMON_FACTORS |
uTrans(i,j) = uFld(i,j)*xA(i,j) |
|
./model/src/calc_gs.F |
12 |
CALC_GS |
I xA, yA, maskUp, uFld, vFld, wFld, |
|
./model/src/calc_gs.F |
149 |
CALC_GS |
I xA, yA, maskUp, uFld, vFld, wFld, |
|
./model/src/calc_gs.F |
160 |
CALC_GS |
I xA, yA, maskUp, uFld, vFld, wFld, |
|
./model/src/calc_gs.F |
87 |
CALC_GS |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/ggl90/ggl90_calc.F |
103 |
GGL90_CALC |
_RL xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/ggl90/ggl90_calc.F |
216 |
GGL90_CALC |
xA(i,j) = _dyG(i,j,bi,bj) |
|
./pkg/ggl90/ggl90_calc.F |
227 |
GGL90_CALC |
dfx(i,j) = -GGL90diffTKEh*xA(i,j) |
|
./pkg/generic_advdiff/gad_advection.F |
127 |
GAD_ADVECTION |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/generic_advdiff/gad_advection.F |
193 |
GAD_ADVECTION |
xA(i,j) = 0. _d 0 |
|
./pkg/generic_advdiff/gad_advection.F |
253 |
GAD_ADVECTION |
O uFld, vFld, uTrans, vTrans, xA, yA, |
|
./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_calc_rhs.F |
12 |
GAD_CALC_RHS |
I xA, yA, maskUp, uFld, vFld, wFld, |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
195 |
GAD_CALC_RHS |
CALL GAD_GRAD_X(bi,bj,k,xA,localT,fZon,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
259 |
GAD_CALC_RHS |
CALL GAD_DIFF_X(bi,bj,k,xA,diffKh,localT,df,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
270 |
GAD_CALC_RHS |
CALL GAD_BIHARM_X(bi,bj,k,xA,df4,diffK4,df,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
280 |
GAD_CALC_RHS |
I xA,TracerN,tracerIdentity, |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
286 |
GAD_CALC_RHS |
I xA,TracAB, tracerIdentity, |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
85 |
GAD_CALC_RHS |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./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 |
56 |
GAD_BIHARM_X |
& *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 |
61 |
GAD_GRAD_X |
dTdx(i,j) = _recip_dxC(i,j,bi,bj)*xA(i,j) |
|
./pkg/seaice/seaice_calc_rhs.F |
38 |
SEAICE_CALC_RHS |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/seaice_calc_rhs.F |
74 |
SEAICE_CALC_RHS |
CALL GAD_DIFF_X(bi,bj,k,xA,diff1,locFld,fZon,myThid) |
|
./pkg/seaice/seaice_calc_rhs.F |
8 |
SEAICE_CALC_RHS |
I uc, vc, iceFld, iceMask, xA, yA, |
|
./pkg/seaice/seaice_advection.F |
114 |
SEAICE_ADVECTION |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/seaice_advection.F |
175 |
SEAICE_ADVECTION |
xA(i,j) = 0. _d 0 |
|
./pkg/seaice/seaice_advection.F |
235 |
SEAICE_ADVECTION |
xA(i,j) = _dyG(i,j,bi,bj) * maskW(i,j,k,bi,bj) |
|
./pkg/seaice/seaice_advection.F |
246 |
SEAICE_ADVECTION |
uTrans(i,j) = uVel(i,j,bi,bj)*xA(i,j) |
|
./pkg/seaice/seaice_advdiff.F |
176 |
SEAICE_ADVDIFF |
xA(i,j) = _dyG(i,j,bi,bj)*_maskW(i,j,k,bi,bj) |
|
./pkg/seaice/seaice_advdiff.F |
187 |
SEAICE_ADVDIFF |
I uc, vc, fld, HEFFM, xA, yA, |
|
./pkg/seaice/seaice_advdiff.F |
206 |
SEAICE_ADVDIFF |
I uc, vc, fld, HEFFM, xA, yA, |
|
./pkg/seaice/seaice_advdiff.F |
259 |
SEAICE_ADVDIFF |
I uc, vc, fld, HEFFM, xA, yA, |
|
./pkg/seaice/seaice_advdiff.F |
290 |
SEAICE_ADVDIFF |
I uc, vc, fld, HEFFM, xA, yA, |
|
./pkg/seaice/seaice_advdiff.F |
321 |
SEAICE_ADVDIFF |
I uc, vc, fld, HEFFM, xA, yA, |
|
./pkg/seaice/seaice_advdiff.F |
73 |
SEAICE_ADVDIFF |
_RS xA (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |