3410    LET P$(i)="S8"3415    GOTO 42103420    IF 0.49^2<x(i)^2+y(i)^2 AND x(i)^2+y(i)^2<0.76^2 AND x(i)*TAN(9)<y(i) AND y(i)<x(i)*TAN(-9) THEN GOTO 34303421    IF 0.49^2>x(i)^2+y(i)^2 OR x(i)^2+y(i)^2>0.76^2 OR x(i)*TAN(9)>y(i) OR y(i)>x(i)*TAN(-9) THEN GOTO 34503422    IF 0.49^2=x(i)^2+y(i)^2 OR x(i)^2+y(i)^2=0.76^2 OR x(i)*TAN(9)=y(i) OR y(i)=x(i)*TAN(-9) THEN GOTO 41903430    LET P(i)=113440    LET P$(i)="S11"3445    GOTO 42103450    IF 0.49^2<x(i)^2+y(i)^2 AND x(i)^2+y(i)^2<0.76^2 AND x(i)*TAN(-9)<y(i) AND y(i)<x(i)*TAN(-27) THEN GOTO 34603451    IF 0.49^2>x(i)^2+y(i)^2 OR x(i)^2+y(i)^2>0.76^2 OR x(i)*TAN(-9)>y(i) OR y(i)>x(i)*TAN(-27) THEN GOTO 34803452    IF 0.49^2=x(i)^2+y(i)^2 OR x(i)^2+y(i)^2=0.76^2 OR x(i)*TAN(-9)=y(i) OR y(i)=x(i)*TAN(-27) THEN GOTO 41903460    LET P(i)=143470    LET P$(i)="S14"3475    GOTO 42103480    IF 0.49^2<x(i)^2+y(i)^2 AND x(i)^2+y(i)^2<0.76^2 AND x(i)*TAN(-27)<y(i) AND y(i)<x(i)*TAN(-45) THEN GOTO 34903481    IF 0.49^2>x(i)^2+y(i)^2 OR x(i)^2+y(i)^2>0.76^2 OR x(i)*TAN(-27)>y(i) OR y(i)>x(i)*TAN(-45) THEN GOTO 35103482    IF 0.49^2=x(i)^2+y(i)^2 OR x(i)^2+y(i)^2=0.76^2 OR x(i)*TAN(-27)=y(i) OR y(i)=x(i)*TAN(-45) THEN GOTO 41903490    LET P(i)=93500    LET P$(i)="S9"3505    GOTO 42103510    IF 0.49^2<x(i)^2+y(i)^2 AND x(i)^2+y(i)^2<0.76^2 AND x(i)*TAN(-45)<y(i) AND y(i)<x(i)*TAN(-63) THEN GOTO 35203511    IF 0.49^2>x(i)^2+y(i)^2 OR x(i)^2+y(i)^2>0.76^2 OR x(i)*TAN(-45)>y(i) OR y(i)>x(i)*TAN(-63) THEN GOTO 35403512    IF 0.49^2=x(i)^2+y(i)^2 OR x(i)^2+y(i)^2=0.76^2 OR x(i)*TAN(-45)=y(i) OR y(i)=x(i)*TAN(-63) THEN GOTO 41903520    LET P(i)=123530    LET P$(i)="S12"3535    GOTO 42103540    IF 0.49^2<x(i)^2+y(i)^2 AND x(i)^2+y(i)^2<0.76^2 AND x(i)*TAN(-63)<y(i) AND y(i)<x(i)*TAN(-81) THEN GOTO 35503541    IF 0.49^2>x(i)^2+y(i)^2 OR x(i)^2+y(i)^2>0.76^2 OR x(i)*TAN(-63)>y(i) OR y(i)>x(i)*TAN(-81) THEN GOTO 35803542    IF 0.49^2=x(i)^2+y(i)^2 OR x(i)^2+y(i)^2=0.76^2 OR x(i)*TAN(-63)=y(i) OR y(i)=x(i)*TAN(-81) THEN GOTO 41903550    LET P(i)=53560    LET P$(i)="S5"3565    GOTO 4210        !3570 3580    IF 0.76^2<x(i)^2+y(i)^2 AND x(i)^2+y(i)^2<0.79^2 AND x(i)*TAN(81)<y(i) AND x(i)*TAN(-81)<y(i) THEN GOTO 35903581    IF 0.76^2>x(i)^2+y(i)^2 OR x(i)^2+y(i)^2>0.79^2 OR x(i)*TAN(81)>y(i) OR x(i)*TAN(-81)>y(i) THEN GOTO 36103582    IF 0.76^2=x(i)^2+y(i)^2 OR x(i)^2+y(i)^2=0.79^2 OR x(i)*TAN(81)=y(i) OR x(i)*TAN(-81)=y(i) THEN GOTO 41903590    LET P(i)=403600    LET P$(i)="D20"3605    GOTO 42103610    IF 0.76^2<x(i)^2+y(i)^2 AND x(i)^2+y(i)^2<0.79^2 AND x(i)*TAN(63)<y(i) AND y(i)<x(i)*TAN(81) THEN GOTO 36203611    IF 0.76^2>x(i)^2+y(i)^2 OR x(i)^2+y(i)^2>0.79^2 OR x(i)*TAN(63)>y(i) OR y(i)>x(i)*TAN(81) THEN GOTO 36403612    IF 0.76^2=x(i)^2+y(i)^2 OR x(i)^2+y(i)^2=0.79^2 OR x(i)*TAN(63)=y(i) OR y(i)=x(i)*TAN(81) THEN GOTO 41903620    LET P(i)=23630    LET P$(i)="D1"3635    GOTO 42103640    IF 0.76^2<x(i)^2+y(i)^2 AND x(i)^2+y(i)^2<0.79^2 AND x(i)*TAN(45)<y(i) AND y(i)<x(i)*TAN(63) THEN GOTO 36503641    IF 0.76^2>x(i)^2+y(i)^2 OR x(i)^2+y(i)^2>0.79^2 OR x(i)*TAN(45)>y(i) OR y(i)>x(i)*TAN(63) THEN GOTO 36703642    IF 0.76^2=x(i)^2+y(i)^2 OR x(i)^2+y(i)^2=0.79^2 OR x(i)*TAN(45)=y(i) OR y(i)=x(i)*TAN(63) THEN GOTO 41903650    LET P(i)=363660    LET P$(i)="D18"3665    GOTO 42103670    IF 0.76^2<x(i)^2+y(i)^2 AND x(i)^2+y(i)^2<0.79^2 AND x(i)*TAN(27)<y(i) AND y(i)<x(i)*TAN(45) THEN GOTO 36803671    IF 0.76^2>x(i)^2+y(i)^2 OR x(i)^2+y(i)^2>0.79^2 OR x(i)*TAN(27)>y(i) OR y(i)>x(i)*TAN(45) THEN GOTO 37003672    IF 0.76^2=x(i)^2+y(i)^2 OR x(i)^2+y(i)^2=0.79^2 OR x(i)*TAN(27)=y(i) OR y(i)=x(i)*TAN(45) THEN GOTO 41903680    LET P(i)=83690    LET P$(i)="D4"3695    GOTO 42103700    IF 0.76^2<x(i)^2+y(i)^2 AND x(i)^2+y(i)^2<0.79^2 AND x(i)*TAN(9)<y(i) AND y(i)<x(i)*TAN(27) THEN GOTO 37103701    IF 0.76^2>x(i)^2+y(i)^2 OR x(i)^2+y(i)^2>0.79^2 OR x(i)*TAN(9)>y(i) OR y(i)>x(i)*TAN(27) THEN GOTO 37303702    IF 0.76^2=x(i)^2+y(i)^2 OR x(i)^2+y(i)^2=0.79^2 OR x(i)*TAN(9)=y(i) OR y(i)=x(i)*TAN(27) THEN GOTO 41903710    LET P(i)=263720    LET P$(i)="D13"3725    GOTO 42103730    IF 0.76^2<x(i)^2+y(i)^2 AND x(i)^2+y(i)^2<0.79^2 AND x(i)*TAN(-9)<y(i) AND y(i)<x(i)*TAN(9) THEN GOTO 37403731    IF 0.76^2>x(i)^2+y(i)^2 OR x(i)^2+y(i)^2>0.79^2 OR x(i)*TAN(-9)>y(i) OR y(i)>x(i)*TAN(9) THEN GOTO 37603732    IF 0.76^2=x(i)^2+y(i)^2 OR x(i)^2+y(i)^2=0.79^2 OR x(i)*TAN(-9)=y(i) OR y(i)=x(i)*TAN(9) THEN GOTO 41903740    LET P(i)=123750    LET P$(i)="D6"3755    GOTO 42103760    IF 0.76^2<x(i)^2+y(i)^2 AND x(i)^2+y(i)^2<0.79^2 AND x(i)*TAN(-27)<y(i) AND y(i)<x(i)*TAN(-9) THEN GOTO 37703761    IF 0.76^2>x(i)^2+y(i)^2 OR x(i)^2+y(i)^2>0.79^2 OR x(i)*TAN(-27)>y(i) OR y(i)>x(i)*TAN(-9) THEN GOTO 37903762    IF 0.76^2=x(i)^2+y(i)^2 OR x(i)^2+y(i)^2=0.79^2 OR x(i)*TAN(-27)=y(i) OR y(i)=x(i)*TAN(-9) THEN GOTO 41903770    LET P(i)=203780    LET P$(i)="D10"3785    GOTO 42103790    IF 0.76^2<x(i)^2+y(i)^2 AND x(i)^2+y(i)^2<0.79^2 AND x(i)*TAN(-45)<y(i) AND y(i)<x(i)*TAN(-27) THEN GOTO 38003791    IF 0.76^2>x(i)^2+y(i)^2 OR x(i)^2+y(i)^2>0.79^2 OR x(i)*TAN(-45)>y(i) OR y(i)>x(i)*TAN(-27) THEN GOTO 38203792    IF 0.76^2=x(i)^2+y(i)^2 OR x(i)^2+y(i)^2=0.79^2 OR x(i)*TAN(-45)=y(i) OR y(i)=x(i)*TAN(-27) THEN GOTO 41903800    LET P(i)=303810    LET P$(i)="D15"3815    GOTO 42103820    IF 0.76^2<x(i)^2+y(i)^2 AND x(i)^2+y(i)^2<0.79^2 AND x(i)*TAN(-63)<y(i) AND y(i)<x(i)*TAN(-45) THEN GOTO 38303821    IF 0.76^2>x(i)^2+y(i)^2 OR x(i)^2+y(i)^2>0.79^2 OR x(i)*TAN(-63)>y(i) OR y(i)>x(i)*TAN(-45) THEN GOTO 38503822    IF 0.76^2=x(i)^2+y(i)^2 OR x(i)^2+y(i)^2=0.79^2 OR x(i)*TAN(-63)=y(i) OR y(i)=x(i)*TAN(-45) THEN GOTO 41903830    LET P(i)=43840    LET P$(i)="D2"3845    GOTO 42103850    IF 0.76^2<x(i)^2+y(i)^2 AND x(i)^2+y(i)^2<0.79^2 AND x(i)*TAN(-81)<y(i) AND y(i)<x(i)*TAN(-63) THEN GOTO 38603851    IF 0.76^2>x(i)^2+y(i)^2 OR x(i)^2+y(i)^2>0.79^2 OR x(i)*TAN(-81)>y(i) OR y(i)>x(i)*TAN(-63) THEN GOTO 38803852    IF 0.76^2=x(i)^2+y(i)^2 OR x(i)^2+y(i)^2=0.79^2 OR x(i)*TAN(-81)=y(i) OR y(i)=x(i)*TAN(-63) THEN GOTO 41903860    LET P(i)=343870    LET P$(i)="D17"3875    GOTO 42103880    IF 0.76^2<x(i)^2+y(i)^2 AND x(i)^2+y(i)^2<0.79^2 AND y(i)<x(i)*TAN(81) AND y(i)<x(i)*TAN(-81) THEN GOTO 38903881    IF 0.76^2>x(i)^2+y(i)^2 OR x(i)^2+y(i)^2>0.79^2 OR y(i)>x(i)*TAN(81) OR y(i)>x(i)*TAN(-81) THEN GOTO 39103882    IF 0.76^2=x(i)^2+y(i)^2 OR x(i)^2+y(i)^2=0.79^2 OR y(i)=x(i)*TAN(81) OR y(i)=x(i)*TAN(-81) THEN GOTO 41903890    LET P(i)=63900    LET P$(i)="D3"3915    GOTO 42103910    IF 0.76^2<x(i)^2+y(i)^2 AND x(i)^2+y(i)^2<0.79^2 AND x(i)*TAN(81)<y(i) AND y(i)<x(i)*TAN(63) THEN GOTO 39203911    IF 0.76^2>x(i)^2+y(i)^2 OR x(i)^2+y(i)^2>0.79^2 OR x(i)*TAN(81)>y(i) OR y(i)>x(i)*TAN(63) THEN GOTO 39403912    IF 0.76^2=x(i)^2+y(i)^2 OR x(i)^2+y(i)^2=0.79^2 OR x(i)*TAN(81)=y(i) OR y(i)=x(i)*TAN(63) THEN GOTO 41903920    LET P(i)=383930    LET P$(i)="D19"3935    GOTO 42103940    IF 0.76^2<x(i)^2+y(i)^2 AND x(i)^2+y(i)^2<0.79^2 AND x(i)*TAN(63)<y(i) AND y(i)<x(i)*TAN(45) THEN GOTO 39503941    IF 0.76^2>x(i)^2+y(i)^2 OR x(i)^2+y(i)^2>0.79^2 OR x(i)*TAN(63)>y(i) OR y(i)>x(i)*TAN(45) THEN GOTO 39703942    IF 0.76^2=x(i)^2+y(i)^2 OR x(i)^2+y(i)^2=0.79^2 OR x(i)*TAN(63)=y(i) OR y(i)=x(i)*TAN(45) THEN GOTO 41903950    LET P(i)=143960    LET P$(i)="D7"3965    GOTO 42103970    IF 0.76^2<x(i)^2+y(i)^2 AND x(i)^2+y(i)^2<0.79^2 AND x(i)*TAN(45)<y(i) AND y(i)<x(i)*TAN(27) THEN GOTO 39803971    IF 0.76^2>x(i)^2+y(i)^2 OR x(i)^2+y(i)^2>0.79^2 OR x(i)*TAN(45)>y(i) OR y(i)>x(i)*TAN(27) THEN GOTO 40003972    IF 0.76^2=x(i)^2+y(i)^2 OR x(i)^2+y(i)^2=0.79^2 OR x(i)*TAN(45)=y(i) OR y(i)=x(i)*TAN(27) THEN GOTO 41903980    LET P(i)=323990    LET P$(i)="D16"3995    GOTO 42104000    IF 0.76^2<x(i)^2+y(i)^2 AND x(i)^2+y(i)^2<0.79^2 AND x(i)*TAN(27)<y(i) AND y(i)<x(i)*TAN(9) THEN GOTO 40104001    IF 0.76^2>x(i)^2+y(i)^2 OR x(i)^2+y(i)^2>0.79^2 OR x(i)*TAN(27)>y(i) OR y(i)>x(i)*TAN(9) THEN GOTO 40304002    IF 0.76^2=x(i)^2+y(i)^2 OR x(i)^2+y(i)^2=0.79^2 OR x(i)*TAN(27)=y(i) OR y(i)=x(i)*TAN(9) THEN GOTO 41904010    LET P(i)=164020    LET P$(i)="D8"4025    GOTO 42104030    IF 0.76^2<x(i)^2+y(i)^2 AND x(i)^2+y(i)^2<0.79^2 AND x(i)*TAN(9)<y(i) AND y(i)<x(i)*TAN(-9) THEN GOTO 40404031    IF 0.76^2>x(i)^2+y(i)^2 OR x(i)^2+y(i)^2>0.79^2 OR x(i)*TAN(9)>y(i) OR y(i)>x(i)*TAN(-9) THEN GOTO 40604032    IF 0.76^2=x(i)^2+y(i)^2 OR x(i)^2+y(i)^2=0.79^2 OR x(i)*TAN(9)=y(i) OR y(i)=x(i)*TAN(-9) THEN GOTO 41904040    LET P(i)=224050    LET P$(i)="D11"4055    GOTO 42104060    IF 0.76^2<x(i)^2+y(i)^2 AND x(i)^2+y(i)^2<0.79^2 AND x(i)*TAN(-9)<y(i) AND y(i)<x(i)*TAN(-27) THEN GOTO 40704061    IF 0.76^2>x(i)^2+y(i)^2 OR x(i)^2+y(i)^2>0.79^2 OR x(i)*TAN(-9)>y(i) OR y(i)>x(i)*TAN(-27) THEN GOTO 40904062    IF 0.76^2=x(i)^2+y(i)^2 OR x(i)^2+y(i)^2=0.79^2 OR x(i)*TAN(-9)=y(i) OR y(i)=x(i)*TAN(-27) THEN GOTO 41904070    LET P(i)=284080    LET P$(i)="D14"4085    GOTO 42104090    IF 0.76^2<x(i)^2+y(i)^2 AND x(i)^2+y(i)^2<0.79^2 AND x(i)*TAN(-27)<y(i) AND y(i)<x(i)*TAN(-45) THEN GOTO 41004091    IF 0.76^2>x(i)^2+y(i)^2 OR x(i)^2+y(i)^2>0.79^2 OR x(i)*TAN(-27)>y(i) OR y(i)>x(i)*TAN(-45) THEN GOTO 41204092    IF 0.76^2=x(i)^2+y(i)^2 OR x(i)^2+y(i)^2=0.79^2 OR x(i)*TAN(-27)=y(i) OR y(i)=x(i)*TAN(-45) THEN GOTO 41904100    LET P(i)=184110    LET P$(i)="D9"4115    GOTO 42104120    IF 0.76^2<x(i)^2+y(i)^2 AND x(i)^2+y(i)^2<0.79^2 AND x(i)*TAN(-45)<y(i) AND y(i)<x(i)*TAN(-63) THEN GOTO 41304121    IF 0.76^2>x(i)^2+y(i)^2 OR x(i)^2+y(i)^2>0.79^2 OR x(i)*TAN(-45)>y(i) OR y(i)>x(i)*TAN(-63) THEN GOTO 41504122    IF 0.76^2=x(i)^2+y(i)^2 OR x(i)^2+y(i)^2=0.79^2 OR x(i)*TAN(-45)=y(i) OR y(i)=x(i)*TAN(-63) THEN GOTO 41904130    LET P(i)=244140    LET P$(i)="D12"4145    GOTO 42104150    IF 0.76^2<x(i)^2+y(i)^2 AND x(i)^2+y(i)^2<0.79^2 AND x(i)*TAN(-63)<y(i) AND y(i)<x(i)*TAN(-81) THEN GOTO 41604151    IF 0.76^2>x(i)^2+y(i)^2 OR x(i)^2+y(i)^2>0.79^2 OR x(i)*TAN(-63)>y(i) OR y(i)>x(i)*TAN(-81) THEN GOTO 41804152    IF 0.76^2=x(i)^2+y(i)^2 OR x(i)^2+y(i)^2=0.79^2 OR x(i)*TAN(-63)=y(i) OR y(i)=x(i)*TAN(-81) THEN GOTO 4190