| File |
Line number |
Procedure |
Code |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
102 |
MOM_VI_U_CORIOLIS_C4 |
vort3r(i,j-1) = ( vort3r(i,j-1) + vort3r(i-1,j) )*0.5 _d 0 |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
107 |
MOM_VI_U_CORIOLIS_C4 |
vort3r(i,j+1) = ( vort3r(i,j+1) + vort3r(i+1,j) )*0.5 _d 0 |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
112 |
MOM_VI_U_CORIOLIS_C4 |
vort3r(i,j+1) = ( vort3r(i,j+1) + vort3r(i-1,j) )*0.5 _d 0 |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
136 |
MOM_VI_U_CORIOLIS_C4 |
vort3u=vort3r(i,j) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
138 |
MOM_VI_U_CORIOLIS_C4 |
vort3u=vort3r(i,j+1) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
141 |
MOM_VI_U_CORIOLIS_C4 |
Rjp = vort3r(i,j+2) - vort3r(i,j+1) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
142 |
MOM_VI_U_CORIOLIS_C4 |
Rjm = vort3r(i, j ) - vort3r(i,j-1) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
143 |
MOM_VI_U_CORIOLIS_C4 |
vort3u=0.5*( vort3r(i,j) + vort3r(i,j+1) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
147 |
MOM_VI_U_CORIOLIS_C4 |
vort3u=0.5*( vort3r(i,j) + vort3r(i,j+1) ) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
172 |
MOM_VI_U_CORIOLIS_C4 |
vort3u=vBarXm*vort3r(i, j ) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
174 |
MOM_VI_U_CORIOLIS_C4 |
vort3u=vBarXp*vort3r(i,j+1) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
177 |
MOM_VI_U_CORIOLIS_C4 |
Rjp = vort3r(i,j+1) -oneSixth*( vort3r(i,j+2)-vort3r(i, j ) ) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
178 |
MOM_VI_U_CORIOLIS_C4 |
Rjm = vort3r(i, j ) +oneSixth*( vort3r(i,j+1)-vort3r(i,j-1) ) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
181 |
MOM_VI_U_CORIOLIS_C4 |
vort3u=0.5*( vBarXm*vort3r(i, j ) + vBarXp*vort3r(i,j+1) ) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
50 |
MOM_VI_U_CORIOLIS_C4 |
_RL vort3r(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_u_coriolis_c4.F |
97 |
MOM_VI_U_CORIOLIS_C4 |
vort3r(i,j-1) = ( vort3r(i,j-1) + vort3r(i+1,j) )*0.5 _d 0 |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
102 |
MOM_VI_V_CORIOLIS_C4 |
vort3r(i+1,j) = ( vort3r(i+1,j) + vort3r(i,j+1) )*0.5 _d 0 |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
107 |
MOM_VI_V_CORIOLIS_C4 |
vort3r(i-1,j) = ( vort3r(i-1,j) + vort3r(i,j-1) )*0.5 _d 0 |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
112 |
MOM_VI_V_CORIOLIS_C4 |
vort3r(i+1,j) = ( vort3r(i+1,j) + vort3r(i,j-1) )*0.5 _d 0 |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
136 |
MOM_VI_V_CORIOLIS_C4 |
vort3v=vort3r(i,j) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
138 |
MOM_VI_V_CORIOLIS_C4 |
vort3v=vort3r(i+1,j) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
141 |
MOM_VI_V_CORIOLIS_C4 |
Rjp = vort3r(i+2,j) - vort3r(i+1,j) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
142 |
MOM_VI_V_CORIOLIS_C4 |
Rjm = vort3r( i ,j) - vort3r(i-1,j) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
143 |
MOM_VI_V_CORIOLIS_C4 |
vort3v=0.5*( vort3r(i,j) + vort3r(i+1,j) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
147 |
MOM_VI_V_CORIOLIS_C4 |
vort3v=0.5*( vort3r(i,j) + vort3r(i+1,j) ) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
172 |
MOM_VI_V_CORIOLIS_C4 |
vort3v=uBarYm*vort3r( i ,j) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
174 |
MOM_VI_V_CORIOLIS_C4 |
vort3v=uBarYp*vort3r(i+1,j) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
177 |
MOM_VI_V_CORIOLIS_C4 |
Rjp = vort3r(i+1,j) -oneSixth*( vort3r(i+2,j)-vort3r( i ,j) ) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
178 |
MOM_VI_V_CORIOLIS_C4 |
Rjm = vort3r( i ,j) +oneSixth*( vort3r(i+1,j)-vort3r(i-1,j) ) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
181 |
MOM_VI_V_CORIOLIS_C4 |
vort3v=0.5*( uBarYm*vort3r( i ,j) + uBarYp*vort3r(i+1,j) ) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
50 |
MOM_VI_V_CORIOLIS_C4 |
_RL vort3r(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) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
97 |
MOM_VI_V_CORIOLIS_C4 |
vort3r(i-1,j) = ( vort3r(i-1,j) + vort3r(i,j+1) )*0.5 _d 0 |