File |
Line number |
Procedure |
Code |
./pkg/generic_advdiff/gad_advection.F |
136 |
GAD_ADVECTION |
_RL uTrans (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./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_advection.F |
406 |
GAD_ADVECTION |
I deltaTLev(k),uTrans,uFld(1-OLx,1-OLy,k), localTij, |
./pkg/generic_advdiff/gad_advection.F |
410 |
GAD_ADVECTION |
I uTrans, uFld(1-OLx,1-OLy,k), maskLocW, localTij, |
./pkg/generic_advdiff/gad_advection.F |
414 |
GAD_ADVECTION |
I uTrans, uFld(1-OLx,1-OLy,k), maskLocW, localTij, |
./pkg/generic_advdiff/gad_advection.F |
418 |
GAD_ADVECTION |
I uTrans, uFld(1-OLx,1-OLy,k), maskLocW, localTij, |
./pkg/generic_advdiff/gad_advection.F |
423 |
GAD_ADVECTION |
I uTrans, uFld(1-OLx,1-OLy,k), maskLocW, localTij, |
./pkg/generic_advdiff/gad_advection.F |
429 |
GAD_ADVECTION |
I deltaTLev(k), uFld(1-OLx,1-OLy,k), uTrans, localTij, |
./pkg/generic_advdiff/gad_advection.F |
435 |
GAD_ADVECTION |
I deltaTLev(k), uFld(1-OLx,1-OLy,k), uTrans, localTij, |
./pkg/generic_advdiff/gad_advection.F |
446 |
GAD_ADVECTION |
I maskLocW, uTrans, localTij, |
./pkg/generic_advdiff/gad_advection.F |
488 |
GAD_ADVECTION |
& -deltaTLev(k)*( uTrans(i+1,j) - uTrans(i,j) ) |
./pkg/generic_advdiff/gad_advection.F |
497 |
GAD_ADVECTION |
& -tracer(i,j,k,bi,bj)*(uTrans(i+1,j)-uTrans(i,j)) |
./pkg/generic_advdiff/gad_advection.F |
511 |
GAD_ADVECTION |
& -deltaTLev(k)*( uTrans(i+1,j) - uTrans(i,j) ) |
./pkg/generic_advdiff/gad_advection.F |
520 |
GAD_ADVECTION |
& -tracer(i,j,k,bi,bj)*(uTrans(i+1,j)-uTrans(i,j)) |
./pkg/generic_advdiff/gad_advection.F |
540 |
GAD_ADVECTION |
& -deltaTLev(k)*( uTrans(i+1,j) - uTrans(i,j) ) |
./pkg/generic_advdiff/gad_advection.F |
549 |
GAD_ADVECTION |
& -tracer(i,j,k,bi,bj)*(uTrans(i+1,j)-uTrans(i,j)) |
./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 |
55 |
GAD_C2_ADV_X |
& uTrans(i,j)*(Tracer(i,j)+Tracer(i-1,j))*0.5 _d 0 |
./pkg/generic_advdiff/gad_c4_adv_x.F |
12 |
GAD_C4_ADV_X |
I uTrans, maskLocW, |
./pkg/generic_advdiff/gad_c4_adv_x.F |
41 |
GAD_C4_ADV_X |
_RL uTrans (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/generic_advdiff/gad_c4_adv_x.F |
71 |
GAD_C4_ADV_X |
& uTrans(i,j)*( |
./pkg/generic_advdiff/gad_c4_adv_x.F |
74 |
GAD_C4_ADV_X |
& +ABS( uTrans(i,j) )*0.5 _d 0*oneSixth*( Rjjp-Rjjm ) |
./pkg/generic_advdiff/gad_calc_rhs.F |
13 |
GAD_CALC_RHS |
I uTrans, vTrans, rTrans, rTransKp1, |
./pkg/generic_advdiff/gad_calc_rhs.F |
217 |
GAD_CALC_RHS |
CALL GAD_C2_ADV_X( bi,bj,k, uTrans, locABT, af, myThid ) |
./pkg/generic_advdiff/gad_calc_rhs.F |
221 |
GAD_CALC_RHS |
I deltaTLev(k), uTrans, uFld, locABT, |
./pkg/generic_advdiff/gad_calc_rhs.F |
235 |
GAD_CALC_RHS |
I uTrans, uFld, maskLocW, locABT, |
./pkg/generic_advdiff/gad_calc_rhs.F |
238 |
GAD_CALC_RHS |
CALL GAD_U3_ADV_X( bi,bj,k, uTrans, maskLocW, locABT, |
./pkg/generic_advdiff/gad_calc_rhs.F |
241 |
GAD_CALC_RHS |
CALL GAD_C4_ADV_X( bi,bj,k, uTrans, maskLocW, locABT, |
./pkg/generic_advdiff/gad_calc_rhs.F |
254 |
GAD_CALC_RHS |
I uTrans, uFld, maskLocW, locABT, |
./pkg/generic_advdiff/gad_calc_rhs.F |
258 |
GAD_CALC_RHS |
I uTrans, uFld, maskLocW, locABT, |
./pkg/generic_advdiff/gad_calc_rhs.F |
263 |
GAD_CALC_RHS |
I uTrans, uFld, maskLocW, locABT, |
./pkg/generic_advdiff/gad_calc_rhs.F |
275 |
GAD_CALC_RHS |
I uTrans, locABT, |
./pkg/generic_advdiff/gad_calc_rhs.F |
781 |
GAD_CALC_RHS |
& -localT(i,j)*( (uTrans(i+1,j)-uTrans(i,j))*advFac |
./pkg/generic_advdiff/gad_calc_rhs.F |
96 |
GAD_CALC_RHS |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./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 |
43 |
GAD_DST2U1_ADV_X |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/generic_advdiff/gad_dst2u1_adv_x.F |
81 |
GAD_DST2U1_ADV_X |
uAbs = ABS(uTrans(i,j)) |
./pkg/generic_advdiff/gad_dst2u1_adv_x.F |
83 |
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 |
84 |
GAD_DST2U1_ADV_X |
& + ( uTrans(i,j)-uAbs )* 0.5 _d 0 * tracer(i,j) |
./pkg/generic_advdiff/gad_dst3_adv_x.F |
108 |
GAD_DST3_ADV_X |
& 0.5*(uTrans(i,j)+ABS(uTrans(i,j))) |
./pkg/generic_advdiff/gad_dst3_adv_x.F |
110 |
GAD_DST3_ADV_X |
& +0.5*(uTrans(i,j)-ABS(uTrans(i,j))) |
./pkg/generic_advdiff/gad_dst3_adv_x.F |
114 |
GAD_DST3_ADV_X |
& 0.5*(uTrans(i,j)+ABS(uTrans(i,j))) |
./pkg/generic_advdiff/gad_dst3_adv_x.F |
116 |
GAD_DST3_ADV_X |
& +0.5*(uTrans(i,j)-ABS(uTrans(i,j))) |
./pkg/generic_advdiff/gad_dst3_adv_x.F |
12 |
GAD_DST3_ADV_X |
I uTrans, uFld, |
./pkg/generic_advdiff/gad_dst3_adv_x.F |
46 |
GAD_DST3_ADV_X |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/generic_advdiff/gad_dst3fl_adv_x.F |
28 |
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 |
96 |
GAD_DST3FL_ADV_X |
& 0.5*(uTrans(i,j)+ABS(uTrans(i,j))) |
./pkg/generic_advdiff/gad_dst3fl_adv_x.F |
98 |
GAD_DST3FL_ADV_X |
& +0.5*(uTrans(i,j)-ABS(uTrans(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 |
47 |
GAD_FLUXLIMIT_ADV_X |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F |
84 |
GAD_FLUXLIMIT_ADV_X |
IF (uTrans(i,j).GT.0) THEN |
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F |
90 |
GAD_FLUXLIMIT_ADV_X |
IF (uTrans(i,j).GT.0) THEN |
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F |
98 |
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 |
99 |
GAD_FLUXLIMIT_ADV_X |
& -ABS(uTrans(i,j))*((1.-Cr)+uCFL*Cr) |
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
116 |
GAD_OS7MP_ADV_X |
IF (uTrans(i,j).NE.0. _d 0) THEN |
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
206 |
GAD_OS7MP_ADV_X |
uT(i,j) = uTrans(i,j)*( Qi + Psi*DelIp ) |
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
28 |
GAD_OS7MP_ADV_X |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
69 |
GAD_OS7MP_ADV_X |
IF (uTrans(i,j).GT.0. _d 0) THEN |
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
84 |
GAD_OS7MP_ADV_X |
ELSEIF (uTrans(i,j).LT.0. _d 0) THEN |
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
8 |
GAD_OS7MP_ADV_X |
I uTrans, uFld, |
./pkg/generic_advdiff/gad_som_adv_x.F |
14 |
GAD_SOM_ADV_X |
I deltaTloc, uTrans, maskIn, |
./pkg/generic_advdiff/gad_som_adv_x.F |
177 |
GAD_SOM_ADV_X |
uLoc = uTrans(i,j)*deltaTloc |
./pkg/generic_advdiff/gad_som_adv_x.F |
57 |
GAD_SOM_ADV_X |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./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 |
329 |
GAD_SOM_ADVECT |
I deltaTLev(k), uTrans, |
./pkg/generic_advdiff/gad_som_advect.F |
97 |
GAD_SOM_ADVECT |
_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, maskLocW, |
./pkg/generic_advdiff/gad_u3_adv_x.F |
40 |
GAD_U3_ADV_X |
_RL uTrans (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/generic_advdiff/gad_u3_adv_x.F |
70 |
GAD_U3_ADV_X |
& uTrans(i,j)*( |
./pkg/generic_advdiff/gad_u3_adv_x.F |
73 |
GAD_U3_ADV_X |
& +ABS( uTrans(i,j) )*0.5 _d 0*oneSixth*( Rjjp-Rjjm ) |
./pkg/gmredi/gmredi_xtransport.F |
193 |
GMREDI_XTRANSPORT |
uTrans(i,j) = dyG(i,j,bi,bj)*( GM_PsiX(i,j,kp1,bi,bj)*maskp1 |
./pkg/gmredi/gmredi_xtransport.F |
205 |
GMREDI_XTRANSPORT |
& +uTrans(i,j)*op5*(Tracer(i,j,k)+Tracer(i-1,j,k)) |
./pkg/gmredi/gmredi_xtransport.F |
82 |
GMREDI_XTRANSPORT |
_RL uTrans(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 |
13 |
CALC_ADV_FLOW |
O uTrans, vTrans, rTransKp, |
./model/src/calc_adv_flow.F |
57 |
CALC_ADV_FLOW |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./model/src/calc_gw.F |
122 |
CALC_GW |
_RL uTrans, vTrans, rTrans |
./model/src/calc_gw.F |
499 |
CALC_GW |
uTrans = ( |
./model/src/calc_gw.F |
505 |
CALC_GW |
flx_EW(i,j) = uTrans*(wFld(i,j)+wFld(i-1,j))*halfRL |
./pkg/mom_fluxform/mom_fluxform.F |
138 |
MOM_FLUXFORM |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/mom_fluxform/mom_fluxform.F |
303 |
MOM_FLUXFORM |
uTrans(i,j) = uFld(i,j)*xA(i,j)*rhoFacC(k) |
./pkg/mom_fluxform/mom_fluxform.F |
413 |
MOM_FLUXFORM |
CALL MOM_U_ADV_UU( bi,bj,k,uTrans,uBnd(1-OLx,1-OLy,k,bi,bj), |
./pkg/mom_fluxform/mom_fluxform.F |
423 |
MOM_FLUXFORM |
CALL MOM_U_ADV_UU( bi,bj,k,uTrans,uFld,fZon,myThid ) |
./pkg/mom_fluxform/mom_fluxform.F |
648 |
MOM_FLUXFORM |
CALL MOM_V_ADV_UV( bi,bj,k,uTrans,vBnd(1-OLx,1-OLy,k,bi,bj), |
./pkg/mom_fluxform/mom_fluxform.F |
657 |
MOM_FLUXFORM |
CALL MOM_V_ADV_UV( bi,bj,k,uTrans,vFld,fZon,myThid ) |
./pkg/mom_fluxform/mom_u_adv_uu.F |
12 |
MOM_U_ADV_UU |
I uTrans, uFld, |
./pkg/mom_fluxform/mom_u_adv_uu.F |
36 |
MOM_U_ADV_UU |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/mom_fluxform/mom_u_adv_uu.F |
52 |
MOM_U_ADV_UU |
& 0.25*( uTrans(i,j) + uTrans(i+1,j) ) |
./pkg/mom_fluxform/mom_uv_boundary.F |
105 |
MOM_UV_BOUNDARY |
aBndU(i,j) = uTrans(i+1,j)-uTrans(i,j) |
./pkg/mom_fluxform/mom_uv_boundary.F |
57 |
MOM_UV_BOUNDARY |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/mom_fluxform/mom_uv_boundary.F |
95 |
MOM_UV_BOUNDARY |
uTrans(i,j) = uFld(i,j,k,bi,bj) |
./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) ) |
./pkg/monitor/mon_calc_advcfl.F |
55 |
MON_CALC_ADVCFL_TILE |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/monitor/mon_calc_advcfl.F |
78 |
MON_CALC_ADVCFL_TILE |
uTrans(i,j) = uFld(i,j,k)*dyG(i,j,bi,bj)*deepFacC(k) |
./pkg/monitor/mon_calc_advcfl.F |
90 |
MON_CALC_ADVCFL_TILE |
& + MAX( uTrans(i+1,j), zeroRL ) |
./pkg/monitor/mon_calc_advcfl.F |
91 |
MON_CALC_ADVCFL_TILE |
& - MIN( uTrans( i ,j), zeroRL ) |
./pkg/obcs/obcs_diag_balance.F |
101 |
OBCS_DIAG_BALANCE |
& - uTrans(iB,j,bi,bj) |
./pkg/obcs/obcs_diag_balance.F |
124 |
OBCS_DIAG_BALANCE |
& + uTrans(iB,j,bi,bj) |
./pkg/obcs/obcs_diag_balance.F |
13 |
OBCS_DIAG_BALANCE |
I uTrans, vTrans, k, |
./pkg/obcs/obcs_diag_balance.F |
211 |
OBCS_DIAG_BALANCE |
& - uTrans(iB,j,bi,bj) |
./pkg/obcs/obcs_diag_balance.F |
232 |
OBCS_DIAG_BALANCE |
& + uTrans(iB,j,bi,bj) |
./pkg/obcs/obcs_diag_balance.F |
44 |
OBCS_DIAG_BALANCE |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/ptracers/ptracers_integrate.F |
103 |
PTRACERS_INTEGRATE |
_RL uTrans (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/ptracers/ptracers_integrate.F |
289 |
PTRACERS_INTEGRATE |
O uTrans, vTrans, rTransKp, |
./pkg/ptracers/ptracers_integrate.F |
317 |
PTRACERS_INTEGRATE |
I uTrans, vTrans, rTrans, rTransKp, |
./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 |
225 |
SEAICE_ADVDIFF |
I uTrans, vTrans, HEFF(1-OLx,1-OLy,bi,bj), recip_heff, |
./pkg/seaice/seaice_advdiff.F |
268 |
SEAICE_ADVDIFF |
I uTrans, vTrans, AREA(1-OLx,1-OLy,bi,bj), recip_heff, |
./pkg/seaice/seaice_advdiff.F |
299 |
SEAICE_ADVDIFF |
I uTrans, vTrans, opnWtrFrac(1-OLx,1-OLy,bi,bj), recip_heff, |
./pkg/seaice/seaice_advdiff.F |
335 |
SEAICE_ADVDIFF |
I uTrans, vTrans, HSNOW(1-OLx,1-OLy,bi,bj), recip_heff, |
./pkg/seaice/seaice_advdiff.F |
378 |
SEAICE_ADVDIFF |
I uTrans, vTrans, HSALT(1-OLx,1-OLy,bi,bj), recip_heff, |
./pkg/seaice/seaice_advdiff.F |
443 |
SEAICE_ADVDIFF |
I uTrans, vTrans, SItrExt(1-OLx,1-OLy,bi,bj), |
./pkg/seaice/seaice_advdiff.F |
97 |
SEAICE_ADVDIFF |
_RL uTrans (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/seaice/seaice_advection.F |
20 |
SEAICE_ADVECTION |
I uFld, vFld, uTrans, vTrans, iceFld, r_hFld, |
./pkg/seaice/seaice_advection.F |
369 |
SEAICE_ADVECTION |
I SEAICE_deltaTtherm, uTrans, uFld, localTij, |
./pkg/seaice/seaice_advection.F |
375 |
SEAICE_ADVECTION |
& localTij(i,j), uTrans(i+1,j), af(i+1,j)/uTrans(i+1,j) |
./pkg/seaice/seaice_advection.F |
379 |
SEAICE_ADVECTION |
I SEAICE_deltaTtherm, uTrans, uFld, maskLocW, localTij, |
./pkg/seaice/seaice_advection.F |
383 |
SEAICE_ADVECTION |
I SEAICE_deltaTtherm, uTrans, uFld, maskLocW, localTij, |
./pkg/seaice/seaice_advection.F |
387 |
SEAICE_ADVECTION |
I SEAICE_deltaTtherm, uTrans, uFld, maskLocW, localTij, |
./pkg/seaice/seaice_advection.F |
392 |
SEAICE_ADVECTION |
I SEAICE_deltaTtherm, uTrans, uFld, maskLocW, localTij, |
./pkg/seaice/seaice_advection.F |
442 |
SEAICE_ADVECTION |
& -(uTrans(i+1,j)-uTrans(i,j))*iceFld(i,j) |
./pkg/seaice/seaice_advection.F |
464 |
SEAICE_ADVECTION |
& -(uTrans(i+1,j)-uTrans(i,j))*iceFld(i,j) |
./pkg/seaice/seaice_advection.F |
508 |
SEAICE_ADVECTION |
& -(uTrans(i+1,j)-uTrans(i,j))*iceFld(i,j) |
./pkg/seaice/seaice_advection.F |
89 |
SEAICE_ADVECTION |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/streamice/streamice_advect_2dtracer.F |
109 |
STREAMICE_ADVECT_2DTRACER |
I uTrans , |
./pkg/streamice/streamice_advect_2dtracer.F |
16 |
STREAMICE_ADVECT_2DTRACER |
& uTrans, |
./pkg/streamice/streamice_advect_2dtracer.F |
42 |
STREAMICE_ADVECT_2DTRACER |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/streamice/streamice_advect_thickness.F |
320 |
STREAMICE_ADVECT_THICKNESS |
& uTrans, |
./pkg/thsice/thsice_advdiff.F |
193 |
THSICE_ADVDIFF |
uTrans(i,j) = 0. _d 0 |
./pkg/thsice/thsice_advdiff.F |
247 |
THSICE_ADVDIFF |
O uTrans, vTrans, |
./pkg/thsice/thsice_advdiff.F |
258 |
THSICE_ADVDIFF |
I uTrans, vTrans, maskOce, thSIce_deltaT, areaEpsil, |
./pkg/thsice/thsice_advdiff.F |
276 |
THSICE_ADVDIFF |
I uTrans, vTrans, maskOce, thSIce_deltaT, areaEpsil, |
./pkg/thsice/thsice_advdiff.F |
330 |
THSICE_ADVDIFF |
CALL DIAGNOSTICS_FILL( uTrans, diagName, 1,1,2,bi,bj, myThid ) |
./pkg/thsice/thsice_advdiff.F |
82 |
THSICE_ADVDIFF |
_RL uTrans (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/thsice/thsice_advection.F |
18 |
THSICE_ADVECTION |
I uTrans, vTrans, maskOc, deltaTadvect, iceEps, |
./pkg/thsice/thsice_advection.F |
341 |
THSICE_ADVECTION |
& MAX( uTrans(i,j), 0. _d 0 )*recip_rA(i-1,j,bi,bj) |
./pkg/thsice/thsice_advection.F |
342 |
THSICE_ADVECTION |
& +MAX(-uTrans(i,j), 0. _d 0 )*recip_rA( i ,j,bi,bj) |
./pkg/thsice/thsice_advection.F |
350 |
THSICE_ADVECTION |
& MAX( uTrans(i,j), 0. _d 0 )/MAX( iceVol(i-1,j), iceEps ) |
./pkg/thsice/thsice_advection.F |
351 |
THSICE_ADVECTION |
& +MAX(-uTrans(i,j), 0. _d 0 )/MAX( iceVol( i ,j), iceEps ) |
./pkg/thsice/thsice_advection.F |
360 |
THSICE_ADVECTION |
I deltaTadvect, uTrans, uCfl, iceFld, |
./pkg/thsice/thsice_advection.F |
365 |
THSICE_ADVECTION |
& uTrans(idb,jdb), af(idb,jdb)/uTrans(idb,jdb) |
./pkg/thsice/thsice_advection.F |
369 |
THSICE_ADVECTION |
I uTrans, uCfl, maskLocW, iceFld, |
./pkg/thsice/thsice_advection.F |
373 |
THSICE_ADVECTION |
I uTrans, uCfl, maskLocW, iceFld, |
./pkg/thsice/thsice_advection.F |
377 |
THSICE_ADVECTION |
I uTrans, uCfl, maskLocW, iceFld, |
./pkg/thsice/thsice_advection.F |
429 |
THSICE_ADVECTION |
& *( uTrans(i+1,j)-uTrans(i,j) ) |
./pkg/thsice/thsice_advection.F |
462 |
THSICE_ADVECTION |
& *( uTrans(i+1,j)-uTrans(i,j) ) |
./pkg/thsice/thsice_advection.F |
501 |
THSICE_ADVECTION |
& *( uTrans(i+1,j)-uTrans(i,j) ) |
./pkg/thsice/thsice_advection.F |
83 |
THSICE_ADVECTION |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./model/src/integr_continuity.F |
109 |
INTEGR_CONTINUITY |
uTrans(i,j) = uFld(i,j,k,bi,bj)*_dyG(i,j,bi,bj) |
./model/src/integr_continuity.F |
122 |
INTEGR_CONTINUITY |
& +maskC(i,j,k,bi,bj)*( uTrans(i+1,j)-uTrans(i,j) |
./model/src/integr_continuity.F |
59 |
INTEGR_CONTINUITY |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./model/src/integrate_for_w.F |
57 |
INTEGRATE_FOR_W |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./model/src/integrate_for_w.F |
66 |
INTEGRATE_FOR_W |
uTrans(i,j) = uFld(i,j,k,bi,bj) |
./model/src/integrate_for_w.F |
76 |
INTEGRATE_FOR_W |
conv2d(i,j) = -( uTrans(i+1,j)-uTrans(i,j) |
./model/src/salt_integrate.F |
125 |
SALT_INTEGRATE |
_RL uTrans (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./model/src/salt_integrate.F |
316 |
SALT_INTEGRATE |
O uTrans, vTrans, rTransKp, |
./model/src/salt_integrate.F |
345 |
SALT_INTEGRATE |
I uTrans, vTrans, rTrans, rTransKp, |
./model/src/salt_integrate.F |
360 |
SALT_INTEGRATE |
I uTrans, vTrans, rTrans, rTransKp, |
./model/src/temp_integrate.F |
129 |
TEMP_INTEGRATE |
_RL uTrans (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./model/src/temp_integrate.F |
324 |
TEMP_INTEGRATE |
O uTrans, vTrans, rTransKp, |
./model/src/temp_integrate.F |
353 |
TEMP_INTEGRATE |
I uTrans, vTrans, rTrans, rTransKp, |
./model/src/temp_integrate.F |
368 |
TEMP_INTEGRATE |
I uTrans, vTrans, rTrans, rTransKp, |
./pkg/cheapaml/cheapaml.F |
145 |
CHEAPAML |
uTrans(i,j)=uWind(i,j,bi,bj) |
./pkg/cheapaml/cheapaml.F |
151 |
CHEAPAML |
I uTrans, vTrans, |
./pkg/cheapaml/cheapaml.F |
183 |
CHEAPAML |
uTrans(i,j)=uWind(i,j,bi,bj) |
./pkg/cheapaml/cheapaml.F |
189 |
CHEAPAML |
I uTrans, vTrans, |
./pkg/cheapaml/cheapaml.F |
222 |
CHEAPAML |
uTrans(i,j)=uWind(i,j,bi,bj) |
./pkg/cheapaml/cheapaml.F |
228 |
CHEAPAML |
I uTrans, vTrans, |
./pkg/cheapaml/cheapaml.F |
66 |
CHEAPAML |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/cheapaml/gad_2d_calc_rhs.F |
12 |
GAD_2D_CALC_RHS |
I uTrans,vTrans, |
./pkg/cheapaml/gad_2d_calc_rhs.F |
174 |
GAD_2D_CALC_RHS |
I uTrans, uTrans, |
./pkg/cheapaml/gad_2d_calc_rhs.F |
68 |
GAD_2D_CALC_RHS |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/diagnostics/diag_calc_psivel.F |
10 |
DIAG_CALC_PSIVEL |
I k, iPsi0, jPsi0, uTrans, vTrans, |
./pkg/diagnostics/diag_calc_psivel.F |
163 |
DIAG_CALC_PSIVEL |
& - uTrans(i,j,bi,bj) |
./pkg/diagnostics/diag_calc_psivel.F |
169 |
DIAG_CALC_PSIVEL |
& + uTrans(i,j,bi,bj) |
./pkg/diagnostics/diag_calc_psivel.F |
230 |
DIAG_CALC_PSIVEL |
& - uTrans(i,j,bi,bj) |
./pkg/diagnostics/diag_calc_psivel.F |
48 |
DIAG_CALC_PSIVEL |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/diagnostics/diagnostics_calc_phivel.F |
127 |
DIAGNOSTICS_CALC_PHIVEL |
uTrans(i,j,bi,bj) = dyG(i,j,bi,bj)*drF(k) |
./pkg/diagnostics/diagnostics_calc_phivel.F |
143 |
DIAGNOSTICS_CALC_PHIVEL |
& ( uTrans(i+1,j,bi,bj) - uTrans(i,j,bi,bj) ) |
./pkg/diagnostics/diagnostics_calc_phivel.F |
169 |
DIAGNOSTICS_CALC_PHIVEL |
I uTrans, vTrans, k, |
./pkg/diagnostics/diagnostics_calc_phivel.F |
268 |
DIAGNOSTICS_CALC_PHIVEL |
uTrans(i,j,bi,bj) = uTrans(i,j,bi,bj) |
./pkg/diagnostics/diagnostics_calc_phivel.F |
283 |
DIAGNOSTICS_CALC_PHIVEL |
I k, iPsi0, jPsi0, uTrans, vTrans, |
./pkg/diagnostics/diagnostics_calc_phivel.F |
79 |
DIAGNOSTICS_CALC_PHIVEL |
_RL uTrans(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |