// Macros :
$macros={};
$macros["rotation"]={
	name:"rotation",
	parameters:["point","point"],
	exec:
	function (P4, P5) {
P6=Point("P6","P4+(P5-P4)*(cos(\u03C0/6)+i*sin(\u03C0/6))","0");
STL(P6,"c:#0000b2;s:6;f:30");
return [P6];
}};

// Coordinates System :
SetCoords(509.59009957064774,570.7412806522514,256.6101366777645);


// Geometry :
T=Point("T",1.5779142618146766,0.931595913821591);
ang=Expression("ang","","","","\u03C0/180","-1.9468837281280227","0.9381596680826358");
R=Point("R",1.6274833933648198,0.10909598887336469);
S=Point("S",0.48847465163303655,0.209677391768592);
A=Point("A",-0.7468623623449788,0.7045915897976391);
C1=Circle1("C1",A,"1");
R1=Ray("R1",S,R);
a=Expression("a","","","","x(A)","-1.9468837281280227","1.6006432402475022");
R2=Ray("R2",S,T);
b=Expression("b","","","","y(A)","-1.9468837281280227","1.4447647526792984");
M=PointOn("M",C1,0.20289146570464084);
Symc1=Symmetry("Symc1",A,M);
f=Expression("f","","","","y(M)","-1.9468837281280227","1.0940381556508396");
P612=Point("P612","A+(M-A)*(cos(\u03C0/6)+i*sin(\u03C0/6))","0");
e=Expression("e","","","","x(M)","-1.9468837281280227","1.2888862651110944");
E1=Expression("E1","","","","var tab=[];for (var k=1;k<=360;k++){var v=[a+(e-a)*cos(k*ang)-(f-b)*sin(k*ang),b+(e-a)*sin(k*ang)+(f-b)*cos(k*ang)];tab.push(v); var w=[a+0.95*((e-a)*cos(k*ang)-(f-b)*sin(k*ang)),b+0.95*((e-a)*sin(k*ang)+(f-b)*cos(k*ang))];tab.push(w); var u=[NaN,NaN];tab.push(u); };tab","-1.9468837281280227","1.756521727815706");
P=Point("P","[a+(e-a)*cos(5*ang)-(f-b)*sin(5*ang),b+(e-a)*sin(5*ang)+(f-b)*cos(5*ang)]","0");
E3=Expression("E3","","","","var tab=[];for (var k=1;k<=36;k++){var v=[a+(e-a)*cos(10*k*ang)-(f-b)*sin(10*k*ang),b+(e-a)*sin(10*k*ang)+(f-b)*cos(10*k*ang)];tab.push(v); var w=[a+0.8*((e-a)*cos(10*k*ang)-(f-b)*sin(10*k*ang)),b+0.8*((e-a)*sin(10*k*ang)+(f-b)*cos(10*k*ang))];tab.push(w); var u=[NaN,NaN];tab.push(u); };tab","-1.9858533500200741","1.834460971599808");
P616=Point("P616","A+(Symc1-A)*(cos(\u03C0/6)+i*sin(\u03C0/6))","0");
P613=Point("P613","A+(P612-A)*(cos(\u03C0/6)+i*sin(\u03C0/6))","0");
S1=Segment("S1",Symc1,M);
h=Expression("h","","","","y(P)","-0.8947039370426473","1.5616736183554512");
Perp1=Perpendicular("Perp1",S1,A);
P617=Point("P617","A+(P616-A)*(cos(\u03C0/6)+i*sin(\u03C0/6))","0");
List1=List("List1",E1);
P3=PointOn("P3",S1,0.7866370639571553);
g=Expression("g","","","","x(P)","-0.8947039370426473","1.717552105923655");
List3=List("List3",E3);
P1=OrderedIntersection("P1",Perp1,C1,0);
P61=Point("P61","A+(P3-A)*(cos(\u03C0/6)+i*sin(\u03C0/6))","0");
C2=Circle("C2",A,P3);
P2=OrderedIntersection("P2",Perp1,C1,1);
E2=Expression("E2","","","","var tab=[];for (var k=1;k<=36;k++){var v=[a+(g-a)*cos(10*k*ang)-(h-b)*sin(10*k*ang),b+(g-a)*sin(10*k*ang)+(h-b)*cos(10*k*ang)];tab.push(v); var w=[a+0.9*((g-a)*cos(10*k*ang)-(h-b)*sin(10*k*ang)),b+0.9*((g-a)*sin(10*k*ang)+(h-b)*cos(10*k*ang))];tab.push(w); var u=[NaN,NaN];tab.push(u); };tab","-1.9468837281280227","1.756521727815706");
S2=Segment("S2",P1,P2);
S3=Segment("S3",P612,P61);
P614=Point("P614","A+(P1-A)*(cos(\u03C0/6)+i*sin(\u03C0/6))","0");
P618=Point("P618","A+(P2-A)*(cos(\u03C0/6)+i*sin(\u03C0/6))","0");
P62=Point("P62","A+(P61-A)*(cos(\u03C0/6)+i*sin(\u03C0/6))","0");
List2=List("List2",E2);
P63=Point("P63","A+(P62-A)*(cos(\u03C0/6)+i*sin(\u03C0/6))","0");
P615=Point("P615","A+(P614-A)*(cos(\u03C0/6)+i*sin(\u03C0/6))","0");
P619=Point("P619","A+(P618-A)*(cos(\u03C0/6)+i*sin(\u03C0/6))","0");
S4=Segment("S4",P613,P62);
P64=Point("P64","A+(P63-A)*(cos(\u03C0/6)+i*sin(\u03C0/6))","0");
S5=Segment("S5",P614,P64);
P65=Point("P65","A+(P64-A)*(cos(\u03C0/6)+i*sin(\u03C0/6))","0");
S6=Segment("S6",P615,P65);
P66=Point("P66","A+(P65-A)*(cos(\u03C0/6)+i*sin(\u03C0/6))","0");
P67=Point("P67","A+(P66-A)*(cos(\u03C0/6)+i*sin(\u03C0/6))","0");
P68=Point("P68","A+(P67-A)*(cos(\u03C0/6)+i*sin(\u03C0/6))","0");
S7=Segment("S7",P616,P67);
S8=Segment("S8",P617,P68);
P69=Point("P69","A+(P68-A)*(cos(\u03C0/6)+i*sin(\u03C0/6))","0");
P610=Point("P610","A+(P69-A)*(cos(\u03C0/6)+i*sin(\u03C0/6))","0");
S9=Segment("S9",P618,P610);
P611=Point("P611","A+(P610-A)*(cos(\u03C0/6)+i*sin(\u03C0/6))","0");
S10=Segment("S10",P619,P611);


// Styles :
STL(T,"c:#0000b2;s:6;sn:true;f:30");
STL(ang,"c:#1a2b44;h:1;s:7;sn:true;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MTtzOjEwO2Y6MzA=");
STL(R,"c:#0000b2;s:6;sn:true;f:30");
STL(S,"c:#0000b2;s:6;sn:true;f:30;nmi:true;np:3.2759959613029817");
STL(A,"c:#007c00;o:0.4;s:9.5;f:30;mg:[S,20]");
STL(C1,"c:#0a0a0a;s:1;f:30;p:0;nmi:true");
STL(R1,"c:#131414;s:2.5;f:30;p:0;nmi:true");
STL(a,"c:#176174;h:1;s:7;sn:true;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MTtzOjEwO2Y6MzA=");
STL(R2,"c:#131414;s:3;f:30;p:0;nmi:true");
STL(b,"c:#406919;h:1;s:7;sn:true;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MTtzOjEwO2Y6MzA=");
STL(M,"c:#b40000;o:0.51;s:9.5;f:30");
STL(Symc1,"c:#0000b2;h:1;s:6;f:30");
STL(f,"c:#702030;h:1;s:7;sn:true;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MTtzOjEwO2Y6MzA=");
STL(P612,"c:#0000b2;h:1;s:6;f:30");
STL(e,"c:#635f16;h:1;s:7;sn:true;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MTtzOjEwO2Y6MzA=");
STL(E1,"c:#2d534c;h:1;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MTtzOjEwO2Y6MzA=");
STL(P,"c:#0000b2;h:1;s:6;sn:true;f:30");
STL(E3,"c:#565a44;h:1;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MTtzOjEwO2Y6MzA=");
STL(P616,"c:#0000b2;h:1;s:6;f:30");
STL(P613,"c:#0000b2;h:1;s:6;f:30");
STL(S1,"c:#131414;s:2.5;f:24;nmi:true");
STL(h,"c:#2b2a78;h:1;s:7;sn:true;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MTtzOjEwO2Y6MzA=");
STL(Perp1,"c:#131414;h:1;s:2.5;f:30;p:0;nmi:true");
STL(P617,"c:#0000b2;h:1;s:6;f:30");
STL(List1,"c:#0b0b0c;s:0;f:30;p:0;nmi:true;sg:1");
STL(P3,"c:#0000b2;h:1;s:6;f:30");
STL(g,"c:#1e0a40;h:1;s:7;sn:true;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MTtzOjEwO2Y6MzA=");
STL(List3,"c:#1f1f21;s:0;f:30;p:0;nmi:true;sg:2");
STL(P1,"c:#0000b2;h:1;s:6;f:30");
STL(P61,"c:#0000b2;h:1;s:6;f:30");
STL(C2,"c:#cc66cc;h:1;s:1;f:30;p:0");
STL(P2,"c:#0000b2;h:1;s:6;f:30");
STL(E2,"c:#1b100b;h:1;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MTtzOjEwO2Y6MzA=");
STL(S2,"c:#131414;s:2.5;f:24;nmi:true");
STL(S3,"c:#131414;s:2.5;f:24;nmi:true");
STL(P614,"c:#0000b2;h:1;s:6;f:30");
STL(P618,"c:#0000b2;h:1;s:6;f:30");
STL(P62,"c:#0000b2;h:1;s:6;f:30");
STL(List2,"c:#b40000;s:0;f:30;p:0;nmi:true;sg:1.5");
STL(P63,"c:#0000b2;h:1;s:6;f:30");
STL(P615,"c:#0000b2;h:1;s:6;f:30");
STL(P619,"c:#0000b2;h:1;s:6;f:30");
STL(S4,"c:#131414;s:2.5;f:24;nmi:true");
STL(P64,"c:#0000b2;h:1;s:6;f:30");
STL(S5,"c:#131414;s:2.5;f:24;nmi:true");
STL(P65,"c:#0000b2;h:1;s:6;f:30");
STL(S6,"c:#131414;s:2.5;f:24;nmi:true");
STL(P66,"c:#0000b2;h:1;s:6;f:30");
STL(P67,"c:#0000b2;h:1;s:6;f:30");
STL(P68,"c:#0000b2;h:1;s:6;f:30");
STL(S7,"c:#131414;s:2.5;f:24;nmi:true");
STL(S8,"c:#131414;s:2.5;f:24;nmi:true");
STL(P69,"c:#0000b2;h:1;s:6;f:30");
STL(P610,"c:#0000b2;h:1;s:6;f:30");
STL(S9,"c:#131414;s:2.5;f:24;nmi:true");
STL(P611,"c:#0000b2;h:1;s:6;f:30");
STL(S10,"c:#131414;s:2.5;f:24;nmi:true");
SetCoordsStyle("isAxis:false;isGrid:true;isOx:true;isOy:true;isLockOx:false;isLockOy:false;centerZoom:false;color:#111111;fontSize:18;axisWidth:1;gridWidth:0.1");
SetGeneralStyle("background-color:#FFFFFF");