| File |
Line number |
Procedure |
Code |
|
./pkg/mom_common/mom_calc_absvort3.F |
26 |
MOM_CALC_ABSVORT3 |
_RL omega3(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_common/mom_calc_absvort3.F |
46 |
MOM_CALC_ABSVORT3 |
omega3(I,J)= |
|
./pkg/mom_common/mom_calc_absvort3.F |
9 |
MOM_CALC_ABSVORT3 |
O omega3, |
|
./pkg/mom_vecinv/mom_vecinv.F |
177 |
MOM_VECINV |
omega3(i,j)= 0. |
|
./pkg/mom_vecinv/mom_vecinv.F |
485 |
MOM_VECINV |
& CALL MOM_CALC_ABSVORT3(bi,bj,k,vort3,omega3,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
495 |
MOM_VECINV |
CALL MOM_VI_U_CORIOLIS(bi,bj,K,vFld,omega3,hFacZ,r_hFacZ, |
|
./pkg/mom_vecinv/mom_vecinv.F |
497 |
MOM_VECINV |
CALL MOM_VI_V_CORIOLIS(bi,bj,K,uFld,omega3,hFacZ,r_hFacZ, |
|
./pkg/mom_vecinv/mom_vecinv.F |
542 |
MOM_VECINV |
CALL MOM_VI_U_CORIOLIS_C4(bi,bj,k,vFld,omega3,r_hFacZ, |
|
./pkg/mom_vecinv/mom_vecinv.F |
548 |
MOM_VECINV |
CALL MOM_VI_U_CORIOLIS(bi,bj,K,vFld,omega3,hFacZ,r_hFacZ, |
|
./pkg/mom_vecinv/mom_vecinv.F |
561 |
MOM_VECINV |
CALL MOM_VI_V_CORIOLIS_C4(bi,bj,K,uFld,omega3,r_hFacZ, |
|
./pkg/mom_vecinv/mom_vecinv.F |
567 |
MOM_VECINV |
CALL MOM_VI_V_CORIOLIS(bi,bj,K,uFld,omega3,hFacZ,r_hFacZ, |
|
./pkg/mom_vecinv/mom_vecinv.F |
717 |
MOM_VECINV |
CALL WRITE_LOCAL_RL('W3','I10',1,omega3, bi,bj,k,myIter,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
726 |
MOM_VECINV |
CALL MNC_CW_RL_W_OFFSET(pf,'mom_vi',bi,bj,'W3',omega3, |
|
./pkg/mom_vecinv/mom_vecinv.F |
89 |
MOM_VECINV |
_RL omega3 (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
101 |
MOM_VI_U_CORIOLIS |
vort3u=omega3(i,j+1) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
104 |
MOM_VI_U_CORIOLIS |
vort3u=0.5*(omega3(i,j)+omega3(i,j+1)) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
11 |
MOM_VI_U_CORIOLIS |
I vFld, omega3, hFacZ, r_hFacZ, |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
124 |
MOM_VI_U_CORIOLIS |
vort3u=vBarXm*r_hFacZ(i, j )*omega3(i, j ) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
126 |
MOM_VI_U_CORIOLIS |
vort3u=vBarXp*r_hFacZ(i,j+1)*omega3(i,j+1) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
129 |
MOM_VI_U_CORIOLIS |
vort3u = ( vBarXm*r_hFacZ(i, j )*omega3(i, j ) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
130 |
MOM_VI_U_CORIOLIS |
& +vBarXp*r_hFacZ(i,j+1)*omega3(i,j+1) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
147 |
MOM_VI_U_CORIOLIS |
vort3mj= ( r_hFacZ(i, j )*omega3(i, j ) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
148 |
MOM_VI_U_CORIOLIS |
& +(r_hFacZ(i,j+1)*omega3(i,j+1) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
149 |
MOM_VI_U_CORIOLIS |
& +r_hFacZ(i-1,j)*omega3(i-1,j) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
153 |
MOM_VI_U_CORIOLIS |
vort3ij= ( r_hFacZ(i, j )*omega3(i, j ) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
154 |
MOM_VI_U_CORIOLIS |
& +(r_hFacZ(i,j+1)*omega3(i,j+1) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
155 |
MOM_VI_U_CORIOLIS |
& +r_hFacZ(i+1,j)*omega3(i+1,j) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
159 |
MOM_VI_U_CORIOLIS |
vort3mp= ( r_hFacZ(i,j+1)*omega3(i,j+1) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
160 |
MOM_VI_U_CORIOLIS |
& +(r_hFacZ(i, j )*omega3(i, j ) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
161 |
MOM_VI_U_CORIOLIS |
& +r_hFacZ(i-1,j+1)*omega3(i-1,j+1) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
165 |
MOM_VI_U_CORIOLIS |
vort3ip= ( r_hFacZ(i,j+1)*omega3(i,j+1) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
166 |
MOM_VI_U_CORIOLIS |
& +(r_hFacZ(i, j )*omega3(i, j ) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
167 |
MOM_VI_U_CORIOLIS |
& +r_hFacZ(i+1,j+1)*omega3(i+1,j+1) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
36 |
MOM_VI_U_CORIOLIS |
_RL omega3 (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
73 |
MOM_VI_U_CORIOLIS |
vort3u=omega3(i,j)*r_hFacZ(i,j) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
75 |
MOM_VI_U_CORIOLIS |
vort3u=omega3(i,j+1)*r_hFacZ(i,j+1) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
78 |
MOM_VI_U_CORIOLIS |
vort3u=0.5*(omega3(i,j)*r_hFacZ(i,j) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
79 |
MOM_VI_U_CORIOLIS |
& +omega3(i,j+1)*r_hFacZ(i,j+1)) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
99 |
MOM_VI_U_CORIOLIS |
vort3u=omega3(i,j) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
11 |
MOM_VI_U_CORIOLIS_C4 |
I vFld,omega3,r_hFacZ, |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
40 |
MOM_VI_U_CORIOLIS_C4 |
_RL omega3(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
69 |
MOM_VI_U_CORIOLIS_C4 |
vort3r(i,j) = r_hFacZ(i,j)*omega3(i,j) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
101 |
MOM_VI_V_CORIOLIS |
vort3v=omega3(i+1,j) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
104 |
MOM_VI_V_CORIOLIS |
vort3v=0.5*(omega3(i,j)+omega3(i+1,j)) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
11 |
MOM_VI_V_CORIOLIS |
I uFld, omega3, hFacZ, r_hFacZ, |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
124 |
MOM_VI_V_CORIOLIS |
vort3v=uBarYm*r_hFacZ( i ,j)*omega3( i ,j) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
126 |
MOM_VI_V_CORIOLIS |
vort3v=uBarYp*r_hFacZ(i+1,j)*omega3(i+1,j) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
129 |
MOM_VI_V_CORIOLIS |
vort3v = ( uBarYm*r_hFacZ( i ,j)*omega3( i ,j) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
130 |
MOM_VI_V_CORIOLIS |
& +uBarYp*r_hFacZ(i+1,j)*omega3(i+1,j) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
147 |
MOM_VI_V_CORIOLIS |
vort3im= ( r_hFacZ(i, j )*omega3(i, j ) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
148 |
MOM_VI_V_CORIOLIS |
& +(r_hFacZ(i+1,j)*omega3(i+1,j) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
149 |
MOM_VI_V_CORIOLIS |
& +r_hFacZ(i,j-1)*omega3(i,j-1) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
153 |
MOM_VI_V_CORIOLIS |
vort3ij= ( r_hFacZ(i, j )*omega3(i, j ) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
154 |
MOM_VI_V_CORIOLIS |
& +(r_hFacZ(i+1,j)*omega3(i+1,j) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
155 |
MOM_VI_V_CORIOLIS |
& +r_hFacZ(i,j+1)*omega3(i,j+1) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
159 |
MOM_VI_V_CORIOLIS |
vort3pm= ( r_hFacZ(i+1,j)*omega3(i+1,j) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
160 |
MOM_VI_V_CORIOLIS |
& +(r_hFacZ(i, j )*omega3(i, j ) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
161 |
MOM_VI_V_CORIOLIS |
& +r_hFacZ(i+1,j-1)*omega3(i+1,j-1) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
165 |
MOM_VI_V_CORIOLIS |
vort3pj= ( r_hFacZ(i+1,j)*omega3(i+1,j) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
166 |
MOM_VI_V_CORIOLIS |
& +(r_hFacZ(i, j )*omega3(i, j ) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
167 |
MOM_VI_V_CORIOLIS |
& +r_hFacZ(i+1,j+1)*omega3(i+1,j+1) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
36 |
MOM_VI_V_CORIOLIS |
_RL omega3 (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
73 |
MOM_VI_V_CORIOLIS |
vort3v=omega3(i,j)*r_hFacZ(i,j) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
75 |
MOM_VI_V_CORIOLIS |
vort3v=omega3(i+1,j)*r_hFacZ(i+1,j) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
78 |
MOM_VI_V_CORIOLIS |
vort3v=0.5*(omega3(i,j)*r_hFacZ(i,j) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
79 |
MOM_VI_V_CORIOLIS |
& +omega3(i+1,j)*r_hFacZ(i+1,j)) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
99 |
MOM_VI_V_CORIOLIS |
vort3v=omega3(i,j) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
11 |
MOM_VI_V_CORIOLIS_C4 |
I uFld,omega3,r_hFacZ, |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
40 |
MOM_VI_V_CORIOLIS_C4 |
_RL omega3(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
69 |
MOM_VI_V_CORIOLIS_C4 |
vort3r(i,j) = r_hFacZ(i,j)*omega3(i,j) |