File |
Line number |
Procedure |
Code |
./pkg/mom_vecinv/mom_vi_hdissip.F |
110 |
MOM_VI_HDISSIP |
Alth2=sqrt(viscC2leith**2*grdVrt+viscC2leithD**2*grdDiv)*L3 |
./pkg/mom_vecinv/mom_vi_hdissip.F |
112 |
MOM_VI_HDISSIP |
Alth2=0. _d 0 |
./pkg/mom_vecinv/mom_vi_hdissip.F |
140 |
MOM_VI_HDISSIP |
Alth2=(viscC2leith*grdVrt+(viscC2leithD*grdDiv))*L3 |
./pkg/mom_vecinv/mom_vi_hdissip.F |
145 |
MOM_VI_HDISSIP |
Alin=viscAhD+vg2*L2+Alth2 |
./pkg/mom_vecinv/mom_vi_hdissip.F |
205 |
MOM_VI_HDISSIP |
Alth2=sqrt(viscC2leith**2*grdVrt+viscC2leithD**2*grdDiv)*L3 |
./pkg/mom_vecinv/mom_vi_hdissip.F |
207 |
MOM_VI_HDISSIP |
Alth2=0. _d 0 |
./pkg/mom_vecinv/mom_vi_hdissip.F |
234 |
MOM_VI_HDISSIP |
Alth2=(viscC2leith*grdVrt+(viscC2leithD*grdDiv))*L3 |
./pkg/mom_vecinv/mom_vi_hdissip.F |
239 |
MOM_VI_HDISSIP |
Alin=viscAhZ+vg2*L2+Alth2 |
./pkg/mom_vecinv/mom_vi_hdissip.F |
48 |
MOM_VI_HDISSIP |
_RL Alin,AlinMin,AlinMax,Alth2,Alth4,grdVrt,grdDiv |