File |
Line number |
Procedure |
Code |
./pkg/mom_common/mom_calc_absvort3.F |
25 |
MOM_CALC_ABSVORT3 |
_RL vort3(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/mom_common/mom_calc_absvort3.F |
48 |
MOM_CALC_ABSVORT3 |
& +vort3(i,j)*nonLinFac |
./pkg/mom_common/mom_calc_absvort3.F |
8 |
MOM_CALC_ABSVORT3 |
I vort3, |
./pkg/mom_common/mom_calc_relvort3.F |
10 |
MOM_CALC_RELVORT3 |
O vort3, |
./pkg/mom_common/mom_calc_relvort3.F |
117 |
MOM_CALC_RELVORT3 |
vort3(I,J)= |
./pkg/mom_common/mom_calc_relvort3.F |
131 |
MOM_CALC_RELVORT3 |
vort3(I-1,J)= |
./pkg/mom_common/mom_calc_relvort3.F |
140 |
MOM_CALC_RELVORT3 |
vort3(I,J-1)=vort3(I-1,J) |
./pkg/mom_common/mom_calc_relvort3.F |
159 |
MOM_CALC_RELVORT3 |
vort3(I,J)= |
./pkg/mom_common/mom_calc_relvort3.F |
166 |
MOM_CALC_RELVORT3 |
vort3(I,J)= |
./pkg/mom_common/mom_calc_relvort3.F |
173 |
MOM_CALC_RELVORT3 |
vort3(I,J)= |
./pkg/mom_common/mom_calc_relvort3.F |
188 |
MOM_CALC_RELVORT3 |
vort3(I+1,J)= |
./pkg/mom_common/mom_calc_relvort3.F |
197 |
MOM_CALC_RELVORT3 |
vort3(I,J-1)=vort3(I+1,J) |
./pkg/mom_common/mom_calc_relvort3.F |
216 |
MOM_CALC_RELVORT3 |
vort3(I,J)= |
./pkg/mom_common/mom_calc_relvort3.F |
223 |
MOM_CALC_RELVORT3 |
vort3(I,J)= |
./pkg/mom_common/mom_calc_relvort3.F |
230 |
MOM_CALC_RELVORT3 |
vort3(I,J)= |
./pkg/mom_common/mom_calc_relvort3.F |
245 |
MOM_CALC_RELVORT3 |
vort3(I-1,J)= |
./pkg/mom_common/mom_calc_relvort3.F |
254 |
MOM_CALC_RELVORT3 |
vort3(I,J+1)=vort3(I-1,J) |
./pkg/mom_common/mom_calc_relvort3.F |
273 |
MOM_CALC_RELVORT3 |
vort3(I,J)= |
./pkg/mom_common/mom_calc_relvort3.F |
280 |
MOM_CALC_RELVORT3 |
vort3(I,J)= |
./pkg/mom_common/mom_calc_relvort3.F |
295 |
MOM_CALC_RELVORT3 |
vort3(I+1,J)= |
./pkg/mom_common/mom_calc_relvort3.F |
304 |
MOM_CALC_RELVORT3 |
vort3(I,J+1)=vort3(I+1,J) |
./pkg/mom_common/mom_calc_relvort3.F |
33 |
MOM_CALC_RELVORT3 |
_RL vort3(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/mom_common/mom_calc_relvort3.F |
48 |
MOM_CALC_RELVORT3 |
vort3(I,J) = 0. _d 0 |
./pkg/mom_common/mom_calc_relvort3.F |
57 |
MOM_CALC_RELVORT3 |
vort3(I,J)= |
./pkg/mom_common/mom_calc_visc.F |
17 |
MOM_CALC_VISC |
I hDiv,vort3,tension,strain,KE,hFacZ, |
./pkg/mom_common/mom_calc_visc.F |
290 |
MOM_CALC_VISC |
vrtDx(i,j) = (vort3(i+1,j)-vort3(i,j)) |
./pkg/mom_common/mom_calc_visc.F |
301 |
MOM_CALC_VISC |
vrtDy(i,j) = (vort3(i,j+1)-vort3(i,j)) |
./pkg/mom_common/mom_calc_visc.F |
97 |
MOM_CALC_VISC |
_RL vort3(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/mom_fluxform/mom_fluxform.F |
149 |
MOM_FLUXFORM |
_RL vort3(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/mom_fluxform/mom_fluxform.F |
212 |
MOM_FLUXFORM |
vort3(i,j) = 0. |
./pkg/mom_fluxform/mom_fluxform.F |
311 |
MOM_FLUXFORM |
CALL MOM_CALC_RELVORT3( bi,bj,k,uFld,vFld,hFacZ,vort3,myThid ) |
./pkg/mom_fluxform/mom_fluxform.F |
317 |
MOM_FLUXFORM |
vort3(i,j) = sideMaskFac*vort3(i,j) |
./pkg/mom_fluxform/mom_fluxform.F |
325 |
MOM_FLUXFORM |
CALL DIAGNOSTICS_FILL(vort3, 'momVort3',k,1,2,bi,bj,myThid) |
./pkg/mom_fluxform/mom_fluxform.F |
400 |
MOM_FLUXFORM |
I hDiv, vort3, tension, strain, KE, hFacZ, |
./pkg/mom_vecinv/mom_vecinv.F |
114 |
MOM_VECINV |
_RL vort3 (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/mom_vecinv/mom_vecinv.F |
200 |
MOM_VECINV |
vort3(i,j) = 0. |
./pkg/mom_vecinv/mom_vecinv.F |
273 |
MOM_VECINV |
CALL MOM_CALC_RELVORT3(bi,bj,k,uFld,vFld,hFacZ,vort3,myThid) |
./pkg/mom_vecinv/mom_vecinv.F |
287 |
MOM_VECINV |
vort3BC(i,j) = vort3(i,j) |
./pkg/mom_vecinv/mom_vecinv.F |
290 |
MOM_VECINV |
vort3(i,j) = 0. |
./pkg/mom_vecinv/mom_vecinv.F |
397 |
MOM_VECINV |
CALL MOM_VI_DEL2UV(bi,bj,k,hDiv,vort3,hFacZ, |
./pkg/mom_vecinv/mom_vecinv.F |
436 |
MOM_VECINV |
I hDiv, vort3, dStar, zStar, hFacZ, |
./pkg/mom_vecinv/mom_vecinv.F |
598 |
MOM_VECINV |
& CALL MOM_CALC_ABSVORT3(bi,bj,k,vort3,omega3,myThid) |
./pkg/mom_vecinv/mom_vecinv.F |
676 |
MOM_VECINV |
& vFld,vort3, r_hFacZ, |
./pkg/mom_vecinv/mom_vecinv.F |
684 |
MOM_VECINV |
& vFld,vort3, hFacZ,r_hFacZ, |
./pkg/mom_vecinv/mom_vecinv.F |
701 |
MOM_VECINV |
& uFld,vort3, r_hFacZ, |
./pkg/mom_vecinv/mom_vecinv.F |
709 |
MOM_VECINV |
& uFld,vort3, hFacZ,r_hFacZ, |
./pkg/mom_vecinv/mom_vi_del2uv.F |
120 |
MOM_VI_DEL2UV |
& ( hFacZ(i+1,j)*vort3(i+1,j) - hFacZ(i,j)*vort3(i,j) ) |
./pkg/mom_vecinv/mom_vi_del2uv.F |
24 |
MOM_VI_DEL2UV |
_RL vort3(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/mom_vecinv/mom_vi_del2uv.F |
8 |
MOM_VI_DEL2UV |
I hDiv,vort3,hFacZ, |
./pkg/mom_vecinv/mom_vi_del2uv.F |
95 |
MOM_VI_DEL2UV |
& ( hFacZ(i,j+1)*vort3(i,j+1) - hFacZ(i,j)*vort3(i,j) ) |
./pkg/mom_vecinv/mom_vi_hdissip.F |
28 |
MOM_VI_HDISSIP |
_RL vort3(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/mom_vecinv/mom_vi_hdissip.F |
58 |
MOM_VI_HDISSIP |
Zij=hFacZ( i , j )*vort3( i , j )*viscAh_Z(i,j) |
./pkg/mom_vecinv/mom_vi_hdissip.F |
59 |
MOM_VI_HDISSIP |
Zip=hFacZ( i ,j+1)*vort3( i ,j+1)*viscAh_Z(i,j+1) |
./pkg/mom_vecinv/mom_vi_hdissip.F |
60 |
MOM_VI_HDISSIP |
Zpj=hFacZ(i+1, j )*vort3(i+1, j )*viscAh_Z(i+1,j) |
./pkg/mom_vecinv/mom_vi_hdissip.F |
88 |
MOM_VI_HDISSIP |
Zip=hFacZ( i ,j+1)*vort3( i ,j+1) |
./pkg/mom_vecinv/mom_vi_hdissip.F |
89 |
MOM_VI_HDISSIP |
Zij=hFacZ( i , j )*vort3( i , j ) |
./pkg/mom_vecinv/mom_vi_hdissip.F |
8 |
MOM_VI_HDISSIP |
I hDiv, vort3, dStar, zStar, hFacZ, |
./pkg/mom_vecinv/mom_vi_hdissip.F |
90 |
MOM_VI_HDISSIP |
Zpj=hFacZ(i+1, j )*vort3(i+1, j ) |
./pkg/monitor/mon_vort3.F |
135 |
MON_VORT3 |
vort3(i,j) = recip_rAz(i,j,bi,bj)*( |
./pkg/monitor/mon_vort3.F |
152 |
MON_VORT3 |
vort3(i,jMax)=0. |
./pkg/monitor/mon_vort3.F |
156 |
MON_VORT3 |
vort3(iMax,j)=0. |
./pkg/monitor/mon_vort3.F |
186 |
MON_VORT3 |
vort3(i,j)= |
./pkg/monitor/mon_vort3.F |
201 |
MON_VORT3 |
vort3(i,j)= |
./pkg/monitor/mon_vort3.F |
216 |
MON_VORT3 |
vort3(i,j)= |
./pkg/monitor/mon_vort3.F |
231 |
MON_VORT3 |
vort3(i,j)= |
./pkg/monitor/mon_vort3.F |
250 |
MON_VORT3 |
vort3(i,j) = 0. |
./pkg/monitor/mon_vort3.F |
251 |
MON_VORT3 |
vort3(1,j) = vort3(1,j) |
./pkg/monitor/mon_vort3.F |
263 |
MON_VORT3 |
vort3(1,j) = vort3(1,j)*recip_rAz(1,j,bi,bj) |
./pkg/monitor/mon_vort3.F |
268 |
MON_VORT3 |
vort3(i,j) = 0. |
./pkg/monitor/mon_vort3.F |
269 |
MON_VORT3 |
vort3(1,j) = vort3(1,j) |
./pkg/monitor/mon_vort3.F |
281 |
MON_VORT3 |
vort3(1,j) = vort3(1,j)*recip_rAz(1,j,bi,bj) |
./pkg/monitor/mon_vort3.F |
290 |
MON_VORT3 |
tmpVal = vort3(i,j) |
./pkg/monitor/mon_vort3.F |
46 |
MON_VORT3 |
_RL vort3(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/seaice/seaice_mom_advection.F |
121 |
SEAICE_MOM_ADVECTION |
vort3(i,j) = 0. |
./pkg/seaice/seaice_mom_advection.F |
154 |
SEAICE_MOM_ADVECTION |
CALL MOM_CALC_RELVORT3(bi,bj,k,uFld,vFld,hFacZ,vort3,myThid) |
./pkg/seaice/seaice_mom_advection.F |
187 |
SEAICE_MOM_ADVECTION |
& vFld,vort3,r_hFacZ, |
./pkg/seaice/seaice_mom_advection.F |
192 |
SEAICE_MOM_ADVECTION |
& vFld,vort3,hFacZ,r_hFacZ, |
./pkg/seaice/seaice_mom_advection.F |
204 |
SEAICE_MOM_ADVECTION |
& uFld,vort3,r_hFacZ, |
./pkg/seaice/seaice_mom_advection.F |
209 |
SEAICE_MOM_ADVECTION |
& uFld,vort3,hFacZ,r_hFacZ, |
./pkg/seaice/seaice_mom_advection.F |
76 |
SEAICE_MOM_ADVECTION |
_RL vort3 (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/shap_filt/shap_filt_relvort3.F |
10 |
SHAP_FILT_RELVORT3 |
O vort3, |
./pkg/shap_filt/shap_filt_relvort3.F |
124 |
SHAP_FILT_RELVORT3 |
vort3(I,J)= |
./pkg/shap_filt/shap_filt_relvort3.F |
139 |
SHAP_FILT_RELVORT3 |
vort3(I-1,J)= |
./pkg/shap_filt/shap_filt_relvort3.F |
148 |
SHAP_FILT_RELVORT3 |
vort3(I,J-1)=vort3(I-1,J) |
./pkg/shap_filt/shap_filt_relvort3.F |
167 |
SHAP_FILT_RELVORT3 |
vort3(I,J)= |
./pkg/shap_filt/shap_filt_relvort3.F |
174 |
SHAP_FILT_RELVORT3 |
vort3(I,J)= |
./pkg/shap_filt/shap_filt_relvort3.F |
181 |
SHAP_FILT_RELVORT3 |
vort3(I,J)= |
./pkg/shap_filt/shap_filt_relvort3.F |
197 |
SHAP_FILT_RELVORT3 |
vort3(I+1,J)= |
./pkg/shap_filt/shap_filt_relvort3.F |
206 |
SHAP_FILT_RELVORT3 |
vort3(I,J-1)=vort3(I+1,J) |
./pkg/shap_filt/shap_filt_relvort3.F |
225 |
SHAP_FILT_RELVORT3 |
vort3(I,J)= |
./pkg/shap_filt/shap_filt_relvort3.F |
232 |
SHAP_FILT_RELVORT3 |
vort3(I,J)= |
./pkg/shap_filt/shap_filt_relvort3.F |
239 |
SHAP_FILT_RELVORT3 |
vort3(I,J)= |
./pkg/shap_filt/shap_filt_relvort3.F |
255 |
SHAP_FILT_RELVORT3 |
vort3(I-1,J)= |
./pkg/shap_filt/shap_filt_relvort3.F |
264 |
SHAP_FILT_RELVORT3 |
vort3(I,J+1)=vort3(I-1,J) |
./pkg/shap_filt/shap_filt_relvort3.F |
283 |
SHAP_FILT_RELVORT3 |
vort3(I,J)= |
./pkg/shap_filt/shap_filt_relvort3.F |
290 |
SHAP_FILT_RELVORT3 |
vort3(I,J)= |
./pkg/shap_filt/shap_filt_relvort3.F |
306 |
SHAP_FILT_RELVORT3 |
vort3(I+1,J)= |
./pkg/shap_filt/shap_filt_relvort3.F |
315 |
SHAP_FILT_RELVORT3 |
vort3(I,J+1)=vort3(I+1,J) |
./pkg/shap_filt/shap_filt_relvort3.F |
36 |
SHAP_FILT_RELVORT3 |
_RL vort3(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/shap_filt/shap_filt_relvort3.F |
52 |
SHAP_FILT_RELVORT3 |
vort3(I,J) = 0. _d 0 |
./pkg/shap_filt/shap_filt_relvort3.F |
61 |
SHAP_FILT_RELVORT3 |
vort3(I,J)= |
./pkg/shap_filt/shap_filt_uv_s2.F |
128 |
SHAP_FILT_UV_S2 |
& hFacZ,vort3,myThid) |
./pkg/shap_filt/shap_filt_uv_s2.F |
133 |
SHAP_FILT_UV_S2 |
& hFacZ,vort3,myThid) |
./pkg/shap_filt/shap_filt_uv_s2.F |
146 |
SHAP_FILT_UV_S2 |
O vort3, |
./pkg/shap_filt/shap_filt_uv_s2.F |
161 |
SHAP_FILT_UV_S2 |
vort3(i,j)= vort3(i,j)*rAz(i,j,bi,bj) |
./pkg/shap_filt/shap_filt_uv_s2.F |
166 |
SHAP_FILT_UV_S2 |
I bi,bj,k,hDiv,vort3,hFacZ, |
./pkg/shap_filt/shap_filt_uv_s2.F |
212 |
SHAP_FILT_UV_S2 |
& -(vort3(i,j+1)-vort3(i,j)) |
./pkg/shap_filt/shap_filt_uv_s2.F |
228 |
SHAP_FILT_UV_S2 |
& +(vort3(i+1,j)-vort3(i,j)) |
./pkg/shap_filt/shap_filt_uv_s2.F |
71 |
SHAP_FILT_UV_S2 |
_RL vort3(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./verification/aim.5l_cs/code/mom_vi_mask_vort3.F |
25 |
MOM_VI_MASK_VORT3 |
_RL vort3(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./verification/aim.5l_cs/code/mom_vi_mask_vort3.F |
50 |
MOM_VI_MASK_VORT3 |
vort3(i,j)=0. |
./verification/aim.5l_cs/code/mom_vi_mask_vort3.F |
9 |
MOM_VI_MASK_VORT3 |
U vort3, |