File |
Line number |
Procedure |
Code |
./pkg/mom_vecinv/mom_vi_hdissip.F |
373 |
MOM_VI_HDISSIP |
vD4 = recip_rAs(i,j,bi,bj)*( |
./pkg/mom_vecinv/mom_vi_hdissip.F |
380 |
MOM_VI_HDISSIP |
vD4 = recip_rAs(i,j,bi,bj)*( |
./pkg/mom_vecinv/mom_vi_hdissip.F |
387 |
MOM_VI_HDISSIP |
vD4 = ( |
./pkg/mom_vecinv/mom_vi_hdissip.F |
396 |
MOM_VI_HDISSIP |
vD4 = viscA4Z*recip_hFacS(i,j,k,bi,bj)* |
./pkg/mom_vecinv/mom_vi_hdissip.F |
403 |
MOM_VI_HDISSIP |
vDissip(i,j) = vDissip(i,j) - vD4 |
./pkg/mom_vecinv/mom_vi_hdissip.F |
47 |
MOM_VI_HDISSIP |
_RL Zip,Zij,Zpj,Dim,Dij,Dmj,uD2,vD2,uD4,vD4 |