File |
Line number |
Procedure |
Code |
./pkg/mom_vecinv/mom_vi_hdissip.F |
101 |
MOM_VI_HDISSIP |
& + viscAhD* ( Dij-Dim )*recip_DYC(i,j,bi,bj) |
./pkg/mom_vecinv/mom_vi_hdissip.F |
133 |
MOM_VI_HDISSIP |
Dij=dyF( i , j ,bi,bj)*dStar( i , j ) |
./pkg/mom_vecinv/mom_vi_hdissip.F |
141 |
MOM_VI_HDISSIP |
Dij=dStar( i , j ) |
./pkg/mom_vecinv/mom_vi_hdissip.F |
148 |
MOM_VI_HDISSIP |
Dij=Dij*viscA4_D(i,j) |
./pkg/mom_vecinv/mom_vi_hdissip.F |
157 |
MOM_VI_HDISSIP |
& ( (Dij-Dmj)*cosFacU(j,bi,bj) ) |
./pkg/mom_vecinv/mom_vi_hdissip.F |
165 |
MOM_VI_HDISSIP |
& + ( Dij-Dim ) |
./pkg/mom_vecinv/mom_vi_hdissip.F |
172 |
MOM_VI_HDISSIP |
& cosFacU(j,bi,bj)*( Dij-Dmj )*recip_DXC(i,j,bi,bj) |
./pkg/mom_vecinv/mom_vi_hdissip.F |
180 |
MOM_VI_HDISSIP |
& +( Dij-Dim )*recip_DYC(i,j,bi,bj) ) |
./pkg/mom_vecinv/mom_vi_hdissip.F |
197 |
MOM_VI_HDISSIP |
Dij=dyF( i , j ,bi,bj)*dStar( i , j ) |
./pkg/mom_vecinv/mom_vi_hdissip.F |
205 |
MOM_VI_HDISSIP |
Dij=dStar( i , j ) |
./pkg/mom_vecinv/mom_vi_hdissip.F |
218 |
MOM_VI_HDISSIP |
& viscA4D*( Dij-Dmj )*cosFacU(j,bi,bj) |
./pkg/mom_vecinv/mom_vi_hdissip.F |
226 |
MOM_VI_HDISSIP |
& + viscA4D*( Dij-Dim ) |
./pkg/mom_vecinv/mom_vi_hdissip.F |
233 |
MOM_VI_HDISSIP |
& cosFacU(j,bi,bj)*( Dij-Dmj )*recip_DXC(i,j,bi,bj) |
./pkg/mom_vecinv/mom_vi_hdissip.F |
241 |
MOM_VI_HDISSIP |
& + viscA4D* ( Dij-Dim )*recip_DYC(i,j,bi,bj) |
./pkg/mom_vecinv/mom_vi_hdissip.F |
43 |
MOM_VI_HDISSIP |
_RL Zip, Zij, Zpj, Dim, Dij, Dmj, uD2, vD2, uD4, vD4 |
./pkg/mom_vecinv/mom_vi_hdissip.F |
55 |
MOM_VI_HDISSIP |
Dij=hDiv( i , j )*viscAh_D(i,j) |
./pkg/mom_vecinv/mom_vi_hdissip.F |
63 |
MOM_VI_HDISSIP |
& cosFacU(j,bi,bj)*( Dij-Dmj )*recip_DXC(i,j,bi,bj) |
./pkg/mom_vecinv/mom_vi_hdissip.F |
71 |
MOM_VI_HDISSIP |
& +( Dij-Dim )*recip_DYC(i,j,bi,bj) ) |
./pkg/mom_vecinv/mom_vi_hdissip.F |
86 |
MOM_VI_HDISSIP |
Dij=hDiv( i , j ) |
./pkg/mom_vecinv/mom_vi_hdissip.F |
93 |
MOM_VI_HDISSIP |
& cosFacU(j,bi,bj)*( Dij-Dmj )*recip_DXC(i,j,bi,bj) |