| File |
Line number |
Procedure |
Code |
|
./pkg/ptracers/ptracers_integrate.F |
138 |
PTRACERS_INTEGRATE |
I uTrans, vTrans, rTrans, rTransKp1, |
|
./pkg/ptracers/ptracers_integrate.F |
13 |
PTRACERS_INTEGRATE |
I uTrans, vTrans, rTrans, rTransKp1, |
|
./pkg/ptracers/ptracers_integrate.F |
59 |
PTRACERS_INTEGRATE |
_RL uTrans (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/gmredi/gmredi_xtransport.F |
160 |
GMREDI_XTRANSPORT |
uTrans(i,j) = dyG(i,j,bi,bj)*( GM_PsiX(i,j,kp1,bi,bj)*maskp1 |
|
./pkg/gmredi/gmredi_xtransport.F |
172 |
GMREDI_XTRANSPORT |
& +uTrans(i,j)*op5*(Tracer(i,j,k,bi,bj)+Tracer(i-1,j,k,bi,bj)) |
|
./pkg/gmredi/gmredi_xtransport.F |
58 |
GMREDI_XTRANSPORT |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/gmredi/gmredi_calc_uvflow.F |
10 |
GMREDI_CALC_UVFLOW |
U uFld, vFld, uTrans, vTrans, |
|
./pkg/gmredi/gmredi_calc_uvflow.F |
37 |
GMREDI_CALC_UVFLOW |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/gmredi/gmredi_calc_uvflow.F |
63 |
GMREDI_CALC_UVFLOW |
uTrans(i,j) = uTrans(i,j) |
|
./pkg/mom_fluxform/mom_u_adv_uu.F |
12 |
MOM_U_ADV_UU |
I uTrans, uFld, |
|
./pkg/mom_fluxform/mom_u_adv_uu.F |
35 |
MOM_U_ADV_UU |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_fluxform/mom_u_adv_uu.F |
51 |
MOM_U_ADV_UU |
& 0.25*( uTrans(i,j) + uTrans(i+1,j) ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
125 |
MOM_FLUXFORM |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_fluxform/mom_fluxform.F |
272 |
MOM_FLUXFORM |
uTrans(i,j) = uFld(i,j)*xA(i,j) |
|
./pkg/mom_fluxform/mom_fluxform.F |
358 |
MOM_FLUXFORM |
CALL MOM_U_ADV_UU(bi,bj,k,uTrans,uFld,fZon,myThid) |
|
./pkg/mom_fluxform/mom_fluxform.F |
561 |
MOM_FLUXFORM |
CALL MOM_V_ADV_UV(bi,bj,k,uTrans,vFld,fZon,myThid) |
|
./pkg/mom_fluxform/mom_v_adv_uv.F |
12 |
MOM_V_ADV_UV |
I uTrans, vFld, |
|
./pkg/mom_fluxform/mom_v_adv_uv.F |
36 |
MOM_V_ADV_UV |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_fluxform/mom_v_adv_uv.F |
51 |
MOM_V_ADV_UV |
& 0.25*( uTrans(i,j) + uTrans(i,j-1) ) |
|
./model/src/integr_continuity.F |
57 |
INTEGR_CONTINUITY |
_RL uTrans(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
|
./model/src/integr_continuity.F |
84 |
INTEGR_CONTINUITY |
uTrans(i,j) = uFld(i,j,k,bi,bj)*_dyG(i,j,bi,bj) |
|
./model/src/integr_continuity.F |
95 |
INTEGR_CONTINUITY |
& +maskC(i,j,k,bi,bj)*( uTrans(i+1,j)-uTrans(i,j) |
|
./verification/OpenAD/code/gad_fluxlimit_adv_x.F |
12 |
GAD_FLUXLIMIT_ADV_X |
I uTrans, uVel, |
|
./verification/OpenAD/code/gad_fluxlimit_adv_x.F |
44 |
GAD_FLUXLIMIT_ADV_X |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./verification/OpenAD/code/gad_fluxlimit_adv_x.F |
73 |
GAD_FLUXLIMIT_ADV_X |
uFld = uTrans(i,j)*recip_dyG(i,j,bi,bj) |
|
./verification/OpenAD/code/gad_fluxlimit_adv_x.F |
80 |
GAD_FLUXLIMIT_ADV_X |
IF (uTrans(i,j).GT.0) THEN |
|
./verification/OpenAD/code/gad_fluxlimit_adv_x.F |
86 |
GAD_FLUXLIMIT_ADV_X |
IF (uTrans(i,j).GT.0) THEN |
|
./verification/OpenAD/code/gad_fluxlimit_adv_x.F |
95 |
GAD_FLUXLIMIT_ADV_X |
& uTrans(i,j)*(Tracer(i,j)+Tracer(i-1,j))*0.5 _d 0 |
|
./verification/OpenAD/code/gad_fluxlimit_adv_x.F |
97 |
GAD_FLUXLIMIT_ADV_X |
& (1-Cr)*ABS(uTrans(i,j)) |
|
./verification/OpenAD/code/gad_fluxlimit_adv_x.F |
98 |
GAD_FLUXLIMIT_ADV_X |
& +uTrans(i,j)*uFld*deltaTloc |
|
./model/src/thermodynamics.F |
148 |
THERMODYNAMICS |
_RL uTrans (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/thermodynamics.F |
233 |
THERMODYNAMICS |
uTrans(i,j) = 0. _d 0 |
|
./model/src/thermodynamics.F |
423 |
THERMODYNAMICS |
O uFld, vFld, uTrans, vTrans, xA, yA, |
|
./model/src/thermodynamics.F |
451 |
THERMODYNAMICS |
U uFld, vFld, uTrans, vTrans, |
|
./model/src/thermodynamics.F |
527 |
THERMODYNAMICS |
I uTrans, vTrans, rTrans, rTransKp1, |
|
./model/src/thermodynamics.F |
560 |
THERMODYNAMICS |
I uTrans, vTrans, rTrans, rTransKp1, |
|
./model/src/thermodynamics.F |
598 |
THERMODYNAMICS |
I uTrans, vTrans, rTrans, rTransKp1, |
|
./model/src/calc_gw.F |
340 |
CALC_GW |
uTrans = ( |
|
./model/src/calc_gw.F |
346 |
CALC_GW |
& uTrans*(wVel(i,j,k,bi,bj)+wVel(i-1,j,k,bi,bj))*halfRL |
|
./model/src/calc_gw.F |
89 |
CALC_GW |
_RL uTrans, vTrans, rTrans |
|
./model/src/calc_gt.F |
13 |
CALC_GT |
I uTrans, vTrans, rTrans, rTransKp1, |
|
./model/src/calc_gt.F |
149 |
CALC_GT |
I uTrans, vTrans, rTrans, rTransKp1, |
|
./model/src/calc_gt.F |
160 |
CALC_GT |
I uTrans, vTrans, rTrans, rTransKp1, |
|
./model/src/calc_gt.F |
92 |
CALC_GT |
_RL uTrans (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/integrate_for_w.F |
102 |
INTEGRATE_FOR_W |
& ( -( uTrans(i+1,j)-uTrans(i,j) |
|
./model/src/integrate_for_w.F |
114 |
INTEGRATE_FOR_W |
& -( uTrans(i+1,j)-uTrans(i,j) |
|
./model/src/integrate_for_w.F |
131 |
INTEGRATE_FOR_W |
& -( uTrans(i+1,j)-uTrans(i,j) |
|
./model/src/integrate_for_w.F |
142 |
INTEGRATE_FOR_W |
& -( uTrans(i+1,j)-uTrans(i,j) |
|
./model/src/integrate_for_w.F |
44 |
INTEGRATE_FOR_W |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/integrate_for_w.F |
52 |
INTEGRATE_FOR_W |
uTrans(i,j) = uFld(i,j,k,bi,bj)* |
|
./model/src/integrate_for_w.F |
75 |
INTEGRATE_FOR_W |
& -( uTrans(i+1,j)-uTrans(i,j) |
|
./model/src/integrate_for_w.F |
86 |
INTEGRATE_FOR_W |
& -( uTrans(i+1,j)-uTrans(i,j) |
|
./model/src/calc_common_factors.F |
11 |
CALC_COMMON_FACTORS |
O uFld, vFld, uTrans, vTrans, xA, yA, |
|
./model/src/calc_common_factors.F |
52 |
CALC_COMMON_FACTORS |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./model/src/calc_common_factors.F |
96 |
CALC_COMMON_FACTORS |
uTrans(i,j) = uFld(i,j)*xA(i,j) |
|
./model/src/calc_gs.F |
13 |
CALC_GS |
I uTrans, vTrans, rTrans, rTransKp1, |
|
./model/src/calc_gs.F |
150 |
CALC_GS |
I uTrans, vTrans, rTrans, rTransKp1, |
|
./model/src/calc_gs.F |
161 |
CALC_GS |
I uTrans, vTrans, rTrans, rTransKp1, |
|
./model/src/calc_gs.F |
93 |
CALC_GS |
_RL uTrans (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/generic_advdiff/gad_advection.F |
132 |
GAD_ADVECTION |
_RL uTrans (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/generic_advdiff/gad_advection.F |
195 |
GAD_ADVECTION |
uTrans(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_advection.F |
260 |
GAD_ADVECTION |
U uFld, vFld, uTrans, vTrans, |
|
./pkg/generic_advdiff/gad_advection.F |
372 |
GAD_ADVECTION |
I dTtracerLev(k),uTrans,uFld,localTij, |
|
./pkg/generic_advdiff/gad_advection.F |
376 |
GAD_ADVECTION |
I uTrans, uFld, maskLocW, localTij, |
|
./pkg/generic_advdiff/gad_advection.F |
380 |
GAD_ADVECTION |
I uTrans, uFld, maskLocW, localTij, |
|
./pkg/generic_advdiff/gad_advection.F |
384 |
GAD_ADVECTION |
I uTrans, uFld, maskLocW, localTij, |
|
./pkg/generic_advdiff/gad_advection.F |
418 |
GAD_ADVECTION |
& -tracer(i,j,k,bi,bj)*(uTrans(i+1,j)-uTrans(i,j)) |
|
./pkg/generic_advdiff/gad_advection.F |
430 |
GAD_ADVECTION |
& -tracer(i,j,k,bi,bj)*(uTrans(i+1,j)-uTrans(i,j)) |
|
./pkg/generic_advdiff/gad_advection.F |
448 |
GAD_ADVECTION |
& -tracer(i,j,k,bi,bj)*(uTrans(i+1,j)-uTrans(i,j)) |
|
./pkg/generic_advdiff/gad_dst2u1_adv_x.F |
12 |
GAD_DST2U1_ADV_X |
I deltaTloc, uTrans, uFld, |
|
./pkg/generic_advdiff/gad_dst2u1_adv_x.F |
40 |
GAD_DST2U1_ADV_X |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/generic_advdiff/gad_dst2u1_adv_x.F |
78 |
GAD_DST2U1_ADV_X |
uAbs = ABS(uTrans(i,j)) |
|
./pkg/generic_advdiff/gad_dst2u1_adv_x.F |
80 |
GAD_DST2U1_ADV_X |
uT(i,j) = ( uTrans(i,j)+uAbs )* 0.5 _d 0 * tracer(i-1,j) |
|
./pkg/generic_advdiff/gad_dst2u1_adv_x.F |
81 |
GAD_DST2U1_ADV_X |
& + ( uTrans(i,j)-uAbs )* 0.5 _d 0 * tracer(i,j) |
|
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F |
12 |
GAD_FLUXLIMIT_ADV_X |
I uTrans, uFld, |
|
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F |
44 |
GAD_FLUXLIMIT_ADV_X |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F |
80 |
GAD_FLUXLIMIT_ADV_X |
IF (uTrans(i,j).GT.0) THEN |
|
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F |
86 |
GAD_FLUXLIMIT_ADV_X |
IF (uTrans(i,j).GT.0) THEN |
|
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F |
94 |
GAD_FLUXLIMIT_ADV_X |
& uTrans(i,j)*(Tracer(i,j)+Tracer(i-1,j))*0.5 _d 0 |
|
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F |
96 |
GAD_FLUXLIMIT_ADV_X |
& (1-Cr)*ABS(uTrans(i,j)) |
|
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F |
97 |
GAD_FLUXLIMIT_ADV_X |
& +uTrans(i,j)*uLoc*deltaTloc |
|
./pkg/generic_advdiff/gad_c2_adv_x.F |
12 |
GAD_C2_ADV_X |
I uTrans, |
|
./pkg/generic_advdiff/gad_c2_adv_x.F |
36 |
GAD_C2_ADV_X |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/generic_advdiff/gad_c2_adv_x.F |
53 |
GAD_C2_ADV_X |
& uTrans(i,j)*(Tracer(i,j)+Tracer(i-1,j))*0.5 _d 0 |
|
./pkg/generic_advdiff/gad_dst3_adv_x.F |
29 |
GAD_DST3_ADV_X |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/generic_advdiff/gad_dst3_adv_x.F |
86 |
GAD_DST3_ADV_X |
& 0.5*(uTrans(i,j)+abs(uTrans(i,j))) |
|
./pkg/generic_advdiff/gad_dst3_adv_x.F |
88 |
GAD_DST3_ADV_X |
& +0.5*(uTrans(i,j)-abs(uTrans(i,j))) |
|
./pkg/generic_advdiff/gad_dst3_adv_x.F |
8 |
GAD_DST3_ADV_X |
I uTrans, uFld, |
|
./pkg/generic_advdiff/gad_dst3_adv_x.F |
93 |
GAD_DST3_ADV_X |
& 0.5*(uTrans(i,j)+abs(uTrans(i,j))) |
|
./pkg/generic_advdiff/gad_dst3_adv_x.F |
95 |
GAD_DST3_ADV_X |
& +0.5*(uTrans(i,j)-abs(uTrans(i,j))) |
|
./pkg/generic_advdiff/gad_dst3fl_adv_x.F |
27 |
GAD_DST3FL_ADV_X |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/generic_advdiff/gad_dst3fl_adv_x.F |
8 |
GAD_DST3FL_ADV_X |
I uTrans, uFld, |
|
./pkg/generic_advdiff/gad_dst3fl_adv_x.F |
91 |
GAD_DST3FL_ADV_X |
& 0.5*(uTrans(i,j)+abs(uTrans(i,j))) |
|
./pkg/generic_advdiff/gad_dst3fl_adv_x.F |
93 |
GAD_DST3FL_ADV_X |
& +0.5*(uTrans(i,j)-abs(uTrans(i,j))) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
13 |
GAD_CALC_RHS |
I uTrans, vTrans, rTrans, rTransKp1, |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
210 |
GAD_CALC_RHS |
CALL GAD_C2_ADV_X(bi,bj,k,uTrans,locABT,af,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
214 |
GAD_CALC_RHS |
I dTtracerLev(k), uTrans, uFld, locABT, |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
218 |
GAD_CALC_RHS |
I uTrans, uFld, maskW(1-Olx,1-Oly,k,bi,bj), locABT, |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
221 |
GAD_CALC_RHS |
CALL GAD_U3_ADV_X(bi,bj,k,uTrans,locABT,af,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
223 |
GAD_CALC_RHS |
CALL GAD_C4_ADV_X(bi,bj,k,uTrans,locABT,af,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
226 |
GAD_CALC_RHS |
I uTrans, uFld, maskW(1-Olx,1-Oly,k,bi,bj), locABT, |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
234 |
GAD_CALC_RHS |
I uTrans, uFld, maskW(1-Olx,1-Oly,k,bi,bj), locABT, |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
238 |
GAD_CALC_RHS |
I uTrans, uFld, maskW(1-Olx,1-Oly,k,bi,bj), locABT, |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
575 |
GAD_CALC_RHS |
& -localT(i,j)*( (uTrans(i+1,j)-uTrans(i,j)) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
91 |
GAD_CALC_RHS |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/generic_advdiff/gad_u3_adv_x.F |
12 |
GAD_U3_ADV_X |
I uTrans, |
|
./pkg/generic_advdiff/gad_u3_adv_x.F |
39 |
GAD_U3_ADV_X |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/generic_advdiff/gad_u3_adv_x.F |
66 |
GAD_U3_ADV_X |
& uTrans(i,j)*( |
|
./pkg/generic_advdiff/gad_u3_adv_x.F |
69 |
GAD_U3_ADV_X |
& +ABS( uTrans(i,j) )*0.5 _d 0*oneSixth*( Rjjp-Rjjm ) |
|
./pkg/generic_advdiff/gad_c4_adv_x.F |
12 |
GAD_C4_ADV_X |
I uTrans, |
|
./pkg/generic_advdiff/gad_c4_adv_x.F |
40 |
GAD_C4_ADV_X |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/generic_advdiff/gad_c4_adv_x.F |
70 |
GAD_C4_ADV_X |
& uTrans(i,j)*( |
|
./pkg/generic_advdiff/gad_c4_adv_x.F |
73 |
GAD_C4_ADV_X |
& +ABS( uTrans(i,j) )*0.5 _d 0*oneSixth*( Rjjp-Rjjm ) |
|
./pkg/seaice/seaice_advection.F |
118 |
SEAICE_ADVECTION |
_RL uTrans (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/seaice_advection.F |
177 |
SEAICE_ADVECTION |
uTrans(i,j) = 0. _d 0 |
|
./pkg/seaice/seaice_advection.F |
246 |
SEAICE_ADVECTION |
uTrans(i,j) = uVel(i,j,bi,bj)*xA(i,j) |
|
./pkg/seaice/seaice_advection.F |
350 |
SEAICE_ADVECTION |
I SEAICE_deltaTtherm,uTrans,uFld,localTij, |
|
./pkg/seaice/seaice_advection.F |
354 |
SEAICE_ADVECTION |
I uTrans, uFld, maskLocW, localTij, |
|
./pkg/seaice/seaice_advection.F |
358 |
SEAICE_ADVECTION |
I uTrans, uFld, maskLocW, localTij, |
|
./pkg/seaice/seaice_advection.F |
362 |
SEAICE_ADVECTION |
I uTrans, uFld, maskLocW, localTij, |