File |
Line number |
Procedure |
Code |
./pkg/mom_common/mom_hdissip.F |
40 |
MOM_HDISSIP |
_RL vg2Min, vg2Max, AlinMax, AlinMin |
./pkg/mom_common/mom_hdissip.F |
70 |
MOM_HDISSIP |
AlinMin=vg2Min*lenA2 |
./pkg/mom_common/mom_hdissip.F |
71 |
MOM_HDISSIP |
viscA_t(i,j)=max(AlinMin,viscA_t(i,j)) |
./pkg/mom_common/mom_hdissip.F |
86 |
MOM_HDISSIP |
AlinMin=vg2Min*lenAz2 |
./pkg/mom_common/mom_hdissip.F |
87 |
MOM_HDISSIP |
viscA_s(i,j)=max(AlinMin,viscA_s(i,j)) |
./pkg/mom_vecinv/mom_vi_hdissip.F |
156 |
MOM_VI_HDISSIP |
AlinMin=vg2Min*L2 |
./pkg/mom_vecinv/mom_vi_hdissip.F |
157 |
MOM_VI_HDISSIP |
viscAh_D(i,j)=max(AlinMin,viscAh_D(i,j)) |
./pkg/mom_vecinv/mom_vi_hdissip.F |
171 |
MOM_VI_HDISSIP |
AlinMin=vg4Min*L4 |
./pkg/mom_vecinv/mom_vi_hdissip.F |
172 |
MOM_VI_HDISSIP |
viscA4_D(i,j)=max(AlinMin,viscA4_D(i,j)) |
./pkg/mom_vecinv/mom_vi_hdissip.F |
250 |
MOM_VI_HDISSIP |
AlinMin=vg2Min*L2 |
./pkg/mom_vecinv/mom_vi_hdissip.F |
251 |
MOM_VI_HDISSIP |
viscAh_Z(i,j)=max(AlinMin,viscAh_Z(i,j)) |
./pkg/mom_vecinv/mom_vi_hdissip.F |
265 |
MOM_VI_HDISSIP |
AlinMin=vg4Min*L4 |
./pkg/mom_vecinv/mom_vi_hdissip.F |
266 |
MOM_VI_HDISSIP |
viscA4_Z(i,j)=max(AlinMin,viscA4_Z(i,j)) |
./pkg/mom_vecinv/mom_vi_hdissip.F |
48 |
MOM_VI_HDISSIP |
_RL Alin,AlinMin,AlinMax,Alth2,Alth4,grdVrt,grdDiv |