| File |
Line number |
Procedure |
Code |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
134 |
MOM_VI_HDISSIP |
Dmj=dyF(i-1, j ,bi,bj)*dStar(i-1, j ) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
142 |
MOM_VI_HDISSIP |
Dmj=dStar(i-1, j ) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
150 |
MOM_VI_HDISSIP |
Dmj=Dmj*viscA4_D(i-1,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 |
172 |
MOM_VI_HDISSIP |
& cosFacU(j,bi,bj)*( Dij-Dmj )*recip_DXC(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
198 |
MOM_VI_HDISSIP |
Dmj=dyF(i-1, j ,bi,bj)*dStar(i-1, j ) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
206 |
MOM_VI_HDISSIP |
Dmj=dStar(i-1, 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 |
233 |
MOM_VI_HDISSIP |
& cosFacU(j,bi,bj)*( Dij-Dmj )*recip_DXC(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 |
57 |
MOM_VI_HDISSIP |
Dmj=hDiv(i-1, j )*viscAh_D(i-1,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 |
87 |
MOM_VI_HDISSIP |
Dmj=hDiv(i-1, j ) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
93 |
MOM_VI_HDISSIP |
& cosFacU(j,bi,bj)*( Dij-Dmj )*recip_DXC(i,j,bi,bj) |