_RL lenA2, lenAz2
lenAz2=(2*rAz(i,j,bi,bj)/
Asmag=smagfac*lenAz2
AlinMax=vg2Max*lenAz2
AlinMin=vg2Min*lenAz2