// Macros :
$macros={};
$macros["Rotation"]={
	name:"Rotation",
	parameters:["point","expression","point"],
	exec:
	function (P2, E2, P5) {
P7=Point("P7","P2+(P5-P2)*(cos(E2)-i*sin(E2))","0");
STL(P7,"c:#0000b2;s:12;f:30");
return [P7];
}};

// Coordinates System :
SetCoords(329.5459637808793,443.249352567671,35.86359041171036);


// Geometry :
ox=X_axis("ox");
oy=Y_axis("oy");
P1=OrderedIntersection("P1",ox,oy,0);
Jebouge=PointOn("Je bouge",ox,7.999999999999994);
Deplacer=Expression("D\u00e9placer","","0","\u03C0/2","0","0.570328736869635","-2.9765744647103776");
C1=Circle("C1",P1,Jebouge);
S4=Segment("S4",Jebouge,P1);
P3=OrderedIntersection("P3",oy,C1,0);
a=Expression("a","a= ","","","S4","-7.794700992614518","6.5037925620383295");
P4=Point("P4","Jebouge+P3","0");
S1=Segment("S1",P1,P3);
S2=Segment("S2",P3,P4);
S3=Segment("S3",P4,Jebouge);
Moiaussi=PointOn("Moi aussi",S3,0.3749999999999999);
C2=Circle("C2",P4,Moiaussi);
b=Expression("b","b= ","","","d(P4,Moiaussi)","-7.794700992614518","4.55195229182536");
S10=Segment("S10",Moiaussi,P4);
P6=OrderedIntersection("P6",S2,C2,1);
F=Point("F","Moiaussi+P6-P4","0");
Poly1=Polygon("Poly1","_F,_Moiaussi,_P4,_P6");
R1=Ray("R1",Moiaussi,F);
Poly2=Polygon("Poly2","_Jebouge,_Moiaussi,_F,_P6,_P3,_P1");
L2=PerpendicularBisector("L2",F,Jebouge);
E=OrderedIntersection("E",R1,S1,0);
E1=Expression("E1","Aire en rose= ","","","Poly2","-8.073535316930657","2.3212776972962526");
S5=Segment("S5",E,F);
Poly3=Polygon("Poly3","_E,_Moiaussi,_Jebouge,_P1");
L1=PerpendicularBisector("L1",E,Moiaussi);
E2=Expression("E2","","","","(Deplacer==0)?E1+\" = \"+(a*a)+\" - \"+(b*b)+\"= a*a-b*b\":((Deplacer>1.56)?E1+\" = \"+(a+b)+\" x \"+(a-b)+\" = (a+b)(a-b)\":\" \")","-8.073535316930657","-1.861237167445824");
P2=OrderedIntersection("P2",L1,L2,0);
P7=Point("P7","P2+(P3-P2)*(cos(Deplacer)-i*sin(Deplacer))","0");
P71=Point("P71","P2+(P6-P2)*(cos(Deplacer)-i*sin(Deplacer))","0");
P72=Point("P72","P2+(E-P2)*(cos(Deplacer)-i*sin(Deplacer))","0");
P73=Point("P73","P2+(F-P2)*(cos(Deplacer)-i*sin(Deplacer))","0");
Poly4=Polygon("Poly4","_P72,_P7,_P71,_P73");
S6=Segment("S6",P73,P71);
S7=Segment("S7",P71,P7);
S8=Segment("S8",P7,P72);
S9=Segment("S9",P72,P73);
E3=Expression("E3","","","","S8.setHidden(Deplacer==0);\"prog\"","-8.910038289879072","9.013301480883575");


// Styles :
STL(P1,"c:#0000b2;s:5.5;f:30");
STL(Jebouge,"c:#0000b2;s:5.5;sn:true;f:23;i:0.5");
STL(Deplacer,"c:#007c00;s:7;sn:true;f:24;p:-1;cL:200;cPT:YzojNzgwMDEzO286MC4xMTtzOjExLjU7ZjozMA==");
STL(C1,"c:#cc66cc;h:1;s:2;f:30;p:0");
STL(S4,"c:#db3131;s:5;f:24;p:5");
STL(P3,"c:#0000b2;s:5.5;f:30");
STL(a,"c:#ea0a0a;s:7;sn:true;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO3M6NS41O2Y6MzA=");
STL(P4,"c:#0000b2;s:5.5;f:30");
STL(S1,"c:#db3131;s:5;f:24");
STL(S2,"c:#db3131;s:5;f:24");
STL(S3,"c:#db3131;s:5;f:24");
STL(Moiaussi,"c:#0000b2;s:5.5;sn:true;f:23;i:0.5");
STL(C2,"c:#cc66cc;h:1;s:2;f:30;p:0");
STL(b,"c:#1f1fe8;s:7;sn:true;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO3M6NS41O2Y6MzA=");
STL(S10,"c:#0000b2;s:2;f:24;p:4");
STL(P6,"c:#0000b2;s:5.5;f:30");
STL(F,"c:#0000b2;s:5.5;f:30");
STL(Poly1,"c:#0000b2;o:0.2;s:4;f:30");
STL(R1,"c:#993300;h:1;s:2;f:30;p:0");
STL(Poly2,"c:#b40000;h:1;o:0.2;s:0.5;f:30");
STL(L2,"c:#780013;h:1;s:2;f:30;p:0");
STL(E,"c:#0000b2;s:5.5;f:30");
STL(E1,"c:#f24848;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO3M6NS41O2Y6MzA=");
STL(S5,"c:#66726c;s:2;f:24;dh:true");
STL(Poly3,"c:#b40000;o:0.2;s:0.5;f:30");
STL(L1,"c:#780013;h:1;s:2;f:30;p:0");
STL(E2,"c:#007c00;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO3M6MTA7ZjozMA==");
STL(P2,"c:#0000b2;h:1;s:5.5;f:30");
STL(P7,"c:#0000b2;s:5.5;f:30");
STL(P71,"c:#0000b2;s:5.5;f:30");
STL(P72,"c:#0000b2;s:5.5;f:30");
STL(P73,"c:#0000b2;s:5.5;f:30");
STL(Poly4,"c:#b40000;o:0.2;s:0.5;f:30");
STL(S6,"c:#0000b2;s:5.5;f:24");
STL(S7,"c:#71847b;s:2;f:24;dh:true");
STL(S8,"c:#0000b2;h:1;s:5.5;f:24");
STL(S9,"c:#78847e;s:2;f:24;dh:true");
STL(E3,"c:#7a467c;h:1;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MTtzOjEwO2Y6MzA=");
SetCoordsStyle("isAxis:false;isGrid:true;isOx:true;isOy:true;isLockOx:false;isLockOy:false;centerZoom:false;color:#111111;fontSize:18;axisWidth:1;gridWidth:0.1");