File |
Line number |
Procedure |
Code |
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
155 |
MOM_VI_U_CORIOLIS |
vort3ij= ( r_hFacZ(i, j )*omega3(i, j ) |
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
174 |
MOM_VI_U_CORIOLIS |
uCoriolisTerm(i,j)= +( (vort3mj+vort3ij)+(vort3mp+vort3ip) ) |
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
52 |
MOM_VI_U_CORIOLIS |
_RL vort3mj, vort3ij, vort3mp, vort3ip |
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
155 |
MOM_VI_V_CORIOLIS |
vort3ij= ( r_hFacZ(i, j )*omega3(i, j ) |
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
174 |
MOM_VI_V_CORIOLIS |
vCoriolisTerm(i,j)= -( (vort3im+vort3ij)+(vort3pm+vort3pj) ) |
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
52 |
MOM_VI_V_CORIOLIS |
_RL vort3im, vort3ij, vort3pm, vort3pj |