// Macros :
$macros={};
$macros["Cnk5tangentes"]={
	name:"Cnk 5 tangentes",
	parameters:["line","line","line","line","line"],
	exec:
	function (d1,d2,d3,d4,d5){
P11=OrderedIntersection("P11",d5,d1,0);
P12=OrderedIntersection("P12",d2,d1,0);
P13=OrderedIntersection("P13",d3,d2,0);
P14=OrderedIntersection("P14",d4,d3,0);
P15=OrderedIntersection("P15",d5,d4,0);
L1=Line("L1",P11,P14);
L2=Line("L2",P15,P13);
L4=Line("L4",P12,P15);
L6=Line("L6",P11,P13);
L8=Line("L8",P12,P14);
P16=OrderedIntersection("P16",L2,L1,0);
P17=OrderedIntersection("P17",L4,L1,0);
P18=OrderedIntersection("P18",L4,L6,0);
P19=OrderedIntersection("P19",L8,L6,0);
P20=OrderedIntersection("P20",L8,L2,0);
L3=Line("L3",P12,P16);
L5=Line("L5",P13,P17);
L7=Line("L7",P14,P18);
L9=Line("L9",P15,P19);
L10=Line("L10",P11,P20);
T1=OrderedIntersection("T1",L3,d4,0);
T2=OrderedIntersection("T2",L5,d5,0);
T3=OrderedIntersection("T3",L7,d1,0);
T4=OrderedIntersection("T4",L9,d2,0);
T5=OrderedIntersection("T5",L10,d3,0);
Quad=Quadric("Quad",T1,T2,T3,T4,T5);
STL(Quad,"c:#ed00ff;s:2.5;f:30;p:500");
return [Quad];
}};

$macros["DivHarmoABCD"]={
	name:"DivHarmo ABC D",
	parameters:["point","point","point"],
	exec:
	function (A,B,C){
d1=Line("d1",B,A);
C1=Circle("C1",A,B);
Perp1=Perpendicular("Perp1",d1,A);
Perp2=Perpendicular("Perp2",d1,B);
P4=OrderedIntersection("P4",Perp1,C1,1);
L1=Line("L1",P4,C);
P5=OrderedIntersection("P5",Perp2,L1,0);
Symc1=Symmetry("Symc1",B,P5);
L2=Line("L2",P4,Symc1);
D=OrderedIntersection("D",L2,d1,0);
STL(C,"c:#0000b2;s:6;sn:true;f:30");
STL(D,"c:#b40000;s:6;sn:true;f:30;sp:2");
return [C,D];
}};

$macros["Polaire1pt"]={
	name:"Polaire 1 pt",
	parameters:["quadric","point"],
	exec:
	function (Quad,P4){
A=DefinitionPoint("A",Quad,0);
P3=DefinitionPoint("P3",Quad,4);
L1=Line("L1",P4,A);
L2=Line("L2",P4,P3);
P5=OrderedIntersection("P5",L1,Quad,1,A);
P6=OrderedIntersection("P6",L2,Quad,1,P3);
d1=Line("d1",P6,P3);
C1=Circle("C1",P3,P6);
d11=Line("d11",P5,A);
C11=Circle("C11",A,P5);
Perp1=Perpendicular("Perp1",d1,P3);
Perp2=Perpendicular("Perp2",d1,P6);
Perp11=Perpendicular("Perp11",d11,A);
Perp21=Perpendicular("Perp21",d11,P5);
P41=OrderedIntersection("P41",Perp1,C1,1);
P42=OrderedIntersection("P42",Perp11,C11,1);
L11=Line("L11",P41,P4);
L12=Line("L12",P42,P4);
P51=OrderedIntersection("P51",Perp2,L11,0);
P52=OrderedIntersection("P52",Perp21,L12,0);
Symc1=Symmetry("Symc1",P6,P51);
Symc11=Symmetry("Symc11",P5,P52);
L21=Line("L21",P41,Symc1);
L22=Line("L22",P42,Symc11);
D=OrderedIntersection("D",L21,d1,0);
D1=OrderedIntersection("D1",L22,d11,0);
L3=Line("L3",D,D1);
STL(L3,"c:#780013;s:1;f:30;p:0");
return [L3];
}};

$macros["Tgt1ptCnk"]={
	name:"Tgt 1 pt Cnk",
	parameters:["quadric","point"],
	exec:
	function (Quad,M){
B=DefinitionPoint("B",Quad,1);
P2=DefinitionPoint("P2",Quad,3);
P6=Point("P6","Quad.center()","0");
L1=Line("L1",P6,M);
Par1=Parallel("Par1",L1,B);
Par2=Parallel("Par2",L1,P2);
P4=OrderedIntersection("P4",Par1,Quad,1,B);
P5=OrderedIntersection("P5",Par2,Quad,0,P2);
M1=MidPoint("M1",P5,P2);
M2=MidPoint("M2",B,P4);
L2=Line("L2",M2,M1);
Par3=Parallel("Par3",L2,M);
STL(M,"c:#b40000;o:1;s:6;sn:true;f:30");
STL(Par3,"c:#780013;s:1;f:30;p:0");
return [M,Par3];
}};

$macros["TgteCom2Cnk"]={
	name:"Tgte Com. 2 Cnk",
	parameters:["quadric","quadric"],
	exec:
	function (Quad,Quad1){
B=DefinitionPoint("B",Quad,1);
A=DefinitionPoint("A",Quad,0);
P1=DefinitionPoint("P1",Quad,2);
P2=DefinitionPoint("P2",Quad,3);
P3=DefinitionPoint("P3",Quad,4);
P4=DefinitionPoint("P4",Quad1,0);
P5=DefinitionPoint("P5",Quad1,1);
P7=DefinitionPoint("P7",Quad1,3);
P8=DefinitionPoint("P8",Quad1,4);
L1=Line("L1",A,P4);
L2=Line("L2",A,P8);
L13=Line("L13",B,P4);
L23=Line("L23",B,P8);
L14=Line("L14",P1,P4);
L24=Line("L24",P1,P8);
L15=Line("L15",P2,P4);
L25=Line("L25",P2,P8);
L16=Line("L16",P3,P4);
L26=Line("L26",P3,P8);
P51=OrderedIntersection("P51",L1,Quad1,1,P4);
P61=OrderedIntersection("P61",L2,Quad1,1,P8);
P53=OrderedIntersection("P53",L13,Quad1,1,P4);
P62=OrderedIntersection("P62",L23,Quad1,1,P8);
P54=OrderedIntersection("P54",L14,Quad1,1,P4);
P63=OrderedIntersection("P63",L24,Quad1,1,P8);
P55=OrderedIntersection("P55",L15,Quad1,1,P4);
P64=OrderedIntersection("P64",L25,Quad1,1,P8);
P56=OrderedIntersection("P56",L16,Quad1,1,P4);
P65=OrderedIntersection("P65",L26,Quad1,1,P8);
P66=Point("P66","Quad1.center()","0");
P67=Point("P67","Quad1.center()","0");
P68=Point("P68","Quad1.center()","0");
P69=Point("P69","Quad1.center()","0");
d1=Line("d1",P61,P8);
C1=Circle("C1",P8,P61);
d11=Line("d11",P51,P4);
C11=Circle("C11",P4,P51);
d12=Line("d12",P62,P8);
C12=Circle("C12",P8,P62);
d111=Line("d111",P53,P4);
C111=Circle("C111",P4,P53);
d13=Line("d13",P63,P8);
C13=Circle("C13",P8,P63);
d112=Line("d112",P54,P4);
C112=Circle("C112",P4,P54);
d14=Line("d14",P64,P8);
C14=Circle("C14",P8,P64);
d113=Line("d113",P55,P4);
C113=Circle("C113",P4,P55);
d15=Line("d15",P65,P8);
C15=Circle("C15",P8,P65);
d114=Line("d114",P56,P4);
C114=Circle("C114",P4,P56);
Perp1=Perpendicular("Perp1",d1,P8);
Perp2=Perpendicular("Perp2",d1,P61);
Perp11=Perpendicular("Perp11",d11,P4);
Perp21=Perpendicular("Perp21",d11,P51);
Perp12=Perpendicular("Perp12",d12,P8);
Perp22=Perpendicular("Perp22",d12,P62);
Perp111=Perpendicular("Perp111",d111,P4);
Perp211=Perpendicular("Perp211",d111,P53);
Perp13=Perpendicular("Perp13",d13,P8);
Perp23=Perpendicular("Perp23",d13,P63);
Perp112=Perpendicular("Perp112",d112,P4);
Perp212=Perpendicular("Perp212",d112,P54);
Perp14=Perpendicular("Perp14",d14,P8);
Perp24=Perpendicular("Perp24",d14,P64);
Perp113=Perpendicular("Perp113",d113,P4);
Perp213=Perpendicular("Perp213",d113,P55);
Perp15=Perpendicular("Perp15",d15,P8);
Perp25=Perpendicular("Perp25",d15,P65);
Perp114=Perpendicular("Perp114",d114,P4);
Perp214=Perpendicular("Perp214",d114,P56);
P41=OrderedIntersection("P41",Perp1,C1,1);
P42=OrderedIntersection("P42",Perp11,C11,1);
P411=OrderedIntersection("P411",Perp12,C12,1);
P421=OrderedIntersection("P421",Perp111,C111,1);
P412=OrderedIntersection("P412",Perp13,C13,1);
P422=OrderedIntersection("P422",Perp112,C112,1);
P413=OrderedIntersection("P413",Perp14,C14,1);
P423=OrderedIntersection("P423",Perp113,C113,1);
P414=OrderedIntersection("P414",Perp15,C15,1);
P424=OrderedIntersection("P424",Perp114,C114,1);
L11=Line("L11",P41,A);
L12=Line("L12",P42,A);
L111=Line("L111",P411,B);
L121=Line("L121",P421,B);
L112=Line("L112",P412,P1);
L122=Line("L122",P422,P1);
L113=Line("L113",P413,P2);
L123=Line("L123",P423,P2);
L114=Line("L114",P414,P3);
L124=Line("L124",P424,P3);
P511=OrderedIntersection("P511",Perp2,L11,0);
P52=OrderedIntersection("P52",Perp21,L12,0);
P512=OrderedIntersection("P512",Perp22,L111,0);
P521=OrderedIntersection("P521",Perp211,L121,0);
P513=OrderedIntersection("P513",Perp23,L112,0);
P522=OrderedIntersection("P522",Perp212,L122,0);
P514=OrderedIntersection("P514",Perp24,L113,0);
P523=OrderedIntersection("P523",Perp213,L123,0);
P515=OrderedIntersection("P515",Perp25,L114,0);
P524=OrderedIntersection("P524",Perp214,L124,0);
Symc1=Symmetry("Symc1",P61,P511);
Symc11=Symmetry("Symc11",P51,P52);
Symc12=Symmetry("Symc12",P62,P512);
Symc111=Symmetry("Symc111",P53,P521);
Symc13=Symmetry("Symc13",P63,P513);
Symc112=Symmetry("Symc112",P54,P522);
Symc14=Symmetry("Symc14",P64,P514);
Symc113=Symmetry("Symc113",P55,P523);
Symc15=Symmetry("Symc15",P65,P515);
Symc114=Symmetry("Symc114",P56,P524);
L21=Line("L21",P41,Symc1);
L22=Line("L22",P42,Symc11);
L211=Line("L211",P411,Symc12);
L221=Line("L221",P421,Symc111);
L212=Line("L212",P412,Symc13);
L222=Line("L222",P422,Symc112);
L213=Line("L213",P413,Symc14);
L223=Line("L223",P423,Symc113);
L214=Line("L214",P414,Symc15);
L224=Line("L224",P424,Symc114);
D=OrderedIntersection("D",L21,d1,0);
D1=OrderedIntersection("D1",L22,d11,0);
D2=OrderedIntersection("D2",L211,d12,0);
D11=OrderedIntersection("D11",L221,d111,0);
D3=OrderedIntersection("D3",L212,d13,0);
D12=OrderedIntersection("D12",L222,d112,0);
D4=OrderedIntersection("D4",L213,d14,0);
D13=OrderedIntersection("D13",L223,d113,0);
D5=OrderedIntersection("D5",L214,d15,0);
D14=OrderedIntersection("D14",L224,d114,0);
L3=Line("L3",D,D1);
L31=Line("L31",D2,D11);
L32=Line("L32",D3,D12);
L33=Line("L33",D4,D13);
L34=Line("L34",D5,D14);
P11=OrderedIntersection("P11",L3,L31,0);
P12=OrderedIntersection("P12",L34,L31,0);
P13=OrderedIntersection("P13",L33,L34,0);
P14=OrderedIntersection("P14",L32,L33,0);
P15=OrderedIntersection("P15",L3,L32,0);
L17=Line("L17",P11,P14);
L27=Line("L27",P15,P13);
L4=Line("L4",P12,P15);
L6=Line("L6",P11,P13);
L8=Line("L8",P12,P14);
P16=OrderedIntersection("P16",L27,L17,0);
P17=OrderedIntersection("P17",L4,L17,0);
P18=OrderedIntersection("P18",L4,L6,0);
P19=OrderedIntersection("P19",L8,L6,0);
P20=OrderedIntersection("P20",L8,L27,0);
L35=Line("L35",P12,P16);
L5=Line("L5",P13,P17);
L7=Line("L7",P14,P18);
L9=Line("L9",P15,P19);
L10=Line("L10",P11,P20);
T1=OrderedIntersection("T1",L35,L32,0);
T2=OrderedIntersection("T2",L5,L3,0);
T3=OrderedIntersection("T3",L7,L31,0);
T4=OrderedIntersection("T4",L9,L34,0);
T5=OrderedIntersection("T5",L10,L33,0);
Quad2=Quadric("Quad2",T1,T2,T3,T4,T5);
P9=OrderedIntersection("P9",Quad2,Quad1,0);
P10=OrderedIntersection("P10",Quad2,Quad1,1);
P21=OrderedIntersection("P21",Quad2,Quad1,3);
P22=OrderedIntersection("P22",Quad2,Quad1,2);
L18=Line("L18",P66,P22);
L19=Line("L19",P67,P21);
L110=Line("L110",P68,P10);
L115=Line("L115",P69,P9);
Par1=Parallel("Par1",L18,P5);
Par2=Parallel("Par2",L18,P7);
Par11=Parallel("Par11",L19,P5);
Par21=Parallel("Par21",L19,P7);
Par12=Parallel("Par12",L110,P5);
Par22=Parallel("Par22",L110,P7);
Par13=Parallel("Par13",L115,P5);
Par23=Parallel("Par23",L115,P7);
P43=OrderedIntersection("P43",Par1,Quad1,1,P5);
P57=OrderedIntersection("P57",Par2,Quad1,0,P7);
P44=OrderedIntersection("P44",Par11,Quad1,1,P5);
P58=OrderedIntersection("P58",Par21,Quad1,0,P7);
P45=OrderedIntersection("P45",Par12,Quad1,1,P5);
P59=OrderedIntersection("P59",Par22,Quad1,0,P7);
P46=OrderedIntersection("P46",Par13,Quad1,1,P5);
P510=OrderedIntersection("P510",Par23,Quad1,0,P7);
M1=MidPoint("M1",P57,P7);
M2=MidPoint("M2",P5,P43);
M11=MidPoint("M11",P58,P7);
M21=MidPoint("M21",P5,P44);
M12=MidPoint("M12",P59,P7);
M22=MidPoint("M22",P5,P45);
M13=MidPoint("M13",P510,P7);
M23=MidPoint("M23",P5,P46);
L28=Line("L28",M2,M1);
L29=Line("L29",M21,M11);
L210=Line("L210",M22,M12);
L215=Line("L215",M23,M13);
Par3=Parallel("Par3",L28,P22);
Par31=Parallel("Par31",L29,P21);
Par32=Parallel("Par32",L210,P10);
Par33=Parallel("Par33",L215,P9);
STL(Par3,"c:#780013;s:1;f:30;p:0");
STL(Par31,"c:#780013;s:1;f:30;p:0");
STL(Par32,"c:#780013;s:1;f:30;p:0");
STL(Par33,"c:#780013;s:1;f:30;p:0");
return [Par3,Par31,Par32,Par33];
}};

// Coordinates System :
SetCoords(812,345,40);


// Geometry :
J=Point("J",1.3,-2.375);
I=Point("I",-3.975,2.9);
M=Point("M",-2.475,0.025);
K=Point("K",3.75,1.7);
P4=Point("P4",-12.1,7.35);
P5=Point("P5",-11.95,-2.125);
P6=Point("P6",-5.4,0.05);
P7=Point("P7",-3.7,6.25);
P8=Point("P8",-8.925,5.625);
L=Point("L",1.25,4.175);
L1=Line("L1",P4,I);
L13=Line("L13",P5,I);
L14=Line("L14",P6,I);
L24=Line("L24",P6,M);
L15=Line("L15",P7,I);
L25=Line("L25",P7,M);
L16=Line("L16",P8,I);
L26=Line("L26",P8,M);
Quad=Quadric("Quad",I,J,K,L,M);
L2=Line("L2",P4,M);
Quad1=Quadric("Quad1",P4,P5,P6,P7,P8);
L23=Line("L23",P5,M);
P67=Point("P67","Quad.center()","0");
P54=OrderedIntersection("P54",L14,Quad,1,I);
P55=OrderedIntersection("P55",L15,Quad,1,I);
P64=OrderedIntersection("P64",L25,Quad,1,M);
P56=OrderedIntersection("P56",L16,Quad,1,I);
P61=OrderedIntersection("P61",L2,Quad,1,M);
P66=Point("P66","Quad.center()","0");
P53=OrderedIntersection("P53",L13,Quad,1,I);
P68=Point("P68","Quad.center()","0");
P69=Point("P69","Quad.center()","0");
P51=OrderedIntersection("P51",L1,Quad,1,I);
P62=OrderedIntersection("P62",L23,Quad,1,M);
P65=OrderedIntersection("P65",L26,Quad,1,M);
P63=OrderedIntersection("P63",L24,Quad,1,M);
d11=Line("d11",P51,I);
C11=Circle("C11",I,P51);
d12=Line("d12",P62,M);
C12=Circle("C12",M,P62);
d111=Line("d111",P53,I);
C111=Circle("C111",I,P53);
d13=Line("d13",P63,M);
C13=Circle("C13",M,P63);
d112=Line("d112",P54,I);
C112=Circle("C112",I,P54);
d14=Line("d14",P64,M);
C14=Circle("C14",M,P64);
d113=Line("d113",P55,I);
C113=Circle("C113",I,P55);
d15=Line("d15",P65,M);
C15=Circle("C15",M,P65);
d1=Line("d1",P61,M);
C1=Circle("C1",M,P61);
d114=Line("d114",P56,I);
C114=Circle("C114",I,P56);
Perp1=Perpendicular("Perp1",d1,M);
Perp21=Perpendicular("Perp21",d11,P51);
Perp12=Perpendicular("Perp12",d12,M);
Perp22=Perpendicular("Perp22",d12,P62);
Perp111=Perpendicular("Perp111",d111,I);
Perp211=Perpendicular("Perp211",d111,P53);
Perp13=Perpendicular("Perp13",d13,M);
Perp23=Perpendicular("Perp23",d13,P63);
Perp112=Perpendicular("Perp112",d112,I);
Perp212=Perpendicular("Perp212",d112,P54);
Perp14=Perpendicular("Perp14",d14,M);
Perp24=Perpendicular("Perp24",d14,P64);
Perp113=Perpendicular("Perp113",d113,I);
Perp213=Perpendicular("Perp213",d113,P55);
Perp15=Perpendicular("Perp15",d15,M);
Perp25=Perpendicular("Perp25",d15,P65);
Perp114=Perpendicular("Perp114",d114,I);
Perp214=Perpendicular("Perp214",d114,P56);
Perp2=Perpendicular("Perp2",d1,P61);
Perp11=Perpendicular("Perp11",d11,I);
P41=OrderedIntersection("P41",Perp1,C1,1);
P42=OrderedIntersection("P42",Perp11,C11,1);
P412=OrderedIntersection("P412",Perp13,C13,1);
P422=OrderedIntersection("P422",Perp112,C112,1);
P413=OrderedIntersection("P413",Perp14,C14,1);
P423=OrderedIntersection("P423",Perp113,C113,1);
P414=OrderedIntersection("P414",Perp15,C15,1);
P424=OrderedIntersection("P424",Perp114,C114,1);
P411=OrderedIntersection("P411",Perp12,C12,1);
P421=OrderedIntersection("P421",Perp111,C111,1);
L11=Line("L11",P41,P4);
L121=Line("L121",P421,P5);
L112=Line("L112",P412,P6);
L122=Line("L122",P422,P6);
L113=Line("L113",P413,P7);
L123=Line("L123",P423,P7);
L114=Line("L114",P414,P8);
L124=Line("L124",P424,P8);
L12=Line("L12",P42,P4);
L111=Line("L111",P411,P5);
P511=OrderedIntersection("P511",Perp2,L11,0);
P52=OrderedIntersection("P52",Perp21,L12,0);
P512=OrderedIntersection("P512",Perp22,L111,0);
P521=OrderedIntersection("P521",Perp211,L121,0);
P513=OrderedIntersection("P513",Perp23,L112,0);
P522=OrderedIntersection("P522",Perp212,L122,0);
P514=OrderedIntersection("P514",Perp24,L113,0);
P523=OrderedIntersection("P523",Perp213,L123,0);
P515=OrderedIntersection("P515",Perp25,L114,0);
P524=OrderedIntersection("P524",Perp214,L124,0);
Symc1=Symmetry("Symc1",P61,P511);
Symc11=Symmetry("Symc11",P51,P52);
Symc13=Symmetry("Symc13",P63,P513);
Symc112=Symmetry("Symc112",P54,P522);
Symc14=Symmetry("Symc14",P64,P514);
Symc113=Symmetry("Symc113",P55,P523);
Symc15=Symmetry("Symc15",P65,P515);
Symc114=Symmetry("Symc114",P56,P524);
Symc12=Symmetry("Symc12",P62,P512);
Symc111=Symmetry("Symc111",P53,P521);
L221=Line("L221",P421,Symc111);
L222=Line("L222",P422,Symc112);
L213=Line("L213",P413,Symc14);
L223=Line("L223",P423,Symc113);
L214=Line("L214",P414,Symc15);
L224=Line("L224",P424,Symc114);
L21=Line("L21",P41,Symc1);
L211=Line("L211",P411,Symc12);
L22=Line("L22",P42,Symc11);
L212=Line("L212",P412,Symc13);
D2=OrderedIntersection("D2",L211,d12,0);
D11=OrderedIntersection("D11",L221,d111,0);
D3=OrderedIntersection("D3",L212,d13,0);
D12=OrderedIntersection("D12",L222,d112,0);
D4=OrderedIntersection("D4",L213,d14,0);
D13=OrderedIntersection("D13",L223,d113,0);
D5=OrderedIntersection("D5",L214,d15,0);
D14=OrderedIntersection("D14",L224,d114,0);
D=OrderedIntersection("D",L21,d1,0);
D1=OrderedIntersection("D1",L22,d11,0);
L3=Line("L3",D,D1);
L31=Line("L31",D2,D11);
L34=Line("L34",D5,D14);
L32=Line("L32",D3,D12);
L33=Line("L33",D4,D13);
P14=OrderedIntersection("P14",L32,L33,0);
P11=OrderedIntersection("P11",L3,L31,0);
P13=OrderedIntersection("P13",L33,L34,0);
P12=OrderedIntersection("P12",L34,L31,0);
P15=OrderedIntersection("P15",L3,L32,0);
L4=Line("L4",P12,P15);
L17=Line("L17",P11,P14);
L27=Line("L27",P15,P13);
L6=Line("L6",P11,P13);
L8=Line("L8",P12,P14);
P16=OrderedIntersection("P16",L27,L17,0);
P17=OrderedIntersection("P17",L4,L17,0);
P18=OrderedIntersection("P18",L4,L6,0);
P19=OrderedIntersection("P19",L8,L6,0);
P20=OrderedIntersection("P20",L8,L27,0);
L35=Line("L35",P12,P16);
L5=Line("L5",P13,P17);
L7=Line("L7",P14,P18);
L9=Line("L9",P15,P19);
L10=Line("L10",P11,P20);
T1=OrderedIntersection("T1",L35,L32,0);
T2=OrderedIntersection("T2",L5,L3,0);
T5=OrderedIntersection("T5",L10,L33,0);
T3=OrderedIntersection("T3",L7,L31,0);
T4=OrderedIntersection("T4",L9,L34,0);
Quad2=Quadric("Quad2",T1,T2,T3,T4,T5);
P9=OrderedIntersection("P9",Quad2,Quad,0);
P22=OrderedIntersection("P22",Quad2,Quad,2);
P10=OrderedIntersection("P10",Quad2,Quad,1);
P21=OrderedIntersection("P21",Quad2,Quad,3);
L110=Line("L110",P68,P10);
L115=Line("L115",P69,P9);
L18=Line("L18",P66,P22);
L19=Line("L19",P67,P21);
Par11=Parallel("Par11",L19,J);
Par21=Parallel("Par21",L19,L);
Par12=Parallel("Par12",L110,J);
Par22=Parallel("Par22",L110,L);
Par13=Parallel("Par13",L115,J);
Par23=Parallel("Par23",L115,L);
Par1=Parallel("Par1",L18,J);
Par2=Parallel("Par2",L18,L);
P43=OrderedIntersection("P43",Par1,Quad,1,J);
P57=OrderedIntersection("P57",Par2,Quad,0,L);
P44=OrderedIntersection("P44",Par11,Quad,1,J);
P58=OrderedIntersection("P58",Par21,Quad,0,L);
P45=OrderedIntersection("P45",Par12,Quad,1,J);
P59=OrderedIntersection("P59",Par22,Quad,0,L);
P46=OrderedIntersection("P46",Par13,Quad,1,J);
P510=OrderedIntersection("P510",Par23,Quad,0,L);
M1=MidPoint("M1",P57,L);
M21=MidPoint("M21",J,P44);
M12=MidPoint("M12",P59,L);
M22=MidPoint("M22",J,P45);
M13=MidPoint("M13",P510,L);
M23=MidPoint("M23",J,P46);
M2=MidPoint("M2",J,P43);
M11=MidPoint("M11",P58,L);
L28=Line("L28",M2,M1);
L29=Line("L29",M21,M11);
L210=Line("L210",M22,M12);
L215=Line("L215",M23,M13);
Par3=Parallel("Par3",L28,P22);
Par31=Parallel("Par31",L29,P21);
Par32=Parallel("Par32",L210,P10);
Par33=Parallel("Par33",L215,P9);


// Styles :
STL(J,"c:#0000b2;o:1;s:6;sn:true;f:17");
STL(I,"c:#0000b2;o:1;s:6;sn:true;f:17");
STL(M,"c:#0000b2;o:1;s:6;sn:true;f:17");
STL(K,"c:#0000b2;o:1;s:6;sn:true;f:17");
STL(P4,"c:#007c00;o:1;s:6;f:17");
STL(P5,"c:#007c00;o:1;s:6;f:17");
STL(P6,"c:#007c00;o:1;s:6;f:17");
STL(P7,"c:#007c00;o:1;s:6;f:17");
STL(P8,"c:#007c00;o:1;s:6;f:17");
STL(L,"c:#0000b2;o:1;s:6;sn:true;f:17");
STL(L1,"c:#780013;h:2;s:1;f:30;p:0");
STL(L13,"c:#780013;h:2;s:1;f:30;p:0");
STL(L14,"c:#780013;h:2;s:1;f:30;p:0");
STL(L24,"c:#780013;h:2;s:1;f:30;p:0");
STL(L15,"c:#780013;h:2;s:1;f:30;p:0");
STL(L25,"c:#780013;h:2;s:1;f:30;p:0");
STL(L16,"c:#780013;h:2;s:1;f:30;p:0");
STL(L26,"c:#780013;h:2;s:1;f:30;p:0");
STL(Quad,"c:#0000b2;s:3;f:30;p:500");
STL(L2,"c:#780013;h:2;s:1;f:30;p:0");
STL(Quad1,"c:#007c00;s:3;f:30;p:500");
STL(L23,"c:#780013;h:2;s:1;f:30;p:0");
STL(P67,"c:#0000b2;h:2;s:6;f:17");
STL(P54,"c:#0000b2;h:2;s:6;f:17");
STL(P55,"c:#0000b2;h:2;s:6;f:17");
STL(P64,"c:#0000b2;h:2;s:6;f:17");
STL(P56,"c:#0000b2;h:2;s:6;f:17");
STL(P61,"c:#0000b2;h:2;s:6;f:17");
STL(P66,"c:#0000b2;h:2;s:6;f:17");
STL(P53,"c:#0000b2;h:2;s:6;f:17");
STL(P68,"c:#0000b2;h:2;s:6;f:17");
STL(P69,"c:#0000b2;h:2;s:6;f:17");
STL(P51,"c:#0000b2;h:2;s:6;f:17");
STL(P62,"c:#0000b2;h:2;s:6;f:17");
STL(P65,"c:#0000b2;h:2;s:6;f:17");
STL(P63,"c:#0000b2;h:2;s:6;f:17");
STL(d11,"c:#780013;h:2;s:1;f:30;p:0");
STL(C11,"c:#cc66cc;h:2;s:1;f:30;p:0");
STL(d12,"c:#780013;h:2;s:1;f:30;p:0");
STL(C12,"c:#cc66cc;h:2;s:1;f:30;p:0");
STL(d111,"c:#780013;h:2;s:1;f:30;p:0");
STL(C111,"c:#cc66cc;h:2;s:1;f:30;p:0");
STL(d13,"c:#780013;h:2;s:1;f:30;p:0");
STL(C13,"c:#cc66cc;h:2;s:1;f:30;p:0");
STL(d112,"c:#780013;h:2;s:1;f:30;p:0");
STL(C112,"c:#cc66cc;h:2;s:1;f:30;p:0");
STL(d14,"c:#780013;h:2;s:1;f:30;p:0");
STL(C14,"c:#cc66cc;h:2;s:1;f:30;p:0");
STL(d113,"c:#780013;h:2;s:1;f:30;p:0");
STL(C113,"c:#cc66cc;h:2;s:1;f:30;p:0");
STL(d15,"c:#780013;h:2;s:1;f:30;p:0");
STL(C15,"c:#cc66cc;h:2;s:1;f:30;p:0");
STL(d1,"c:#780013;h:2;s:1;f:30;p:0");
STL(C1,"c:#cc66cc;h:2;s:1;f:30;p:0");
STL(d114,"c:#780013;h:2;s:1;f:30;p:0");
STL(C114,"c:#cc66cc;h:2;s:1;f:30;p:0");
STL(Perp1,"c:#780013;h:2;s:1;f:30;p:0");
STL(Perp21,"c:#780013;h:2;s:1;f:30;p:0");
STL(Perp12,"c:#780013;h:2;s:1;f:30;p:0");
STL(Perp22,"c:#780013;h:2;s:1;f:30;p:0");
STL(Perp111,"c:#780013;h:2;s:1;f:30;p:0");
STL(Perp211,"c:#780013;h:2;s:1;f:30;p:0");
STL(Perp13,"c:#780013;h:2;s:1;f:30;p:0");
STL(Perp23,"c:#780013;h:2;s:1;f:30;p:0");
STL(Perp112,"c:#780013;h:2;s:1;f:30;p:0");
STL(Perp212,"c:#780013;h:2;s:1;f:30;p:0");
STL(Perp14,"c:#780013;h:2;s:1;f:30;p:0");
STL(Perp24,"c:#780013;h:2;s:1;f:30;p:0");
STL(Perp113,"c:#780013;h:2;s:1;f:30;p:0");
STL(Perp213,"c:#780013;h:2;s:1;f:30;p:0");
STL(Perp15,"c:#780013;h:2;s:1;f:30;p:0");
STL(Perp25,"c:#780013;h:2;s:1;f:30;p:0");
STL(Perp114,"c:#780013;h:2;s:1;f:30;p:0");
STL(Perp214,"c:#780013;h:2;s:1;f:30;p:0");
STL(Perp2,"c:#780013;h:2;s:1;f:30;p:0");
STL(Perp11,"c:#780013;h:2;s:1;f:30;p:0");
STL(P41,"c:#0000b2;h:2;s:6;f:17");
STL(P42,"c:#0000b2;h:2;s:6;f:17");
STL(P412,"c:#0000b2;h:2;s:6;f:17");
STL(P422,"c:#0000b2;h:2;s:6;f:17");
STL(P413,"c:#0000b2;h:2;s:6;f:17");
STL(P423,"c:#0000b2;h:2;s:6;f:17");
STL(P414,"c:#0000b2;h:2;s:6;f:17");
STL(P424,"c:#0000b2;h:2;s:6;f:17");
STL(P411,"c:#0000b2;h:2;s:6;f:17");
STL(P421,"c:#0000b2;h:2;s:6;f:17");
STL(L11,"c:#780013;h:2;s:1;f:30;p:0");
STL(L121,"c:#780013;h:2;s:1;f:30;p:0");
STL(L112,"c:#780013;h:2;s:1;f:30;p:0");
STL(L122,"c:#780013;h:2;s:1;f:30;p:0");
STL(L113,"c:#780013;h:2;s:1;f:30;p:0");
STL(L123,"c:#780013;h:2;s:1;f:30;p:0");
STL(L114,"c:#780013;h:2;s:1;f:30;p:0");
STL(L124,"c:#780013;h:2;s:1;f:30;p:0");
STL(L12,"c:#780013;h:2;s:1;f:30;p:0");
STL(L111,"c:#780013;h:2;s:1;f:30;p:0");
STL(P511,"c:#0000b2;h:2;s:6;f:17");
STL(P52,"c:#0000b2;h:2;s:6;f:17");
STL(P512,"c:#0000b2;h:2;s:6;f:17");
STL(P521,"c:#0000b2;h:2;s:6;f:17");
STL(P513,"c:#0000b2;h:2;s:6;f:17");
STL(P522,"c:#0000b2;h:2;s:6;f:17");
STL(P514,"c:#0000b2;h:2;s:6;f:17");
STL(P523,"c:#0000b2;h:2;s:6;f:17");
STL(P515,"c:#0000b2;h:2;s:6;f:17");
STL(P524,"c:#0000b2;h:2;s:6;f:17");
STL(Symc1,"c:#0000b2;h:2;s:6;f:17");
STL(Symc11,"c:#0000b2;h:2;s:6;f:17");
STL(Symc13,"c:#0000b2;h:2;s:6;f:17");
STL(Symc112,"c:#0000b2;h:2;s:6;f:17");
STL(Symc14,"c:#0000b2;h:2;s:6;f:17");
STL(Symc113,"c:#0000b2;h:2;s:6;f:17");
STL(Symc15,"c:#0000b2;h:2;s:6;f:17");
STL(Symc114,"c:#0000b2;h:2;s:6;f:17");
STL(Symc12,"c:#0000b2;h:2;s:6;f:17");
STL(Symc111,"c:#0000b2;h:2;s:6;f:17");
STL(L221,"c:#780013;h:2;s:1;f:30;p:0");
STL(L222,"c:#780013;h:2;s:1;f:30;p:0");
STL(L213,"c:#780013;h:2;s:1;f:30;p:0");
STL(L223,"c:#780013;h:2;s:1;f:30;p:0");
STL(L214,"c:#780013;h:2;s:1;f:30;p:0");
STL(L224,"c:#780013;h:2;s:1;f:30;p:0");
STL(L21,"c:#780013;h:2;s:1;f:30;p:0");
STL(L211,"c:#780013;h:2;s:1;f:30;p:0");
STL(L22,"c:#780013;h:2;s:1;f:30;p:0");
STL(L212,"c:#780013;h:2;s:1;f:30;p:0");
STL(D2,"c:#0000b2;h:2;s:6;f:17");
STL(D11,"c:#0000b2;h:2;s:6;f:17");
STL(D3,"c:#0000b2;h:2;s:6;f:17");
STL(D12,"c:#0000b2;h:2;s:6;f:17");
STL(D4,"c:#0000b2;h:2;s:6;f:17");
STL(D13,"c:#0000b2;h:2;s:6;f:17");
STL(D5,"c:#0000b2;h:2;s:6;f:17");
STL(D14,"c:#0000b2;h:2;s:6;f:17");
STL(D,"c:#0000b2;h:2;s:6;f:17");
STL(D1,"c:#0000b2;h:2;s:6;f:17");
STL(L3,"c:#780013;h:2;s:1;f:30;p:0");
STL(L31,"c:#780013;h:2;s:1;f:30;p:0");
STL(L34,"c:#780013;h:2;s:1;f:30;p:0");
STL(L32,"c:#780013;h:2;s:1;f:30;p:0");
STL(L33,"c:#780013;h:2;s:1;f:30;p:0");
STL(P14,"c:#0000b2;h:2;s:6;f:17");
STL(P11,"c:#0000b2;h:2;s:6;f:17");
STL(P13,"c:#0000b2;h:2;s:6;f:17");
STL(P12,"c:#0000b2;h:2;s:6;f:17");
STL(P15,"c:#0000b2;h:2;s:6;f:17");
STL(L4,"c:#780013;h:2;s:1;f:30;p:0");
STL(L17,"c:#780013;h:2;s:1;f:30;p:0");
STL(L27,"c:#780013;h:2;s:1;f:30;p:0");
STL(L6,"c:#780013;h:2;s:1;f:30;p:0");
STL(L8,"c:#780013;h:2;s:1;f:30;p:0");
STL(P16,"c:#0000b2;h:2;s:6;f:17");
STL(P17,"c:#0000b2;h:2;s:6;f:17");
STL(P18,"c:#0000b2;h:2;s:6;f:17");
STL(P19,"c:#0000b2;h:2;s:6;f:17");
STL(P20,"c:#0000b2;h:2;s:6;f:17");
STL(L35,"c:#780013;h:2;s:1;f:30;p:0");
STL(L5,"c:#780013;h:2;s:1;f:30;p:0");
STL(L7,"c:#780013;h:2;s:1;f:30;p:0");
STL(L9,"c:#780013;h:2;s:1;f:30;p:0");
STL(L10,"c:#780013;h:2;s:1;f:30;p:0");
STL(T1,"c:#0000b2;h:2;s:6;f:17");
STL(T2,"c:#0000b2;h:2;s:6;f:17");
STL(T5,"c:#0000b2;h:2;s:6;f:17");
STL(T3,"c:#0000b2;h:2;s:6;f:17");
STL(T4,"c:#0000b2;h:2;s:6;f:17");
STL(Quad2,"c:#00adff;h:2;s:1;f:30;p:500");
STL(P9,"c:#0000b2;h:2;s:6;f:17");
STL(P22,"c:#0000b2;h:2;s:6;f:17");
STL(P10,"c:#0000b2;h:2;s:6;f:17");
STL(P21,"c:#0000b2;h:2;s:6;f:17");
STL(L110,"c:#780013;h:2;s:1;f:30;p:0");
STL(L115,"c:#780013;h:2;s:1;f:30;p:0");
STL(L18,"c:#780013;h:2;s:1;f:30;p:0");
STL(L19,"c:#780013;h:2;s:1;f:30;p:0");
STL(Par11,"c:#780013;h:2;s:1;f:30;p:0");
STL(Par21,"c:#780013;h:2;s:1;f:30;p:0");
STL(Par12,"c:#780013;h:2;s:1;f:30;p:0");
STL(Par22,"c:#780013;h:2;s:1;f:30;p:0");
STL(Par13,"c:#780013;h:2;s:1;f:30;p:0");
STL(Par23,"c:#780013;h:2;s:1;f:30;p:0");
STL(Par1,"c:#780013;h:2;s:1;f:30;p:0");
STL(Par2,"c:#780013;h:2;s:1;f:30;p:0");
STL(P43,"c:#0000b2;h:2;s:6;f:17");
STL(P57,"c:#0000b2;h:2;s:6;f:17");
STL(P44,"c:#0000b2;h:2;s:6;f:17");
STL(P58,"c:#0000b2;h:2;s:6;f:17");
STL(P45,"c:#0000b2;h:2;s:6;f:17");
STL(P59,"c:#0000b2;h:2;s:6;f:17");
STL(P46,"c:#0000b2;h:2;s:6;f:17");
STL(P510,"c:#0000b2;h:2;s:6;f:17");
STL(M1,"c:#0000b2;h:2;s:6;f:17");
STL(M21,"c:#0000b2;h:2;s:6;f:17");
STL(M12,"c:#0000b2;h:2;s:6;f:17");
STL(M22,"c:#0000b2;h:2;s:6;f:17");
STL(M13,"c:#0000b2;h:2;s:6;f:17");
STL(M23,"c:#0000b2;h:2;s:6;f:17");
STL(M2,"c:#0000b2;h:2;s:6;f:17");
STL(M11,"c:#0000b2;h:2;s:6;f:17");
STL(L28,"c:#780013;h:2;s:1;f:30;p:0");
STL(L29,"c:#780013;h:2;s:1;f:30;p:0");
STL(L210,"c:#780013;h:2;s:1;f:30;p:0");
STL(L215,"c:#780013;h:2;s:1;f:30;p:0");
STL(Par3,"c:#ff00b5;s:3;f:30;p:0");
STL(Par31,"c:#ff00d3;s:3;f:30;p:0");
STL(Par32,"c:#ff00b5;s:3;f:30;p:0");
STL(Par33,"c:#ff00a5;s:3.5;f:30;p:0");
SetCoordsStyle("is3D:true;isAxis:false;isGrid:true;isOx:true;isOy:true;isLockOx:false;isLockOy:false;centerZoom:false;color:#111111;fontSize:18;axisWidth:1;gridWidth:0.1");