| File |
Line number |
Procedure |
Code |
|
./pkg/mom_vecinv/mom_vi_del2uv.F |
164 |
MOM_VI_DEL2UV |
& recip_hFacS(i,j,k,bi,bj)*( Zpj-Zij )*recip_DXG(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
103 |
MOM_VI_HDISSIP |
& ((hDiv(i+1,j)-hDiv(i,j))*recip_DXG(i,j,bi,bj))**2 |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
105 |
MOM_VI_HDISSIP |
& +((hDiv(i-1,j)-hDiv(i,j))*recip_DXG(i-1,j,bi,bj))**2 |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
123 |
MOM_VI_HDISSIP |
grdVrt=abs((vort3(i+1,j)-vort3(i,j))*recip_DXG(i,j,bi,bj)) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
127 |
MOM_VI_HDISSIP |
& abs((vort3(i+1,j+1)-vort3(i,j+1))*recip_DXG(i,j+1,bi,bj))) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
131 |
MOM_VI_HDISSIP |
grdDiv=abs((hDiv(i+1,j)-hDiv(i,j))*recip_DXG(i,j,bi,bj)) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
135 |
MOM_VI_HDISSIP |
& abs((hDiv(i-1,j)-hDiv(i,j))*recip_DXG(i-1,j,bi,bj))) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
191 |
MOM_VI_HDISSIP |
& ((vort3(i+1,j)-vort3(i,j))*recip_DXG(i,j,bi,bj))**2 |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
193 |
MOM_VI_HDISSIP |
& +((vort3(i-1,j)-vort3(i,j))*recip_DXG(i-1,j,bi,bj))**2 |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
198 |
MOM_VI_HDISSIP |
& ((hDiv(i+1,j)-hDiv(i,j))*recip_DXG(i,j,bi,bj))**2 |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
200 |
MOM_VI_HDISSIP |
& +((hDiv(i+1,j+1)-hDiv(i,j+1))*recip_DXG(i,j+1,bi,bj))**2 |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
217 |
MOM_VI_HDISSIP |
grdVrt=abs((vort3(i+1,j)-vort3(i,j))*recip_DXG(i,j,bi,bj)) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
221 |
MOM_VI_HDISSIP |
& abs((vort3(i-1,j)-vort3(i,j))*recip_DXG(i-1,j,bi,bj))) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
225 |
MOM_VI_HDISSIP |
grdDiv=abs((hDiv(i+1,j)-hDiv(i,j))*recip_DXG(i,j,bi,bj)) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
229 |
MOM_VI_HDISSIP |
& abs((hDiv(i+1,j+1)-hDiv(i,j+1))*recip_DXG(i-1,j,bi,bj))) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
307 |
MOM_VI_HDISSIP |
& recip_hFacS(i,j,k,bi,bj)*( Zpj-Zij )*recip_DXG(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
316 |
MOM_VI_HDISSIP |
& cosFacV(j,bi,bj)*( Zpj-Zij )*recip_DXG(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
388 |
MOM_VI_HDISSIP |
& recip_hFacS(i,j,k,bi,bj)*( Zpj-Zij )*recip_DXG(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
397 |
MOM_VI_HDISSIP |
& cosFacV(j,bi,bj)*( Zpj-Zij )*recip_DXG(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
95 |
MOM_VI_HDISSIP |
& ((vort3(i+1,j)-vort3(i,j))*recip_DXG(i,j,bi,bj))**2 |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
97 |
MOM_VI_HDISSIP |
& +((vort3(i+1,j+1)-vort3(i,j+1))*recip_DXG(i,j+1,bi,bj))**2 |