| File |
Line number |
Procedure |
Code |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
102 |
MOM_VI_HDISSIP |
& cosFacV(j,bi,bj)*( Zpj-Zij )*recip_DXG(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
155 |
MOM_VI_HDISSIP |
Zpj=Zpj1*viscA4_Z(i+1,j) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
166 |
MOM_VI_HDISSIP |
& _recip_hFacS(i,j,k,bi,bj)*( (Zpj-Zij)*cosFacV(j,bi,bj) ) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
175 |
MOM_VI_HDISSIP |
Zpj=Zpj1 |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
184 |
MOM_VI_HDISSIP |
& _recip_hFacS(i,j,k,bi,bj)*viscA4*( (Zpj-Zij)*cosFacV(j,bi,bj) ) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
198 |
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 |
207 |
MOM_VI_HDISSIP |
Zpj=Zpj1 |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
216 |
MOM_VI_HDISSIP |
& cosFacV(j,bi,bj)*( Zpj-Zij )*recip_DXG(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
54 |
MOM_VI_HDISSIP |
_RL Zip,Zij,Zpj,Dim,Dij,Dmj,uD2,vD2,uD4,vD4 |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
71 |
MOM_VI_HDISSIP |
Zpj=hFacZ(i+1, j )*vort3(i+1, j )*viscAh_Z(i+1,j) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
80 |
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 |
92 |
MOM_VI_HDISSIP |
Zpj=hFacZ(i+1, j )*vort3(i+1, j ) |