# | Line 20 | Line 20 | kfindrow(r, pol) : if(r-kpola(0)+.5, r, | |
---|---|---|
20 | ||
21 | kazn(azi,inc) : if((360-.5*inc)-azi, floor((azi+.5*inc)/inc), 0); | |
22 | ||
23 | < | kbin2(pol,azi) = if(pol-90, Nkbins, |
23 | > | kbin2(pol,azi) = if(pol-90, -1, |
24 | select(kfindrow(1, pol), | |
25 | kazn(azi,360/knaz(1)), | |
26 | kaccum(1) + kazn(azi,360/knaz(2)), |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |