# style=cc2: Cross and circle II.

present=8
ranget=[-pi:pi]

R=1.5
r=$[sqrt($R)]
ind=!randitem 1,2
sh=!randint 1,2
conj1=!item $sh of and,or
conj2=!item $sh of or,and

ineq=x^2 < y^2 ; x^2+y^2 < $R,\
x^2 < y^2 ; x^2+y^2 > $R,\
x^2 > y^2 ; x^2+y^2 < $R,\
x^2 > y^2 ; x^2+y^2 > $R,\
x^2 < y^2 # x^2+y^2 < $R,\
x^2 < y^2 # x^2+y^2 > $R,\
x^2 > y^2 # x^2+y^2 < $R,\
x^2 > y^2 # x^2+y^2 > $R

plotf=t,t;,t,-t;,$r*cos(t),$r*sin(t);\
t,t;,t,-t;,$r*cos(t),$r*sin(t);\
t,t;,t,-t;,$r*cos(t),$r*sin(t);\
t,t;,t,-t;,$r*cos(t),$r*sin(t);\
t,t;,t,-t;,$r*cos(t),$r*sin(t);\
t,t;,t,-t;,$r*cos(t),$r*sin(t);\
t,t;,t,-t;,$r*cos(t),$r*sin(t);\
t,t;,t,-t;,$r*cos(t),$r*sin(t);

sh=!shuffle $present
ineq=!item $sh of $ineq
plotf=!line $sh of $plotf

