| File |
Line number |
Procedure |
Code |
|
./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 |
104 |
MOM_VI_HDISSIP |
& +((hDiv(i,j+1)-hDiv(i,j))*recip_DYG(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 |
106 |
MOM_VI_HDISSIP |
& +((hDiv(i,j-1)-hDiv(i,j))*recip_DYG(i,j-1,bi,bj))**2) |
|
./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 |
133 |
MOM_VI_HDISSIP |
& abs((hDiv(i,j+1)-hDiv(i,j))*recip_DYG(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 |
137 |
MOM_VI_HDISSIP |
& abs((hDiv(i,j-1)-hDiv(i,j))*recip_DYG(i,j-1,bi,bj))) |
|
./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 |
199 |
MOM_VI_HDISSIP |
& +((hDiv(i,j+1)-hDiv(i,j))*recip_DYG(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 |
201 |
MOM_VI_HDISSIP |
& +((hDiv(i+1,j+1)-hDiv(i+1,j))*recip_DYG(i+1,j,bi,bj))**2) |
|
./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 |
227 |
MOM_VI_HDISSIP |
& abs((hDiv(i,j+1)-hDiv(i,j))*recip_DYG(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 |
231 |
MOM_VI_HDISSIP |
& abs((hDiv(i+1,j+1)-hDiv(i+1,j))*recip_DYG(i,j-1,bi,bj))) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
286 |
MOM_VI_HDISSIP |
Dim=hDiv( i ,j-1) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
287 |
MOM_VI_HDISSIP |
Dij=hDiv( i , j ) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
288 |
MOM_VI_HDISSIP |
Dmj=hDiv(i-1, j ) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
32 |
MOM_VI_HDISSIP |
_RL hDiv(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
8 |
MOM_VI_HDISSIP |
I hDiv,vort3,hFacZ,dStar,zStar, |