| File |
Line number |
Procedure |
Code |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
101 |
MOM_VI_U_CORIOLIS |
vort3u=omega3(i,j) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
103 |
MOM_VI_U_CORIOLIS |
vort3u=omega3(i,j+1) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
106 |
MOM_VI_U_CORIOLIS |
vort3u=0.5*(omega3(i,j)+omega3(i,j+1)) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
108 |
MOM_VI_U_CORIOLIS |
uCoriolisTerm(i,j)= +vort3u*vBarXY*recip_dxC(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
126 |
MOM_VI_U_CORIOLIS |
vort3u=vBarXm*r_hFacZ(i, j )*omega3(i, j ) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
128 |
MOM_VI_U_CORIOLIS |
vort3u=vBarXp*r_hFacZ(i,j+1)*omega3(i,j+1) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
131 |
MOM_VI_U_CORIOLIS |
vort3u = ( vBarXm*r_hFacZ(i, j )*omega3(i, j ) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
135 |
MOM_VI_U_CORIOLIS |
uCoriolisTerm(i,j)= +vort3u*recip_dxC(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
51 |
MOM_VI_U_CORIOLIS |
_RL vort3u |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
75 |
MOM_VI_U_CORIOLIS |
vort3u=omega3(i,j)*r_hFacZ(i,j) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
77 |
MOM_VI_U_CORIOLIS |
vort3u=omega3(i,j+1)*r_hFacZ(i,j+1) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
80 |
MOM_VI_U_CORIOLIS |
vort3u=0.5*(omega3(i,j)*r_hFacZ(i,j) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
83 |
MOM_VI_U_CORIOLIS |
uCoriolisTerm(i,j)= +vort3u*vBarXY*recip_dxC(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
139 |
MOM_VI_U_CORIOLIS_C4 |
vort3u=vort3r(i,j) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
141 |
MOM_VI_U_CORIOLIS_C4 |
vort3u=vort3r(i,j+1) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
151 |
MOM_VI_U_CORIOLIS_C4 |
vort3u=0.5*( (vort3r(i,j) + vort3r(i,j+1)) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
155 |
MOM_VI_U_CORIOLIS_C4 |
vort3u=0.5*( vort3r(i,j) + vort3r(i,j+1) ) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
158 |
MOM_VI_U_CORIOLIS_C4 |
uCoriolisTerm(i,j) = vort3u*vBarXY*recip_dxC(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
180 |
MOM_VI_U_CORIOLIS_C4 |
vort3u=vBarXm*vort3r(i, j ) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
182 |
MOM_VI_U_CORIOLIS_C4 |
vort3u=vBarXp*vort3r(i,j+1) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
197 |
MOM_VI_U_CORIOLIS_C4 |
vort3u=0.5*( vBarXm*Rjm + vBarXp*Rjp ) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
199 |
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 |
202 |
MOM_VI_U_CORIOLIS_C4 |
uCoriolisTerm(i,j) = vort3u*recip_dxC(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
53 |
MOM_VI_U_CORIOLIS_C4 |
_RL vBarXY,vort3u,Rjp,Rjm,Rj |