// Macros :
$macros={};
$macros.TroisCerclesMaffati={
	name:"3cercles Maffati",
	parameters:["point","point","point"],
	exec:
	function (P1, P2, P3) {
S1=Segment("S1",P2,P1);
S3=Segment("S3",P3,P2);
S11=Segment("S11",P2,P1);
S21=Segment("S21",P1,P3);
S31=Segment("S31",P3,P2);
R1=AngleBisector("R1",P2,P1,P3);
R2=AngleBisector("R2",P1,P3,P2);
P4=OrderedIntersection("P4",R1,R2,0);
R3=AngleBisector("R3",P1,P4,P2);
R4=AngleBisector("R4",P2,P1,P4);
R5=AngleBisector("R5",P4,P1,P3);
R6=AngleBisector("R6",P3,P4,P1);
R7=AngleBisector("R7",P4,P2,P3);
R8=AngleBisector("R8",P4,P3,P2);
P5=OrderedIntersection("P5",R3,R4,0);
P7=OrderedIntersection("P7",R7,R8,0);
P6=OrderedIntersection("P6",R5,R6,0);
S9=Segment("S9",P7,P5);
S7=Segment("S7",P5,P6);
S8=Segment("S8",P6,P7);
Syma1=Reflection("Syma1",S7,P4);
Syma2=Reflection("Syma2",S7,P1);
Syma3=Reflection("Syma3",S8,P4);
Syma4=Reflection("Syma4",S8,P3);
Syma5=Reflection("Syma5",S9,P4);
Syma6=Reflection("Syma6",S9,P2);
L1=Line("L1",Syma1,Syma2);
L2=Line("L2",Syma3,Syma4);
L3=Line("L3",Syma5,Syma6);
P9=OrderedIntersection("P9",L1,L2,0);
P10=OrderedIntersection("P10",S21,L3,0);
P11=OrderedIntersection("P11",S11,L2,0);
P12=OrderedIntersection("P12",S31,L1,0);
R9=AngleBisector("R9",P1,P11,P9);
R10=AngleBisector("R10",P1,P10,P9);
R11=AngleBisector("R11",P2,P12,P9);
R12=AngleBisector("R12",P9,P11,P2);
R13=AngleBisector("R13",P3,P10,P9);
R14=AngleBisector("R14",P9,P12,P3);
P8=OrderedIntersection("P8",R9,R10,0);
P14=OrderedIntersection("P14",R11,R12,0);
P16=OrderedIntersection("P16",R13,R14,0);
Perp1=Perpendicular("Perp1",S1,P8);
Perp2=Perpendicular("Perp2",S3,P14);
Perp3=Perpendicular("Perp3",S3,P16);
P13=OrderedIntersection("P13",S1,Perp1,0);
P15=OrderedIntersection("P15",S3,Perp2,0);
P17=OrderedIntersection("P17",S3,Perp3,0);
C1=Circle("C1",P8,P13);
C2=Circle("C2",P14,P15);
C3=Circle("C3",P16,P17);
return [C1,C2,C3];
}};

$macros.CentreMalf={
	name:"CentreMalf",
	parameters:["point","point","point","point"],
	exec:
	function (P1, P9, P10, P11) {
R9=AngleBisector("R9",P1,P11,P9);
R10=AngleBisector("R10",P1,P10,P9);
P8=OrderedIntersection("P8",R9,R10,0);
return [P8];
}};

$macros.Essai3={
	name:"Essai3",
	parameters:["line","point","point","point","line"],
	exec:
	function (S1, P9, P10, P11, S1) {
P1=Second("P1",S1);
R9=AngleBisector("R9",P1,P11,P9);
R10=AngleBisector("R10",P1,P10,P9);
P8=OrderedIntersection("P8",R9,R10,0);
Perp1=Perpendicular("Perp1",S1,P8);
P13=OrderedIntersection("P13",S1,Perp1,0);
C1=Circle("C1",P8,P13);
return [C1];
}};

$macros.InterneMalffati1={
	name:"Interne Malffati 1",
	parameters:["point","point","point"],
	exec:
	function (P1, P2, P3) {
S1=Segment("S1",P2,P1);
S2=Segment("S2",P1,P3);
S3=Segment("S3",P3,P2);
R1=AngleBisector("R1",P2,P1,P3);
R2=AngleBisector("R2",P1,P3,P2);
P4=OrderedIntersection("P4",R1,R2,0);
R3=AngleBisector("R3",P1,P4,P2);
R4=AngleBisector("R4",P2,P1,P4);
R5=AngleBisector("R5",P4,P1,P3);
R6=AngleBisector("R6",P3,P4,P1);
R7=AngleBisector("R7",P4,P2,P3);
R8=AngleBisector("R8",P4,P3,P2);
P5=OrderedIntersection("P5",R3,R4,0);
P7=OrderedIntersection("P7",R7,R8,0);
P6=OrderedIntersection("P6",R5,R6,0);
S9=Segment("S9",P7,P5);
S7=Segment("S7",P5,P6);
S8=Segment("S8",P6,P7);
Syma1=Reflection("Syma1",S7,P4);
Syma2=Reflection("Syma2",S7,P1);
Syma3=Reflection("Syma3",S8,P4);
Syma4=Reflection("Syma4",S8,P3);
Syma5=Reflection("Syma5",S9,P4);
Syma6=Reflection("Syma6",S9,P2);
L1=Line("L1",Syma1,Syma2);
L2=Line("L2",Syma3,Syma4);
L3=Line("L3",Syma5,Syma6);
P9=OrderedIntersection("P9",L1,L2,0);
P10=OrderedIntersection("P10",S2,L3,0);
P11=OrderedIntersection("P11",S1,L2,0);
P12=OrderedIntersection("P12",S3,L1,0);
return [P9,P10,P11,P12];
}};

$macros.InterneMalffati2={
	name:"Interne Malffati 2",
	parameters:["line","point","point","point","line"],
	exec:
	function (S1, P9, P10, P11, S1) {
P1=Second("P1",S1);
R9=AngleBisector("R9",P1,P11,P9);
R10=AngleBisector("R10",P1,P10,P9);
P8=OrderedIntersection("P8",R9,R10,0);
Perp1=Perpendicular("Perp1",S1,P8);
P13=OrderedIntersection("P13",S1,Perp1,0);
C1=Circle("C1",P8,P13);
return [C1];
}};

$macros.Interne2={
	name:"Interne2",
	parameters:["line","point","point","point","line"],
	exec:
	function (S1, P9, P10, P11, S1) {
P1=Second("P1",S1);
R9=AngleBisector("R9",P1,P11,P9);
R10=AngleBisector("R10",P1,P10,P9);
P8=OrderedIntersection("P8",R9,R10,0);
Perp1=Perpendicular("Perp1",S1,P8);
P13=OrderedIntersection("P13",S1,Perp1,0);
C1=Circle("C1",P8,P13);
return [C1];
}};

// Coordinates System :
SetCoords(610.3925064499203,369.3791089593306,32.9695879599291);


// Geometry :
P1=Point("P1",0.35206668534005586,9.019800590797862);
P2=Point("P2",-12.872241744899046,-3.2945783602963465);
P3=Point("P3",8.056136275433477,-3.9618599783359345);
S1=Segment("S1",P1,P2);
S2=Segment("S2",P2,P3);
S3=Segment("S3",P3,P1);
S11=Segment("S11",P2,P1);
S31=Segment("S31",P3,P2);
S111=Segment("S111",P2,P1);
S21=Segment("S21",P1,P3);
S311=Segment("S311",P3,P2);
R1=AngleBisector("R1",P2,P1,P3);
R2=AngleBisector("R2",P1,P3,P2);
P4=OrderedIntersection("P4",R1,R2,0);
R3=AngleBisector("R3",P1,P4,P2);
R4=AngleBisector("R4",P2,P1,P4);
R5=AngleBisector("R5",P4,P1,P3);
R6=AngleBisector("R6",P3,P4,P1);
R7=AngleBisector("R7",P4,P2,P3);
R8=AngleBisector("R8",P4,P3,P2);
P5=OrderedIntersection("P5",R3,R4,0);
P7=OrderedIntersection("P7",R7,R8,0);
P6=OrderedIntersection("P6",R5,R6,0);
S9=Segment("S9",P7,P5);
S7=Segment("S7",P5,P6);
S8=Segment("S8",P6,P7);
Syma1=Reflection("Syma1",S7,P4);
Syma2=Reflection("Syma2",S7,P1);
Syma3=Reflection("Syma3",S8,P4);
Syma4=Reflection("Syma4",S8,P3);
Syma5=Reflection("Syma5",S9,P4);
Syma6=Reflection("Syma6",S9,P2);
L1=Line("L1",Syma1,Syma2);
L2=Line("L2",Syma3,Syma4);
L3=Line("L3",Syma5,Syma6);
P9=OrderedIntersection("P9",L1,L2,0);
P10=OrderedIntersection("P10",S21,L3,0);
P11=OrderedIntersection("P11",S111,L2,0);
P12=OrderedIntersection("P12",S311,L1,0);
R9=AngleBisector("R9",P1,P11,P9);
R10=AngleBisector("R10",P1,P10,P9);
R11=AngleBisector("R11",P2,P12,P9);
R12=AngleBisector("R12",P9,P11,P2);
R13=AngleBisector("R13",P3,P10,P9);
R14=AngleBisector("R14",P9,P12,P3);
P8=OrderedIntersection("P8",R9,R10,0);
P14=OrderedIntersection("P14",R11,R12,0);
P16=OrderedIntersection("P16",R13,R14,0);
Perp1=Perpendicular("Perp1",S11,P8);
Perp2=Perpendicular("Perp2",S31,P14);
Perp3=Perpendicular("Perp3",S31,P16);
P13=OrderedIntersection("P13",S11,Perp1,0);
P15=OrderedIntersection("P15",S31,Perp2,0);
P17=OrderedIntersection("P17",S31,Perp3,0);
C1=Circle("C1",P8,P13);
C2=Circle("C2",P14,P15);
C3=Circle("C3",P16,P17);


// Styles :
STL(P1,"c:#0000b2;s:12;f:30");
STL(P2,"c:#0000b2;s:12;f:30");
STL(P3,"c:#0000b2;s:12;f:30");
STL(S1,"c:#006633;s:2;f:24");
STL(S2,"c:#006633;s:2;f:24");
STL(S3,"c:#006633;s:2;f:24");
STL(S11,"c:#006633;h:1;s:2;f:24");
STL(S31,"c:#006633;h:1;s:2;f:24");
STL(S111,"c:#006633;h:1;s:2;f:24");
STL(S21,"c:#006633;h:1;s:2;f:24");
STL(S311,"c:#006633;h:1;s:2;f:24");
STL(R1,"c:#993300;h:1;s:2;f:30;p:0");
STL(R2,"c:#993300;h:1;s:2;f:30;p:0");
STL(P4,"c:#0000b2;h:1;s:12;f:30");
STL(R3,"c:#993300;h:1;s:2;f:30;p:0");
STL(R4,"c:#993300;h:1;s:2;f:30;p:0");
STL(R5,"c:#993300;h:1;s:2;f:30;p:0");
STL(R6,"c:#993300;h:1;s:2;f:30;p:0");
STL(R7,"c:#993300;h:1;s:2;f:30;p:0");
STL(R8,"c:#993300;h:1;s:2;f:30;p:0");
STL(P5,"c:#0000b2;h:1;s:12;f:30");
STL(P7,"c:#0000b2;h:1;s:12;f:30");
STL(P6,"c:#0000b2;h:1;s:12;f:30");
STL(S9,"c:#006633;h:1;s:2;f:24");
STL(S7,"c:#006633;h:1;s:2;f:24");
STL(S8,"c:#006633;h:1;s:2;f:24");
STL(Syma1,"c:#0000b2;h:1;s:12;f:30");
STL(Syma2,"c:#0000b2;h:1;s:12;f:30");
STL(Syma3,"c:#0000b2;h:1;s:12;f:30");
STL(Syma4,"c:#0000b2;h:1;s:12;f:30");
STL(Syma5,"c:#0000b2;h:1;s:12;f:30");
STL(Syma6,"c:#0000b2;h:1;s:12;f:30");
STL(L1,"c:#780013;h:1;s:2;f:30;p:0");
STL(L2,"c:#780013;h:1;s:2;f:30;p:0");
STL(L3,"c:#780013;h:1;s:2;f:30;p:0");
STL(P9,"c:#0000b2;h:1;s:12;f:30");
STL(P10,"c:#0000b2;h:1;s:12;f:30");
STL(P11,"c:#0000b2;h:1;s:12;f:30");
STL(P12,"c:#0000b2;h:1;s:12;f:30");
STL(R9,"c:#993300;h:1;s:2;f:30;p:0");
STL(R10,"c:#993300;h:1;s:2;f:30;p:0");
STL(R11,"c:#993300;h:1;s:2;f:30;p:0");
STL(R12,"c:#993300;h:1;s:2;f:30;p:0");
STL(R13,"c:#993300;h:1;s:2;f:30;p:0");
STL(R14,"c:#993300;h:1;s:2;f:30;p:0");
STL(P8,"c:#0000b2;h:1;s:12;f:30");
STL(P14,"c:#0000b2;h:1;s:12;f:30");
STL(P16,"c:#0000b2;h:1;s:12;f:30");
STL(Perp1,"c:#780013;h:1;s:2;f:30;p:0");
STL(Perp2,"c:#780013;h:1;s:2;f:30;p:0");
STL(Perp3,"c:#780013;h:1;s:2;f:30;p:0");
STL(P13,"c:#0000b2;h:1;s:12;f:30");
STL(P15,"c:#0000b2;h:1;s:12;f:30");
STL(P17,"c:#0000b2;h:1;s:12;f:30");
STL(C1,"c:#cc66cc;s:2;f:30;p:0");
STL(C2,"c:#cc66cc;s:2;f:30;p:0");
STL(C3,"c:#cc66cc;s:2;f:30;p:0");
SetCoordsStyle("isAxis:false;isGrid:true;isOx:true;isOy:true;isLockOx:false;isLockOy:false;color:#111111;fontSize:18;axisWidth:1;gridWidth:0.1");