// Macros :
$macros={};
$macros["Cnk 5 points"]={
	name:"Cnk 5 points",
	parameters:["point","point","point","point","point"],
	exec:
	function (A,B,C,D,E){
Quad=Quadric("Quad",A,B,C,D,E);
return [Quad];
}};

$macros["ConstAB [c,k2]"]={
	name:"ConstAB [c,k2]",
	parameters:["expression","expression"],
	exec:
	function (CdA,CdB){
CstGene=Expression("CstGene","Const2pts = ","","","[((exp(CdA[0])+exp(-CdA[0]))^2/4-(exp(CdB[0])+exp(-CdB[0]))^2/4+CdA[1]^2-CdB[1]^2)/(2*(CdB[1]-CdA[1])),(exp(CdA[0])+exp(-CdA[0]))^2/4+(CdA[1]+((exp(CdA[0])+exp(-CdA[0]))^2/4-(exp(CdB[0])+exp(-CdB[0]))^2/4+CdA[1]^2-CdB[1]^2)/(2*(CdB[1]-CdA[1])))^2]","-1","-0.4");
STL(CstGene,"c:#2f542d;s:7;f:18;p:4;cL:200;cPT:YzojNzgwMDEzO3M6MTA7ZjozMA==");
return [CstGene];
}};

$macros["Coord Inter 2 droites"]={
	name:"Coord Inter 2 droites",
	parameters:["expression","expression"],
	exec:
	function (CstBK,CstCI){
E16=Expression("E16","CoordInter = ","","","[log(sqrt(CstBK[1]-(((CstBK[1]-CstCI[1])/(CstBK[0]-CstCI[0])-CstBK[0]-CstCI[0])/2+CstBK[0])^2)+sqrt(CstBK[1]-(((CstBK[1]-CstCI[1])/(CstBK[0]-CstCI[0])-CstBK[0]-CstCI[0])/2+CstBK[0])^2-1)),((CstBK[1]-CstCI[1])/(CstBK[0]-CstCI[0])-CstBK[0]-CstCI[0])/2]","1.321119296126132","-0.7826675478533046");
STL(E16,"c:#512475;s:7;f:18;p:4;cL:200;cPT:YzojNzgwMDEzO3M6MTA7ZjozMA==");
return [E16];
}};

$macros["Coord Milieu"]={
	name:"Coord Milieu",
	parameters:["expression","expression"],
	exec:
	function (CdA,CdB){
CstAB=Expression("CstAB","Const AB = ","","","[((exp(CdA[0])+exp(-CdA[0]))^2/4-(exp(CdB[0])+exp(-CdB[0]))^2/4+CdA[1]^2-CdB[1]^2)/(2*(CdB[1]-CdA[1])),(exp(CdA[0])+exp(-CdA[0]))^2/4+(CdA[1]+((exp(CdA[0])+exp(-CdA[0]))^2/4-(exp(CdB[0])+exp(-CdB[0]))^2/4+CdA[1]^2-CdB[1]^2)/(2*(CdB[1]-CdA[1])))^2]","-0.2","-0.8");
xIab=Expression("xIab","xIab = ","","","log((sqrt(CstAB[1])+CdA[1]+CstAB[0])*((sqrt(CstAB[1])+CdB[1]+CstAB[0]))/((sqrt(CstAB[1])-CdA[1]-CstAB[0])*(sqrt(CstAB[1])-CdB[1]-CstAB[0])))/4","1.843918766313936","-1.5514902981294871");
tI=Expression("tI","thetaI= ","","","sqrt(CstAB[1])*(exp(xIab)-exp(-xIab))/(exp(xIab)+exp(-xIab))-CstAB[0]","2.059189136391267","-1.151702467985872");
chuI=Expression("chuI","chuI =","","","sqrt(CstAB[1]-(tI+CstAB[0])^2)","1.7209071262697468","-0.9364320979085411");
uI=Expression("uI","uI = ","","","log(chuI+sqrt(chuI^2-1))","1.3","-0.9");
CoordMilieu=Expression("CoordMilieu","coord Milieu =","","","[uI,tI]","1.8","-1.3");
STL(CoordMilieu,"c:#697917;s:7;f:18;p:4;cL:200;cPT:YzojNzgwMDEzO3M6MTA7ZjoyMA==");
return [CoordMilieu];
}};

$macros["Coord Milieu 3Exp"]={
	name:"Coord Milieu 3Exp",
	parameters:["expression","expression","expression"],
	exec:
	function (CdA,CdB,CstAB){
xIab=Expression("xIab","xIab = ","","","log((sqrt(CstAB[1])+CdA[1]+CstAB[0])*((sqrt(CstAB[1])+CdB[1]+CstAB[0]))/((sqrt(CstAB[1])-CdA[1]-CstAB[0])*(sqrt(CstAB[1])-CdB[1]-CstAB[0])))/4","1.843918766313936","-1.5514902981294871");
tI=Expression("tI","thetaI= ","","","sqrt(CstAB[1])*(exp(xIab)-exp(-xIab))/(exp(xIab)+exp(-xIab))-CstAB[0]","2.059189136391267","-1.151702467985872");
chuI=Expression("chuI","chuI =","","","sqrt(CstAB[1]-(tI+CstAB[0])^2)","1.7209071262697468","-0.9364320979085411");
uI=Expression("uI","uI = ","","","log(chuI+sqrt(chuI^2-1))","1.3","-0.9");
CoordMilieu=Expression("CoordMilieu","coord Milieu =","","","[uI,tI]","1.8","-1.3");
STL(CoordMilieu,"c:#697917;s:7;f:18;p:4;cL:200;cPT:YzojNzgwMDEzO3M6MTA7ZjoyMA==");
return [CoordMilieu];
}};

$macros["Coord [alt long]"]={
	name:"Coord [alt long]",
	parameters:["point","point","point","point","point","point"],
	exec:
	function (uMG,MG,O,X,Y,Z){
P18=Point("P18","[x(O)+1,y(O)]","0");
Symc3=Symmetry("Symc3",O,X);
Symc5=Symmetry("Symc5",O,P18);
Symc4=Symmetry("Symc4",O,Y);
S5=Segment("S5",Y,P18);
S9=Segment("S9",Symc3,X);
S6=Segment("S6",P18,Symc5);
S10=Segment("S10",Y,Symc4);
altM=Expression("altM","altMG=","","","(y(uMG)-y(O))/(y(Z)-y(O))","1.272714974024278","-0.5085689543964947");
E4=Expression("E4","","","","[0,2/(exp(altM)+exp(-altM)),altM-(exp(altM)-exp(-altM))/(exp(altM)+exp(-altM))]","-1.0302049391300743","-0.9307709384747926");
E2=Expression("E2","","","","[2/(exp(altM)+exp(-altM)),0,altM-(exp(altM)-exp(-altM))/(exp(altM)+exp(-altM))]","-1.0302049391300743","-1.237826926895373");
E3=Expression("E3","","","","[-2/(exp(altM)+exp(-altM)),0,altM-(exp(altM)-exp(-altM))/(exp(altM)+exp(-altM))]","-1.0302049391300743","-1.5065009167633807");
P14=Point("P14","[x(O)+E4[0]*(sin(phi()))+E4[1]*(cos(phi())),y(O)+E4[0]*(-cos(phi())*sin(theta()))+E4[1]*(sin(phi())*sin(theta()))+E4[2]*(cos(theta()))]","0");
P13=Point("P13","[x(O)+E3[0]*(sin(phi()))+E3[1]*(cos(phi())),y(O)+E3[0]*(-cos(phi())*sin(theta()))+E3[1]*(sin(phi())*sin(theta()))+E3[2]*(cos(theta()))]","0");
P12=Point("P12","[x(O)+E2[0]*(sin(phi()))+E2[1]*(cos(phi())),y(O)+E2[0]*(-cos(phi())*sin(theta()))+E2[1]*(sin(phi())*sin(theta()))+E2[2]*(cos(theta()))]","0");
M2=MidPoint("M2",P12,P13);
Par2=Parallel("Par2",S5,P14);
Par1=Parallel("Par1",S6,M2);
P1=OrderedIntersection("P1",Par1,Par2,0);
P2=Point("P2","[x(O)+(x(MG)-x(M2))*(x(P18)-x(O))/(x(P1)-x(M2)),y(O)+(y(MG)-y(M2))*(x(P18)-x(O))/(x(P1)-x(M2))]","0");
Par3=Parallel("Par3",S10,P2);
Par4=Parallel("Par4",S9,P2);
P3=OrderedIntersection("P3",S9,Par3,0);
P4=OrderedIntersection("P4",S10,Par4,0);
P5=Point("P5","[x(O)+(x(P3)-x(O))/(x(X)-x(O)),y(O)+(x(P4)-x(O))/(x(Y)-x(O))]","0");
angM=Angle("angM",P18,O,P5);
E5=Expression("E5","CoordM = ","","","[altM,angM]","1.0","-0.6");
STL(E5,"c:#163b31;s:7;f:18;p:4;cL:200;cPT:YzojNzgwMDEzO3M6MTA7ZjozMA==");
return [E5];
}};

$macros["droite par Const"]={
	name:"droite par Const",
	parameters:["expression","point"],
	exec:
	function (CstAB,O){
P5=Point("P5","[-CstAB[0]+sqrt(CstAB[1]-1),y(O)]","0");
P4=Point("P4","[-CstAB[0]-sqrt(CstAB[1]-1),y(O)]","0");
S9=Segment("S9",P4,P5);
tetaK=PointOn("tetaK",S9,0.9170704880607672);
chuK=Expression("chuK","chuK = ","","","sqrt(CstAB[1]-(x(tetaK)+CstAB[0])^2)","-1.3144050918206216","-0.7426887648389431");
uK=Expression("uK","uK = ","","","log(chuK+sqrt(chuK^2-1))","-1.1606405417653851","-0.5581713047726593");
EDrt=Expression("EDrt","","","","[cos(x(tetaK))/chuK,sin(x(tetaK))/chuK,uK-(exp(uK)-exp(-uK))/(exp(uK)+exp(-uK))]","-1.5","-0.5");
PtDrt=Point("PtDrt","[x(O)+EDrt[0]*(sin(phi()))+EDrt[1]*(cos(phi())),y(O)+EDrt[0]*(-cos(phi())*sin(theta()))+EDrt[1]*(sin(phi())*sin(theta()))+EDrt[2]*(cos(theta()))]","0");
LaDroite=Locus("LaDroite",PtDrt,tetaK);
STL(LaDroite,"c:#b40000;s:3;f:30;p:0");
return [LaDroite];
}};

$macros["Horicycle Alt"]={
	name:"Horicycle Alt",
	parameters:["point","point"],
	exec:
	function (uA,O){
AltPt=Expression("AltPt","AltPt=","","","(y(uA)-y(O))/(y(Z)-y(O))","-1.887399235353066","-0.9507350119581727");
E31=Expression("E31","","","","[-2/(exp(AltPt)+exp(-AltPt)),0,AltPt-(exp(AltPt)-exp(-AltPt))/(exp(AltPt)+exp(-AltPt))]","-2.8619298479206368","0.32703541991492735");
E5=Expression("E5","","","","[0,-2/(exp(AltPt)+exp(-AltPt)),AltPt-(exp(AltPt)-exp(-AltPt))/(exp(AltPt)+exp(-AltPt))]","-2.783967398915231","1.6523970530068235");
E21=Expression("E21","","","","[2/(exp(AltPt)+exp(-AltPt)),0,AltPt-(exp(AltPt)-exp(-AltPt))/(exp(AltPt)+exp(-AltPt))]","-2.783967398915231","0.48296031792573874");
E61=Expression("E61","","","","[1/(exp(AltPt)+exp(-AltPt)),sqrt(3)/(exp(AltPt)+exp(-AltPt)),AltPt-(exp(AltPt)-exp(-AltPt))/(exp(AltPt)+exp(-AltPt))]","-2.822948623417934","1.4574909304933095");
E41=Expression("E41","","","","[0,2/(exp(AltPt)+exp(-AltPt)),AltPt-(exp(AltPt)-exp(-AltPt))/(exp(AltPt)+exp(-AltPt))]","-2.8619298479206368","0.21009174640681894");
PtM3=Point("PtM3","[x(O)+E31[0]*(sin(phi()))+E31[1]*(cos(phi())),y(O)+E31[0]*(-cos(phi())*sin(theta()))+E31[1]*(sin(phi())*sin(theta()))+E31[2]*(cos(theta()))]","0");
PtM4=Point("PtM4","[x(O)+E41[0]*(sin(phi()))+E41[1]*(cos(phi())),y(O)+E41[0]*(-cos(phi())*sin(theta()))+E41[1]*(sin(phi())*sin(theta()))+E41[2]*(cos(theta()))]","0");
PtM5=Point("PtM5","[x(O)+E5[0]*(sin(phi()))+E5[1]*(cos(phi())),y(O)+E5[0]*(-cos(phi())*sin(theta()))+E5[1]*(sin(phi())*sin(theta()))+E5[2]*(cos(theta()))]","0");
PtM6=Point("PtM6","[x(O)+E61[0]*(sin(phi()))+E61[1]*(cos(phi())),y(O)+E61[0]*(-cos(phi())*sin(theta()))+E61[1]*(sin(phi())*sin(theta()))+E61[2]*(cos(theta()))]","0");
PtM2=Point("PtM2","[x(O)+E21[0]*(sin(phi()))+E21[1]*(cos(phi())),y(O)+E21[0]*(-cos(phi())*sin(theta()))+E21[1]*(sin(phi())*sin(theta()))+E21[2]*(cos(theta()))]","0");
Hori=Quadric("Hori",PtM2,PtM3,PtM4,PtM5,PtM6);
STL(Hori,"c:#780013;s:1.5;f:30;p:200");
return [Hori];
}};

$macros["Médiatrice et coord"]={
	name:"Médiatrice et coord",
	parameters:["expression","expression","point"],
	exec:
	function (CdA,CdB,O){
CstAB=Expression("CstAB","Const AB = ","","","[((exp(CdA[0])+exp(-CdA[0]))^2/4-(exp(CdB[0])+exp(-CdB[0]))^2/4+CdA[1]^2-CdB[1]^2)/(2*(CdB[1]-CdA[1])),(exp(CdA[0])+exp(-CdA[0]))^2/4+(CdA[1]+((exp(CdA[0])+exp(-CdA[0]))^2/4-(exp(CdB[0])+exp(-CdB[0]))^2/4+CdA[1]^2-CdB[1]^2)/(2*(CdB[1]-CdA[1])))^2]","1.775319453522946","-2.5879953267933447");
xIab=Expression("xIab","xIab = ","","","log((sqrt(CstAB[1])+CdA[1]+CstAB[0])*((sqrt(CstAB[1])+CdB[1]+CstAB[0]))/((sqrt(CstAB[1])-CdA[1]-CstAB[0])*(sqrt(CstAB[1])-CdB[1]-CstAB[0])))/4","1.8439187663139358","-1.551490298129487");
tI=Expression("tI","thetaI= ","","","sqrt(CstAB[1])*(exp(xIab)-exp(-xIab))/(exp(xIab)+exp(-xIab))-CstAB[0]","2.0591891363912667","-1.151702467985872");
chuI=Expression("chuI","chuI =","","","sqrt(CstAB[1]-(tI+CstAB[0])^2)","1.7209071262697468","-0.9364320979085411");
uI=Expression("uI","uI = ","","","log(chuI+sqrt(chuI^2-1))","1.2999999999999998","-0.9");
CdIab=Expression("CdIab","coord Iab =","","","[uI,tI]","1.5668211512209167","-2.1709987221892866");
E1=Expression("E1","Const Mediatrice AB = ","","","[CstAB[0]-CstAB[1]/(CdIab[1]+CstAB[0]),(CstAB[1]/(CdIab[1]+CstAB[0]))^2-CstAB[1]]","1.775319453522946","-2.900742780246388");
P43=Point("P43","[-E1[0]-sqrt(E1[1]-1),y(O)]","0");
P53=Point("P53","[-E1[0]+sqrt(E1[1]-1),y(O)]","0");
S94=Segment("S94",P43,P53);
tetaK=PointOn("tetaK",S94,0.9170704880607672);
chuK=Expression("chuK","chuK = ","","","sqrt(E1[1]-(x(tetaK)+E1[0])^2)","-1.3144050918206216","-0.7426887648389431");
uK=Expression("uK","uK = ","","","log(chuK+sqrt(chuK^2-1))","-1.1606405417653851","-0.5581713047726593");
EDrt=Expression("EDrt","","","","[cos(x(tetaK))/chuK,sin(x(tetaK))/chuK,uK-(exp(uK)-exp(-uK))/(exp(uK)+exp(-uK))]","-1.5","-0.5000000000000001");
PtDrt=Point("PtDrt","[x(O)+EDrt[0]*(sin(phi()))+EDrt[1]*(cos(phi())),y(O)+EDrt[0]*(-cos(phi())*sin(theta()))+EDrt[1]*(sin(phi())*sin(theta()))+EDrt[2]*(cos(theta()))]","0");
LaDroite=Locus("LaDroite",PtDrt,tetaK);
STL(CdIab,"c:#697917;s:7;sn:true;f:18;p:4;cL:200;cPT:YzojNzgwMDEzO3M6MTA7ZjoyMA==");
STL(E1,"c:#660937;s:7;f:17;p:4;cL:200;cPT:YzojNzgwMDEzO3M6MTA7ZjozMA==");
STL(LaDroite,"c:#b40000;s:3;f:30;p:1000");
return [CdIab,E1,LaDroite];
}};

$macros["Point 3D"]={
	name:"Point 3D",
	parameters:["expression","point"],
	exec:
	function (a,O){
P1=Point("P1","[x(O)+a[0]*(sin(phi()))+a[1]*(cos(phi())),y(O)+a[0]*(-cos(phi())*sin(theta()))+a[1]*(sin(phi())*sin(theta()))+a[2]*(cos(theta()))]","0");
STL(P1,"c:#0000b2;s:6;f:30");
return [P1];
}};

$macros["Pt par Coord[uI,thetaI]"]={
	name:"Pt par Coord[uI,thetaI]",
	parameters:["expression","point"],
	exec:
	function (CdHc,O){
PtHc=Expression("PtHc","","","","[2*cos(CdHc[1])/(exp(CdHc[0])+exp(-CdHc[0])),2*sin(CdHc[1])/(exp(CdHc[0])+exp(-CdHc[0])),CdHc[0]-(exp(CdHc[0])-exp(-CdHc[0]))/(exp(CdHc[0])+exp(-CdHc[0]))]","-1.509326499178912","-0.35740351949976124");
LePt=Point("LePt","[x(O)+PtHc[0]*(sin(phi()))+PtHc[1]*(cos(phi())),y(O)+PtHc[0]*(-cos(phi())*sin(theta()))+PtHc[1]*(sin(phi())*sin(theta()))+PtHc[2]*(cos(theta()))]","0");
STL(LePt,"c:#0000b2;s:6;f:18");
return [LePt];
}};

$macros["Segment Par Coord"]={
	name:"Segment Par Coord",
	parameters:["expression","expression","point"],
	exec:
	function (CdA,CdB,O){
Cst2Pts=Expression("Cst2Pts","Const2pts = ","","","[((exp(CdA[0])+exp(-CdA[0]))^2/4-(exp(CdB[0])+exp(-CdB[0]))^2/4+CdA[1]^2-CdB[1]^2)/(2*(CdB[1]-CdA[1])),(exp(CdA[0])+exp(-CdA[0]))^2/4+(CdA[1]+((exp(CdA[0])+exp(-CdA[0]))^2/4-(exp(CdB[0])+exp(-CdB[0]))^2/4+CdA[1]^2-CdB[1]^2)/(2*(CdB[1]-CdA[1])))^2]","-1","-0.4")
P5=Point("P5","[max(CdA[1],CdB[1]),y(O)]","0");
P4=Point("P4","[min(CdA[1],CdB[1]),y(O)]","0");
S9=Segment("S9",P4,P5);
tetaK=PointOn("tetaK",S9,0.7594402882870944);
chuK=Expression("chuK","chuK = ","","","sqrt(Cst2Pts[1]-(x(tetaK)+Cst2Pts[0])^2)","-0.9269184256814256","-0.6873335268190579");
uK=Expression("uK","uK = ","","","log(chuK+sqrt(chuK^2-1))","-0.7731538756261891","-0.5028160667527741");
Eseg=Expression("Eseg","","","","[cos(x(tetaK))/chuK,sin(x(tetaK))/chuK,uK-(exp(uK)-exp(-uK))/(exp(uK)+exp(-uK))]","-1.1114358857477094","-0.25679278666439576");
PtSeg=Point("PtSeg","[x(O)+Eseg[0]*(sin(phi()))+Eseg[1]*(cos(phi())),y(O)+Eseg[0]*(-cos(phi())*sin(theta()))+Eseg[1]*(sin(phi())*sin(theta()))+Eseg[2]*(cos(theta()))]","0");
LeSeg=Locus("LeSeg",PtSeg,tetaK);
STL(LeSeg,"c:#b40000;s:3;f:30;p:100");
return [LeSeg];
}};

$macros["test Circ"]={
	name:"test Circ",
	parameters:["expression","expression","point"],
	exec:
	function (CdOt,CdB,tCerc){
CstOB=Expression("CstOB","Const OB = ","","","[((exp(CdOt[0])+exp(-CdOt[0]))^2/4-(exp(CdB[0])+exp(-CdB[0]))^2/4+CdOt[1]^2-CdB[1]^2)/(2*(CdB[1]-CdOt[1])),(exp(CdOt[0])+exp(-CdOt[0]))^2/4+(CdOt[1]+((exp(CdOt[0])+exp(-CdOt[0]))^2/4-(exp(CdB[0])+exp(-CdB[0]))^2/4+CdOt[1]^2-CdB[1]^2)/(2*(CdB[1]-CdOt[1])))^2]","1.2764200970446833","-2.605149704563121");
R=Expression("R","R = ","","","abs(log((CstOB[1]+CdOt[1]+CstOB[0])*(CstOB[1]-CdB[1]-CstOB[0])/((CstOB[1]-CdOt[1]-CstOB[0])*(CstOB[1]+CdB[1]+CstOB[0]))))/2","2.380473517455234","-0.3545792706493058");
ChuCerc=Expression("ChuCerc","ChuCerc = ","","","(exp(R)+exp(-R))*(exp(CdOt[0])+exp(-CdOt[0]))/4+(exp(R)-exp(-R))*(exp(CdOt[0])+exp(-CdOt[0]))*cos(x(tCerc))/4","2.295546331269807","-0.5668972361128732");
E6=Expression("E6","Coord PtCerc = ","","","[log(ChuCerc+sqrt(ChuCerc^2-1)),CdOt[1]+(exp(R)-exp(-R))*(exp(CdOt[0])+exp(-CdOt[0]))*sin(x(tCerc))/4]","-1.3563226747035533","-0.3545792706493058");
STL(R,"c:#6c6834;s:7;sn:true;f:20;p:4;cL:200;cPT:YzojNzgwMDEzO3M6MTA7ZjozMA==");
STL(E6,"c:#2f7f44;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO3M6MTA7ZjozMA==");
return [R,E6];
}};

// Coordinates System :
SetCoords(317.4083627690683,41.49805284373133,235.4958511910746);


// Geometry :
Ell5=Expression("Ell5","","","","[1/2,sqrt(3)/2,0]","-1.3053663629922971","2.3277518206950036");
O=Point("O",-0.08666124123141988,-2.023398479192946);
P181=Point("P181","[x(O)+1,y(O)]","0");
Y=Point("Y","[x(O)+cos(phi()),y(O)+sin(phi())*sin(theta())]","0");
P182=Point("P182","[x(O)+1,y(O)]","0");
P18=Point("P18","[x(O)+1,y(O)]","0");
P6=Point("P6","[-PI,y(O)]","0");
PtI=Point("PtI","[x(O)+1,y(O)]","0");
chM=Expression("chM","Cacher les m\u00e9diatrices","0","1","0","-1.22043917680687","-0.58812903265923");
Z=Point("Z","[x(O),y(O)+cos(theta())]","0");
X=Point("X","[x(O)+sin(phi()),y(O)-cos(phi())*sin(theta())]","0");
Equa5=Point("Equa5","[x(O)+Ell5[0]*(sin(phi()))+Ell5[1]*(cos(phi())),y(O)+Ell5[0]*(-cos(phi())*sin(theta()))+Ell5[1]*(sin(phi())*sin(theta()))+Ell5[2]*(cos(theta()))]","0");
P7=Point("P7","[PI,y(O)]","0");
S51=Segment("S51",Y,P18);
Symc53=Symmetry("Symc53",O,P182);
Symc32=Symmetry("Symc32",O,X);
S53=Segment("S53",Y,P182);
Symc3=Symmetry("Symc3",O,X);
Symc51=Symmetry("Symc51",O,P18);
S5=Segment("S5",Equa5,PtI);
Symc33=Symmetry("Symc33",O,X);
S52=Segment("S52",Y,P181);
Symc52=Symmetry("Symc52",O,P181);
Symc4=Symmetry("Symc4",O,Y);
Symc41=Symmetry("Symc41",O,Y);
S1=Segment("S1",O,X);
S3=Segment("S3",O,Z);
Symc1=Symmetry("Symc1",Z,O);
Symc43=Symmetry("Symc43",O,Y);
Symc42=Symmetry("Symc42",O,Y);
S9=Segment("S9",Y,PtI);
Symc5=Symmetry("Symc5",O,PtI);
S2=Segment("S2",O,Y);
Symc31=Symmetry("Symc31",O,X);
S7=Segment("S7",P6,P7);
S10=Segment("S10",Y,Symc41);
S61=Segment("S61",P18,Symc51);
tCerc=PointOn("tCerc",S7,0.6745428495543297);
S101=Segment("S101",Y,Symc42);
Quad=Quadric("Quad",X,Equa5,Y,PtI,Symc3);
S93=Segment("S93",Symc33,X);
S6=Segment("S6",PtI,Symc5);
S92=Segment("S92",Symc32,X);
S62=Segment("S62",P181,Symc52);
S102=Segment("S102",Y,Symc43);
L4=Line("L4",Symc3,PtI);
Symc2=Symmetry("Symc2",Symc1,O);
S91=Segment("S91",Symc31,X);
L3=Line("L3",Symc3,Equa5);
S63=Segment("S63",P182,Symc53);
S4=Segment("S4",O,Symc2);
uC=PointOn("uC",S4,0.17975457993926933);
uB=PointOn("uB",S4,0.28548527830183706);
uGene=PointOn("uGene",S4,0.4114369157213969);
uA=PointOn("uA",S4,0.5085206519751473);
AltPt3=Expression("AltPt3","AltPt=","","","(y(uC)-y(O))/(y(Z)-y(O))","-1.3592338341048065","-0.7405510135420856");
AltPt2=Expression("AltPt2","AltPt=","","","(y(uB)-y(O))/(y(Z)-y(O))","-1.3592338341048065","-0.7405510135420856");
AltPt=Expression("AltPt","AltPt=","","","(y(uGene)-y(O))/(y(Z)-y(O))","-1.3634801934140777","0.7532900914698997");
altM2=Expression("altM2","altMG=","","","(y(uC)-y(O))/(y(Z)-y(O))","1.215171855186902","-0.3803378254172306");
AltPt1=Expression("AltPt1","AltPt=","","","(y(uA)-y(O))/(y(Z)-y(O))","-1.3592338341048065","-0.7405510135420856");
altM=Expression("altM","altMG=","","","(y(uA)-y(O))/(y(Z)-y(O))","1.215171855186902","-0.3803378254172306");
altM1=Expression("altM1","altMG=","","","(y(uB)-y(O))/(y(Z)-y(O))","1.215171855186902","-0.3803378254172306");
E42=Expression("E42","","","","[0,2/(exp(altM1)+exp(-altM1)),altM1-(exp(altM1)-exp(-altM1))/(exp(altM1)+exp(-altM1))]","-0.6609154421693187","-0.7242871632658711");
E412=Expression("E412","","","","[0,2/(exp(AltPt2)+exp(-AltPt2)),AltPt2-(exp(AltPt2)-exp(-AltPt2))/(exp(AltPt2)+exp(-AltPt2))]","-2.153140948581286","0.20512335548830307");
E23=Expression("E23","","","","[2/(exp(altM2)+exp(-altM2)),0,altM2-(exp(altM2)-exp(-altM2))/(exp(altM2)+exp(-altM2))]","-0.6609154421693187","-0.9744321362467006");
E212=Expression("E212","","","","[2/(exp(AltPt2)+exp(-AltPt2)),0,AltPt2-(exp(AltPt2)-exp(-AltPt2))/(exp(AltPt2)+exp(-AltPt2))]","-2.0896283794231674","0.42741734754171723");
E312=Expression("E312","","","","[-2/(exp(AltPt2)+exp(-AltPt2)),0,AltPt2-(exp(AltPt2)-exp(-AltPt2))/(exp(AltPt2)+exp(-AltPt2))]","-2.153140948581286","0.3003922092254805");
E612=Expression("E612","","","","[1/(exp(AltPt2)+exp(-AltPt2)),sqrt(3)/(exp(AltPt2)+exp(-AltPt2)),AltPt2-(exp(AltPt2)-exp(-AltPt2))/(exp(AltPt2)+exp(-AltPt2))]","-2.1213846640022265","1.2213244620181964");
E311=Expression("E311","","","","[-2/(exp(AltPt1)+exp(-AltPt1)),0,AltPt1-(exp(AltPt1)-exp(-AltPt1))/(exp(AltPt1)+exp(-AltPt1))]","-2.153140948581286","0.3003922092254805");
E413=Expression("E413","","","","[0,2/(exp(AltPt3)+exp(-AltPt3)),AltPt3-(exp(AltPt3)-exp(-AltPt3))/(exp(AltPt3)+exp(-AltPt3))]","-2.153140948581286","0.20512335548830307");
E41=Expression("E41","","","","[0,2/(exp(AltPt)+exp(-AltPt)),AltPt-(exp(AltPt)-exp(-AltPt))/(exp(AltPt)+exp(-AltPt))]","-2.157387307890557","0.14992068446777554");
E5=Expression("E5","","","","[0,-2/(exp(AltPt)+exp(-AltPt)),AltPt-(exp(AltPt)-exp(-AltPt))/(exp(AltPt)+exp(-AltPt))]","-2.093874738732439","1.3249032138929646");
E213=Expression("E213","","","","[2/(exp(AltPt3)+exp(-AltPt3)),0,AltPt3-(exp(AltPt3)-exp(-AltPt3))/(exp(AltPt3)+exp(-AltPt3))]","-2.0896283794231674","0.42741734754171723");
E43=Expression("E43","","","","[0,2/(exp(altM2)+exp(-altM2)),altM2-(exp(altM2)-exp(-altM2))/(exp(altM2)+exp(-altM2))]","-0.6609154421693187","-0.7242871632658711");
E21=Expression("E21","","","","[2/(exp(AltPt)+exp(-AltPt)),0,AltPt-(exp(AltPt)-exp(-AltPt))/(exp(AltPt)+exp(-AltPt))]","-2.093874738732439","0.37221467652118967");
E61=Expression("E61","","","","[1/(exp(AltPt)+exp(-AltPt)),sqrt(3)/(exp(AltPt)+exp(-AltPt)),AltPt-(exp(AltPt)-exp(-AltPt))/(exp(AltPt)+exp(-AltPt))]","-2.125631023311498","1.1661217909976689");
E411=Expression("E411","","","","[0,2/(exp(AltPt1)+exp(-AltPt1)),AltPt1-(exp(AltPt1)-exp(-AltPt1))/(exp(AltPt1)+exp(-AltPt1))]","-2.153140948581286","0.20512335548830307");
E3=Expression("E3","","","","[-2/(exp(altM)+exp(-altM)),0,altM-(exp(altM)-exp(-altM))/(exp(altM)+exp(-altM))]","-0.6609154421693187","-1.193308987604926");
E2=Expression("E2","","","","[2/(exp(altM)+exp(-altM)),0,altM-(exp(altM)-exp(-altM))/(exp(altM)+exp(-altM))]","-0.6609154421693187","-0.9744321362467006");
E51=Expression("E51","","","","[0,-2/(exp(AltPt1)+exp(-AltPt1)),AltPt1-(exp(AltPt1)-exp(-AltPt1))/(exp(AltPt1)+exp(-AltPt1))]","-2.0896283794231674","1.380105884913492");
E52=Expression("E52","","","","[0,-2/(exp(AltPt2)+exp(-AltPt2)),AltPt2-(exp(AltPt2)-exp(-AltPt2))/(exp(AltPt2)+exp(-AltPt2))]","-2.0896283794231674","1.380105884913492");
E33=Expression("E33","","","","[-2/(exp(altM2)+exp(-altM2)),0,altM2-(exp(altM2)-exp(-altM2))/(exp(altM2)+exp(-altM2))]","-0.6609154421693187","-1.193308987604926");
E4=Expression("E4","","","","[0,2/(exp(altM)+exp(-altM)),altM-(exp(altM)-exp(-altM))/(exp(altM)+exp(-altM))]","-0.6609154421693187","-0.7242871632658711");
E31=Expression("E31","","","","[-2/(exp(AltPt)+exp(-AltPt)),0,AltPt-(exp(AltPt)-exp(-AltPt))/(exp(AltPt)+exp(-AltPt))]","-2.157387307890557","0.24518953820495296");
E313=Expression("E313","","","","[-2/(exp(AltPt3)+exp(-AltPt3)),0,AltPt3-(exp(AltPt3)-exp(-AltPt3))/(exp(AltPt3)+exp(-AltPt3))]","-2.153140948581286","0.3003922092254805");
E613=Expression("E613","","","","[1/(exp(AltPt3)+exp(-AltPt3)),sqrt(3)/(exp(AltPt3)+exp(-AltPt3)),AltPt3-(exp(AltPt3)-exp(-AltPt3))/(exp(AltPt3)+exp(-AltPt3))]","-2.1213846640022265","1.2213244620181964");
E211=Expression("E211","","","","[2/(exp(AltPt1)+exp(-AltPt1)),0,AltPt1-(exp(AltPt1)-exp(-AltPt1))/(exp(AltPt1)+exp(-AltPt1))]","-2.0896283794231674","0.42741734754171723");
E53=Expression("E53","","","","[0,-2/(exp(AltPt3)+exp(-AltPt3)),AltPt3-(exp(AltPt3)-exp(-AltPt3))/(exp(AltPt3)+exp(-AltPt3))]","-2.0896283794231674","1.380105884913492");
E611=Expression("E611","","","","[1/(exp(AltPt1)+exp(-AltPt1)),sqrt(3)/(exp(AltPt1)+exp(-AltPt1)),AltPt1-(exp(AltPt1)-exp(-AltPt1))/(exp(AltPt1)+exp(-AltPt1))]","-2.1213846640022265","1.2213244620181964");
E22=Expression("E22","","","","[2/(exp(altM1)+exp(-altM1)),0,altM1-(exp(altM1)-exp(-altM1))/(exp(altM1)+exp(-altM1))]","-0.6609154421693187","-0.9744321362467006");
E32=Expression("E32","","","","[-2/(exp(altM1)+exp(-altM1)),0,altM1-(exp(altM1)-exp(-altM1))/(exp(altM1)+exp(-altM1))]","-0.6609154421693187","-1.193308987604926");
PtM41=Point("PtM41","[x(O)+E412[0]*(sin(phi()))+E412[1]*(cos(phi())),y(O)+E412[0]*(-cos(phi())*sin(theta()))+E412[1]*(sin(phi())*sin(theta()))+E412[2]*(cos(theta()))]","0");
PtG5=Point("PtG5","[x(O)+E5[0]*(sin(phi()))+E5[1]*(cos(phi())),y(O)+E5[0]*(-cos(phi())*sin(theta()))+E5[1]*(sin(phi())*sin(theta()))+E5[2]*(cos(theta()))]","0");
PtM4=Point("PtM4","[x(O)+E411[0]*(sin(phi()))+E411[1]*(cos(phi())),y(O)+E411[0]*(-cos(phi())*sin(theta()))+E411[1]*(sin(phi())*sin(theta()))+E411[2]*(cos(theta()))]","0");
PtM42=Point("PtM42","[x(O)+E413[0]*(sin(phi()))+E413[1]*(cos(phi())),y(O)+E413[0]*(-cos(phi())*sin(theta()))+E413[1]*(sin(phi())*sin(theta()))+E413[2]*(cos(theta()))]","0");
PtM6=Point("PtM6","[x(O)+E611[0]*(sin(phi()))+E611[1]*(cos(phi())),y(O)+E611[0]*(-cos(phi())*sin(theta()))+E611[1]*(sin(phi())*sin(theta()))+E611[2]*(cos(theta()))]","0");
P122=Point("P122","[x(O)+E23[0]*(sin(phi()))+E23[1]*(cos(phi())),y(O)+E23[0]*(-cos(phi())*sin(theta()))+E23[1]*(sin(phi())*sin(theta()))+E23[2]*(cos(theta()))]","0");
P142=Point("P142","[x(O)+E43[0]*(sin(phi()))+E43[1]*(cos(phi())),y(O)+E43[0]*(-cos(phi())*sin(theta()))+E43[1]*(sin(phi())*sin(theta()))+E43[2]*(cos(theta()))]","0");
PtG6=Point("PtG6","[x(O)+E61[0]*(sin(phi()))+E61[1]*(cos(phi())),y(O)+E61[0]*(-cos(phi())*sin(theta()))+E61[1]*(sin(phi())*sin(theta()))+E61[2]*(cos(theta()))]","0");
PtM32=Point("PtM32","[x(O)+E313[0]*(sin(phi()))+E313[1]*(cos(phi())),y(O)+E313[0]*(-cos(phi())*sin(theta()))+E313[1]*(sin(phi())*sin(theta()))+E313[2]*(cos(theta()))]","0");
PtM5=Point("PtM5","[x(O)+E51[0]*(sin(phi()))+E51[1]*(cos(phi())),y(O)+E51[0]*(-cos(phi())*sin(theta()))+E51[1]*(sin(phi())*sin(theta()))+E51[2]*(cos(theta()))]","0");
PtM31=Point("PtM31","[x(O)+E312[0]*(sin(phi()))+E312[1]*(cos(phi())),y(O)+E312[0]*(-cos(phi())*sin(theta()))+E312[1]*(sin(phi())*sin(theta()))+E312[2]*(cos(theta()))]","0");
PtM2=Point("PtM2","[x(O)+E211[0]*(sin(phi()))+E211[1]*(cos(phi())),y(O)+E211[0]*(-cos(phi())*sin(theta()))+E211[1]*(sin(phi())*sin(theta()))+E211[2]*(cos(theta()))]","0");
P121=Point("P121","[x(O)+E22[0]*(sin(phi()))+E22[1]*(cos(phi())),y(O)+E22[0]*(-cos(phi())*sin(theta()))+E22[1]*(sin(phi())*sin(theta()))+E22[2]*(cos(theta()))]","0");
P131=Point("P131","[x(O)+E32[0]*(sin(phi()))+E32[1]*(cos(phi())),y(O)+E32[0]*(-cos(phi())*sin(theta()))+E32[1]*(sin(phi())*sin(theta()))+E32[2]*(cos(theta()))]","0");
P132=Point("P132","[x(O)+E33[0]*(sin(phi()))+E33[1]*(cos(phi())),y(O)+E33[0]*(-cos(phi())*sin(theta()))+E33[1]*(sin(phi())*sin(theta()))+E33[2]*(cos(theta()))]","0");
PtG4=Point("PtG4","[x(O)+E41[0]*(sin(phi()))+E41[1]*(cos(phi())),y(O)+E41[0]*(-cos(phi())*sin(theta()))+E41[1]*(sin(phi())*sin(theta()))+E41[2]*(cos(theta()))]","0");
PtG3=Point("PtG3","[x(O)+E31[0]*(sin(phi()))+E31[1]*(cos(phi())),y(O)+E31[0]*(-cos(phi())*sin(theta()))+E31[1]*(sin(phi())*sin(theta()))+E31[2]*(cos(theta()))]","0");
P12=Point("P12","[x(O)+E2[0]*(sin(phi()))+E2[1]*(cos(phi())),y(O)+E2[0]*(-cos(phi())*sin(theta()))+E2[1]*(sin(phi())*sin(theta()))+E2[2]*(cos(theta()))]","0");
P13=Point("P13","[x(O)+E3[0]*(sin(phi()))+E3[1]*(cos(phi())),y(O)+E3[0]*(-cos(phi())*sin(theta()))+E3[1]*(sin(phi())*sin(theta()))+E3[2]*(cos(theta()))]","0");
P14=Point("P14","[x(O)+E4[0]*(sin(phi()))+E4[1]*(cos(phi())),y(O)+E4[0]*(-cos(phi())*sin(theta()))+E4[1]*(sin(phi())*sin(theta()))+E4[2]*(cos(theta()))]","0");
PtG2=Point("PtG2","[x(O)+E21[0]*(sin(phi()))+E21[1]*(cos(phi())),y(O)+E21[0]*(-cos(phi())*sin(theta()))+E21[1]*(sin(phi())*sin(theta()))+E21[2]*(cos(theta()))]","0");
PtM22=Point("PtM22","[x(O)+E213[0]*(sin(phi()))+E213[1]*(cos(phi())),y(O)+E213[0]*(-cos(phi())*sin(theta()))+E213[1]*(sin(phi())*sin(theta()))+E213[2]*(cos(theta()))]","0");
PtM62=Point("PtM62","[x(O)+E613[0]*(sin(phi()))+E613[1]*(cos(phi())),y(O)+E613[0]*(-cos(phi())*sin(theta()))+E613[1]*(sin(phi())*sin(theta()))+E613[2]*(cos(theta()))]","0");
PtM3=Point("PtM3","[x(O)+E311[0]*(sin(phi()))+E311[1]*(cos(phi())),y(O)+E311[0]*(-cos(phi())*sin(theta()))+E311[1]*(sin(phi())*sin(theta()))+E311[2]*(cos(theta()))]","0");
PtM52=Point("PtM52","[x(O)+E53[0]*(sin(phi()))+E53[1]*(cos(phi())),y(O)+E53[0]*(-cos(phi())*sin(theta()))+E53[1]*(sin(phi())*sin(theta()))+E53[2]*(cos(theta()))]","0");
PtM51=Point("PtM51","[x(O)+E52[0]*(sin(phi()))+E52[1]*(cos(phi())),y(O)+E52[0]*(-cos(phi())*sin(theta()))+E52[1]*(sin(phi())*sin(theta()))+E52[2]*(cos(theta()))]","0");
PtM21=Point("PtM21","[x(O)+E212[0]*(sin(phi()))+E212[1]*(cos(phi())),y(O)+E212[0]*(-cos(phi())*sin(theta()))+E212[1]*(sin(phi())*sin(theta()))+E212[2]*(cos(theta()))]","0");
PtM61=Point("PtM61","[x(O)+E612[0]*(sin(phi()))+E612[1]*(cos(phi())),y(O)+E612[0]*(-cos(phi())*sin(theta()))+E612[1]*(sin(phi())*sin(theta()))+E612[2]*(cos(theta()))]","0");
P141=Point("P141","[x(O)+E42[0]*(sin(phi()))+E42[1]*(cos(phi())),y(O)+E42[0]*(-cos(phi())*sin(theta()))+E42[1]*(sin(phi())*sin(theta()))+E42[2]*(cos(theta()))]","0");
Locus4=Locus("Locus4",PtG3,uGene);
Par22=Parallel("Par22",S52,P141);
M1=MidPoint("M1",PtG4,PtG5);
Par23=Parallel("Par23",S53,P142);
M2=MidPoint("M2",P12,P13);
M21=MidPoint("M21",P121,P131);
Par21=Parallel("Par21",S51,P14);
Hori2=Quadric("Hori2",PtM22,PtM32,PtM42,PtM52,PtM62);
Hori=Quadric("Hori",PtM2,PtM3,PtM4,PtM5,PtM6);
Par1=Parallel("Par1",S5,PtG6);
M22=MidPoint("M22",P122,P132);
Locus3=Locus("Locus3",PtG2,uGene);
Hori1=Quadric("Hori1",PtM21,PtM31,PtM41,PtM51,PtM61);
A=PointOn("A",Hori,[0.36028488134849973,0.8328815385105286]);
C=PointOn("C",Hori2,[0.34128958614527255,0.84777572609592]);
B=PointOn("B",Hori1,[-0.18591365662550605,0.5140926577498484]);
Par2=Parallel("Par2",S6,M1);
Par11=Parallel("Par11",S61,M2);
Par12=Parallel("Par12",S62,M21);
Par13=Parallel("Par13",S63,M22);
P15=OrderedIntersection("P15",Par12,Par22,0);
P16=OrderedIntersection("P16",Par13,Par23,0);
P11=OrderedIntersection("P11",Par11,Par21,0);
P1=OrderedIntersection("P1",Par2,Par1,0);
P22=Point("P22","[x(O)+(x(C)-x(M22))*(x(P182)-x(O))/(x(P16)-x(M22)),y(O)+(y(C)-y(M22))*(x(P182)-x(O))/(x(P16)-x(M22))]","0");
P21=Point("P21","[x(O)+(x(B)-x(M21))*(x(P181)-x(O))/(x(P15)-x(M21)),y(O)+(y(B)-y(M21))*(x(P181)-x(O))/(x(P15)-x(M21))]","0");
Locus1=Locus("Locus1",P1,uGene);
P2=Point("P2","[x(O)+(x(A)-x(M2))*(x(P18)-x(O))/(x(P11)-x(M2)),y(O)+(y(A)-y(M2))*(x(P18)-x(O))/(x(P11)-x(M2))]","0");
Symc6=Symmetry("Symc6",M1,P1);
Par41=Parallel("Par41",S92,P21);
Par32=Parallel("Par32",S102,P22);
Par42=Parallel("Par42",S93,P22);
Par31=Parallel("Par31",S101,P21);
Locus2=Locus("Locus2",Symc6,uGene);
Par4=Parallel("Par4",S91,P2);
Par3=Parallel("Par3",S10,P2);
P42=OrderedIntersection("P42",S102,Par42,0);
P4=OrderedIntersection("P4",S10,Par4,0);
P41=OrderedIntersection("P41",S101,Par41,0);
P3=OrderedIntersection("P3",S91,Par3,0);
P32=OrderedIntersection("P32",S93,Par32,0);
P31=OrderedIntersection("P31",S92,Par31,0);
P51=Point("P51","[x(O)+(x(P31)-x(O))/(x(X)-x(O)),y(O)+(x(P41)-x(O))/(x(Y)-x(O))]","0");
P52=Point("P52","[x(O)+(x(P32)-x(O))/(x(X)-x(O)),y(O)+(x(P42)-x(O))/(x(Y)-x(O))]","0");
P5=Point("P5","[x(O)+(x(P3)-x(O))/(x(X)-x(O)),y(O)+(x(P4)-x(O))/(x(Y)-x(O))]","0");
angM=Angle("angM",P18,O,P5);
angM1=Angle("angM1",P181,O,P51);
angM2=Angle("angM2",P182,O,P52);
CdB=Expression("CdB","Coord B = ","","","[altM1,angM1]","0.945204070921518","-0.8853741843082245");
CdC=Expression("CdC","Coord C = ","","","[altM2,angM2]","0.945204070921518","-1.1826193359572188");
CdA=Expression("CdA","Coord A = ","","","[altM,angM]","0.945204070921518","-0.6305926257519434");
CstAB1=Expression("CstAB1","Const AB = ","","","[((exp(CdB[0])+exp(-CdB[0]))^2/4-(exp(CdC[0])+exp(-CdC[0]))^2/4+CdB[1]^2-CdC[1]^2)/(2*(CdC[1]-CdB[1])),(exp(CdB[0])+exp(-CdB[0]))^2/4+(CdB[1]+((exp(CdB[0])+exp(-CdB[0]))^2/4-(exp(CdC[0])+exp(-CdC[0]))^2/4+CdB[1]^2-CdC[1]^2)/(2*(CdC[1]-CdB[1])))^2]","1.6246215604049339","-2.074354790904202");
CstAB=Expression("CstAB","Const AB = ","","","[((exp(CdA[0])+exp(-CdA[0]))^2/4-(exp(CdB[0])+exp(-CdB[0]))^2/4+CdA[1]^2-CdB[1]^2)/(2*(CdB[1]-CdA[1])),(exp(CdA[0])+exp(-CdA[0]))^2/4+(CdA[1]+((exp(CdA[0])+exp(-CdA[0]))^2/4-(exp(CdB[0])+exp(-CdB[0]))^2/4+CdA[1]^2-CdB[1]^2)/(2*(CdB[1]-CdA[1])))^2]","0.945204070921518","-0.24842028791752202");
Cst2Pts=Expression("Cst2Pts","Const2pts = ","","","[((exp(CdA[0])+exp(-CdA[0]))^2/4-(exp(CdB[0])+exp(-CdB[0]))^2/4+CdA[1]^2-CdB[1]^2)/(2*(CdB[1]-CdA[1])),(exp(CdA[0])+exp(-CdA[0]))^2/4+(CdA[1]+((exp(CdA[0])+exp(-CdA[0]))^2/4-(exp(CdB[0])+exp(-CdB[0]))^2/4+CdA[1]^2-CdB[1]^2)/(2*(CdB[1]-CdA[1])))^2]","-0.6363088102601213","-0.2918914860256364");
Cst2Pts1=Expression("Cst2Pts1","Const2pts = ","","","[((exp(CdB[0])+exp(-CdB[0]))^2/4-(exp(CdC[0])+exp(-CdC[0]))^2/4+CdB[1]^2-CdC[1]^2)/(2*(CdC[1]-CdB[1])),(exp(CdB[0])+exp(-CdB[0]))^2/4+(CdB[1]+((exp(CdB[0])+exp(-CdB[0]))^2/4-(exp(CdC[0])+exp(-CdC[0]))^2/4+CdB[1]^2-CdC[1]^2)/(2*(CdC[1]-CdB[1])))^2]","-0.6363088102601213","-0.2918914860256364");
Cst2Pts2=Expression("Cst2Pts2","Const2pts = ","","","[((exp(CdC[0])+exp(-CdC[0]))^2/4-(exp(CdA[0])+exp(-CdA[0]))^2/4+CdC[1]^2-CdA[1]^2)/(2*(CdA[1]-CdC[1])),(exp(CdC[0])+exp(-CdC[0]))^2/4+(CdC[1]+((exp(CdC[0])+exp(-CdC[0]))^2/4-(exp(CdA[0])+exp(-CdA[0]))^2/4+CdC[1]^2-CdA[1]^2)/(2*(CdA[1]-CdC[1])))^2]","-0.6363088102601213","-0.2918914860256364");
CstAB2=Expression("CstAB2","Const AB = ","","","[((exp(CdC[0])+exp(-CdC[0]))^2/4-(exp(CdA[0])+exp(-CdA[0]))^2/4+CdC[1]^2-CdA[1]^2)/(2*(CdA[1]-CdC[1])),(exp(CdC[0])+exp(-CdC[0]))^2/4+(CdC[1]+((exp(CdC[0])+exp(-CdC[0]))^2/4-(exp(CdA[0])+exp(-CdA[0]))^2/4+CdC[1]^2-CdA[1]^2)/(2*(CdA[1]-CdC[1])))^2]","1.6246215604049339","-2.074354790904202");
P56=Point("P56","[max(CdC[1],CdA[1]),y(O)]","0");
P55=Point("P55","[max(CdB[1],CdC[1]),y(O)]","0");
P44=Point("P44","[min(CdA[1],CdB[1]),y(O)]","0");
P45=Point("P45","[min(CdB[1],CdC[1]),y(O)]","0");
P54=Point("P54","[max(CdA[1],CdB[1]),y(O)]","0");
P46=Point("P46","[min(CdC[1],CdA[1]),y(O)]","0");
S96=Segment("S96",P45,P55);
S97=Segment("S97",P46,P56);
xIab2=Expression("xIab2","xIab = ","","","log((sqrt(CstAB2[1])+CdC[1]+CstAB2[0])*((sqrt(CstAB2[1])+CdA[1]+CstAB2[0]))/((sqrt(CstAB2[1])-CdC[1]-CstAB2[0])*(sqrt(CstAB2[1])-CdA[1]-CstAB2[0])))/4","1.6805063953917754","-1.22995985262839");
S95=Segment("S95",P44,P54);
xIab1=Expression("xIab1","xIab = ","","","log((sqrt(CstAB1[1])+CdB[1]+CstAB1[0])*((sqrt(CstAB1[1])+CdC[1]+CstAB1[0]))/((sqrt(CstAB1[1])-CdB[1]-CstAB1[0])*(sqrt(CstAB1[1])-CdC[1]-CstAB1[0])))/4","1.6805063953917754","-1.22995985262839");
xIab=Expression("xIab","xIab = ","","","log((sqrt(CstAB[1])+CdA[1]+CstAB[0])*((sqrt(CstAB[1])+CdB[1]+CstAB[0]))/((sqrt(CstAB[1])-CdA[1]-CstAB[0])*(sqrt(CstAB[1])-CdB[1]-CstAB[0])))/4","1.6805063953917754","-1.22995985262839");
tI=Expression("tI","thetaI= ","","","sqrt(CstAB[1])*(exp(xIab)-exp(-xIab))/(exp(xIab)+exp(-xIab))-CstAB[0]","1.8558776727394408","-0.904270337554154");
tI2=Expression("tI2","thetaI= ","","","sqrt(CstAB2[1])*(exp(xIab2)-exp(-xIab2))/(exp(xIab2)+exp(-xIab2))-CstAB2[0]","1.8558776727394408","-0.904270337554154");
tetaK5=PointOn("tetaK5",S97,0.7594402882870944);
tI1=Expression("tI1","thetaI= ","","","sqrt(CstAB1[1])*(exp(xIab1)-exp(-xIab1))/(exp(xIab1)+exp(-xIab1))-CstAB1[0]","1.8558776727394408","-0.904270337554154");
tetaK3=PointOn("tetaK3",S95,0.7594402882870944);
tetaK4=PointOn("tetaK4",S96,0.7594402882870944);
chuI1=Expression("chuI1","chuI =","","","sqrt(CstAB1[1]-(tI1+CstAB1[0])^2)","1.5802942369073953","-0.7288990602064886");
chuK5=Expression("chuK5","chuK = ","","","sqrt(Cst2Pts2[1]-(x(tetaK5)+Cst2Pts2[0])^2)","-0.5767724744688895","-0.5259694392756186");
chuI=Expression("chuI","chuI =","","","sqrt(CstAB[1]-(tI+CstAB[0])^2)","1.5802942369073953","-0.7288990602064886");
chuK3=Expression("chuK3","chuK = ","","","sqrt(Cst2Pts[1]-(x(tetaK3)+Cst2Pts[0])^2)","-0.5767724744688895","-0.5259694392756186");
chuI2=Expression("chuI2","chuI =","","","sqrt(CstAB2[1]-(tI2+CstAB2[0])^2)","1.5802942369073953","-0.7288990602064886");
chuK4=Expression("chuK4","chuK = ","","","sqrt(Cst2Pts1[1]-(x(tetaK4)+Cst2Pts1[0])^2)","-0.5767724744688895","-0.5259694392756186");
uK5=Expression("uK5","uK = ","","","log(chuK5+sqrt(chuK5^2-1))","-0.4515072763634142","-0.3756512015490482");
uK4=Expression("uK4","uK = ","","","log(chuK4+sqrt(chuK4^2-1))","-0.4515072763634142","-0.3756512015490482");
uI2=Expression("uI2","uI = ","","","log(chuI2+sqrt(chuI2^2-1))","1.23739976261377","-0.6992194366503954");
uI1=Expression("uI1","uI = ","","","log(chuI1+sqrt(chuI1^2-1))","1.23739976261377","-0.6992194366503954");
uI=Expression("uI","uI = ","","","log(chuI+sqrt(chuI^2-1))","1.23739976261377","-0.6992194366503954");
uK3=Expression("uK3","uK = ","","","log(chuK3+sqrt(chuK3^2-1))","-0.4515072763634142","-0.3756512015490482");
Eseg1=Expression("Eseg1","","","","[cos(x(tetaK4))/chuK4,sin(x(tetaK4))/chuK4,uK4-(exp(uK4)-exp(-uK4))/(exp(uK4)+exp(-uK4))]","-0.7270907121954597","-0.17522688458028776");
CdIbc=Expression("CdIbc","coord Ibc =","","","[uI1,tI1]","2.43142982916649","-1.1826193359572188");
Eseg=Expression("Eseg","","","","[cos(x(tetaK3))/chuK3,sin(x(tetaK3))/chuK3,uK3-(exp(uK3)-exp(-uK3))/(exp(uK3)+exp(-uK3))]","-0.7270907121954597","-0.17522688458028776");
CdIca=Expression("CdIca","coord Ica =","","","[uI2,tI2]","1.45476718803408","-1.9045004185333483");
CdIab=Expression("CdIab","coord Iab =","","","[uI,tI]","2.30403904988835","-0.7155198119373705");
Eseg2=Expression("Eseg2","","","","[cos(x(tetaK5))/chuK5,sin(x(tetaK5))/chuK5,uK5-(exp(uK5)-exp(-uK5))/(exp(uK5)+exp(-uK5))]","-0.7270907121954597","-0.17522688458028776");
E1=Expression("E1","Const Mediatrice AB = ","","","[CstAB[0]-CstAB[1]/(CdIab[1]+CstAB[0]),(CstAB[1]/(CdIab[1]+CstAB[0]))^2-CstAB[1]]","2.219111863702923","-0.9703013704936514");
E12=Expression("E12","Const Mediatrice CA = ","","","[CstAB2[0]-CstAB2[1]/(CdIca[1]+CstAB2[0]),(CstAB2[1]/(CdIca[1]+CstAB2[0]))^2-CstAB2[1]]","1.6246215604049339","-2.3291363494604833");
E11=Expression("E11","Const Mediatrice BC = ","","","[CstAB1[0]-CstAB1[1]/(CdIbc[1]+CstAB1[0]),(CstAB1[1]/(CdIbc[1]+CstAB1[0]))^2-CstAB1[1]]","2.0917210844247824","-1.5223280806989268");
PtSeg2=Point("PtSeg2","[x(O)+Eseg2[0]*(sin(phi()))+Eseg2[1]*(cos(phi())),y(O)+Eseg2[0]*(-cos(phi())*sin(theta()))+Eseg2[1]*(sin(phi())*sin(theta()))+Eseg2[2]*(cos(theta()))]","0");
PtSeg=Point("PtSeg","[x(O)+Eseg[0]*(sin(phi()))+Eseg[1]*(cos(phi())),y(O)+Eseg[0]*(-cos(phi())*sin(theta()))+Eseg[1]*(sin(phi())*sin(theta()))+Eseg[2]*(cos(theta()))]","0");
PtSeg1=Point("PtSeg1","[x(O)+Eseg1[0]*(sin(phi()))+Eseg1[1]*(cos(phi())),y(O)+Eseg1[0]*(-cos(phi())*sin(theta()))+Eseg1[1]*(sin(phi())*sin(theta()))+Eseg1[2]*(cos(theta()))]","0");
P43=Point("P43","[-E1[0]-sqrt(E1[1]-1),y(O)]","0");
P532=Point("P532","[-E12[0]+sqrt(E12[1]-1),y(O)]","0");
P431=Point("P431","[-E11[0]-sqrt(E11[1]-1),y(O)]","0");
P531=Point("P531","[-E11[0]+sqrt(E11[1]-1),y(O)]","0");
CdOt=Expression("CdOt","Coord Centre cercle circonscrit = ","","","[log(sqrt(E1[1]-(((E1[1]-E11[1])/(E1[0]-E11[0])-E1[0]-E11[0])/2+E1[0])^2)+sqrt(E1[1]-(((E1[1]-E11[1])/(E1[0]-E11[0])-E1[0]-E11[0])/2+E1[0])^2-1)),((E1[1]-E11[1])/(E1[0]-E11[0])-E1[0]-E11[0])/2]","1.284912815663226","-1.7346460461624944");
P432=Point("P432","[-E12[0]-sqrt(E12[1]-1),y(O)]","0");
LeSeg2=Locus("LeSeg2",PtSeg2,tetaK5);
LeSeg=Locus("LeSeg",PtSeg,tetaK3);
P53=Point("P53","[-E1[0]+sqrt(E1[1]-1),y(O)]","0");
LeSeg1=Locus("LeSeg1",PtSeg1,tetaK4);
S941=Segment("S941",P431,P531);
CstOB1=Expression("CstOB1","Const OB = ","","","[((exp(CdOt[0])+exp(-CdOt[0]))^2/4-(exp(CdA[0])+exp(-CdA[0]))^2/4+CdOt[1]^2-CdA[1]^2)/(2*(CdA[1]-CdOt[1])),(exp(CdOt[0])+exp(-CdOt[0]))^2/4+(CdOt[1]+((exp(CdOt[0])+exp(-CdOt[0]))^2/4-(exp(CdA[0])+exp(-CdA[0]))^2/4+CdOt[1]^2-CdA[1]^2)/(2*(CdA[1]-CdOt[1])))^2]","1.3273764087559394","-2.583917908016764");
PtHc=Expression("PtHc","","","","[2*cos(CdOt[1])/(exp(CdOt[0])+exp(-CdOt[0])),2*sin(CdOt[1])/(exp(CdOt[0])+exp(-CdOt[0])),CdOt[0]-(exp(CdOt[0])-exp(-CdOt[0]))/(exp(CdOt[0])+exp(-CdOt[0]))]","-1.0512346484789796","-0.2571900118136569");
S942=Segment("S942",P432,P532);
S94=Segment("S94",P43,P53);
CstOB=Expression("CstOB","Const OB = ","","","[((exp(CdOt[0])+exp(-CdOt[0]))^2/4-(exp(CdB[0])+exp(-CdB[0]))^2/4+CdOt[1]^2-CdB[1]^2)/(2*(CdB[1]-CdOt[1])),(exp(CdOt[0])+exp(-CdOt[0]))^2/4+(CdOt[1]+((exp(CdOt[0])+exp(-CdOt[0]))^2/4-(exp(CdB[0])+exp(-CdB[0]))^2/4+CdOt[1]^2-CdB[1]^2)/(2*(CdB[1]-CdOt[1])))^2]","1.3273764087559394","-2.583917908016764");
R=Expression("R","R = ","","","abs(log((sqrt(CstOB[1])+CdOt[1]+CstOB[0])*(sqrt(CstOB[1])-CdB[1]-CstOB[0])/((sqrt(CstOB[1])-CdOt[1]-CstOB[0])*(sqrt(CstOB[1])+CdB[1]+CstOB[0]))))/2","2.30403904988835","-0.3758110671956625");
LePt=Point("LePt","[x(O)+PtHc[0]*(sin(phi()))+PtHc[1]*(cos(phi())),y(O)+PtHc[0]*(-cos(phi())*sin(theta()))+PtHc[1]*(sin(phi())*sin(theta()))+PtHc[2]*(cos(theta()))]","0");
tetaK=PointOn("tetaK",S94,0.9170704880607672);
tetaK1=PointOn("tetaK1",S941,0.9170704880607672);
tetaK2=PointOn("tetaK2",S942,0.9170704880607672);
chuK2=Expression("chuK2","chuK = ","","","sqrt(E12[1]-(x(tetaK2)+E12[0])^2)","-0.8924407736946873","-0.5710649105935898");
ChuCerc=Expression("ChuCerc","ChuCerc = ","","","(exp(R)+exp(-R))*(exp(CdOt[0])+exp(-CdOt[0]))/4+(exp(R)-exp(-R))*(exp(CdOt[0])+exp(-CdOt[0]))*cos(x(tCerc))/4","1.284912815663226","-1.3949373014207864");
chuK1=Expression("chuK1","chuK = ","","","sqrt(E11[1]-(x(tetaK1)+E11[0])^2)","-0.8924407736946873","-0.5710649105935898");
chuK=Expression("chuK","chuK = ","","","sqrt(E1[1]-(x(tetaK)+E1[0])^2)","-0.8924407736946873","-0.5710649105935898");
P8=Point("P8","[log(ChuCerc+sqrt(ChuCerc^2-1)),CdOt[1]+(exp(R)-exp(-R))*(exp(CdOt[0])+exp(CdOt[0]))*sin(x(tCerc))/4]","0");
uK1=Expression("uK1","uK = ","","","log(chuK1+sqrt(chuK1^2-1))","-0.7671755755892119","-0.42074667286701933");
uK2=Expression("uK2","uK = ","","","log(chuK2+sqrt(chuK2^2-1))","-0.7671755755892119","-0.42074667286701933");
uK=Expression("uK","uK = ","","","log(chuK+sqrt(chuK^2-1))","-0.7671755755892119","-0.42074667286701933");
E6=Expression("E6","Coord PtCerc = ","","","[log(ChuCerc+sqrt(ChuCerc^2-1)),CdOt[1]+(exp(R)-exp(-R))*(exp(CdOt[0])+exp(-CdOt[0]))*sin(x(tCerc))/4]","0.6479589192725236","-1.5223280806989268");
EDrt2=Expression("EDrt2","","","","[cos(x(tetaK2))/chuK2,sin(x(tetaK2))/chuK2,uK2-(exp(uK2)-exp(-uK2))/(exp(uK2)+exp(-uK2))]","-1.0436367608848802","-0.3733570761505883");
EDrt1=Expression("EDrt1","","","","[cos(x(tetaK1))/chuK1,sin(x(tetaK1))/chuK1,uK1-(exp(uK1)-exp(-uK1))/(exp(uK1)+exp(-uK1))]","-1.0436367608848802","-0.3733570761505883");
EDrt=Expression("EDrt","","","","[cos(x(tetaK))/chuK,sin(x(tetaK))/chuK,uK-(exp(uK)-exp(-uK))/(exp(uK)+exp(-uK))]","-1.0436367608848802","-0.3733570761505883");
PtHc1=Expression("PtHc1","","","","[2*cos(E6[1])/(exp(E6[0])+exp(-E6[0])),2*sin(E6[1])/(exp(E6[0])+exp(-E6[0])),E6[0]-(exp(E6[0])-exp(-E6[0]))/(exp(E6[0])+exp(-E6[0]))]","-1.483656774597305","-0.3421595030932155");
PtDrt2=Point("PtDrt2","[x(O)+EDrt2[0]*(sin(phi()))+EDrt2[1]*(cos(phi())),y(O)+EDrt2[0]*(-cos(phi())*sin(theta()))+EDrt2[1]*(sin(phi())*sin(theta()))+EDrt2[2]*(cos(theta()))]","0");
PtDrt1=Point("PtDrt1","[x(O)+EDrt1[0]*(sin(phi()))+EDrt1[1]*(cos(phi())),y(O)+EDrt1[0]*(-cos(phi())*sin(theta()))+EDrt1[1]*(sin(phi())*sin(theta()))+EDrt1[2]*(cos(theta()))]","0");
LePt1=Point("LePt1","[x(O)+PtHc1[0]*(sin(phi()))+PtHc1[1]*(cos(phi())),y(O)+PtHc1[0]*(-cos(phi())*sin(theta()))+PtHc1[1]*(sin(phi())*sin(theta()))+PtHc1[2]*(cos(theta()))]","0");
PtDrt=Point("PtDrt","[x(O)+EDrt[0]*(sin(phi()))+EDrt[1]*(cos(phi())),y(O)+EDrt[0]*(-cos(phi())*sin(theta()))+EDrt[1]*(sin(phi())*sin(theta()))+EDrt[2]*(cos(theta()))]","0");
MedAC=Locus("MedAC",PtDrt2,tetaK2);
MedAB=Locus("MedAB",PtDrt,tetaK);
Locus5=Locus("Locus5",LePt1,tCerc);
MedBC=Locus("MedBC",PtDrt1,tetaK1);
E7=Expression("E7","","","","MedAC.setHidden(chM);MedBC.setHidden(chM);MedAB.setHidden(chM);\"Cercle circonscrit sur la pseudosph\u00e8re\"","-1.0930483975287297","-0.07856591554666804");


// Styles :
STL(Ell5,"c:#780013;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO3M6MTA7ZjoyMA==");
STL(O,"c:#0000b2;o:1;s:4;sn:true;f:20;fl:true");
STL(P181,"c:#0000b2;h:2;s:6;f:30");
STL(Y,"c:#0000b2;o:1;s:3;sn:true;f:20");
STL(P182,"c:#0000b2;h:2;s:6;f:30");
STL(P18,"c:#0000b2;h:2;s:6;f:30");
STL(P6,"c:#0000b2;s:6;f:30");
STL(PtI,"c:#0000b2;h:1;s:6;sn:true;f:20");
STL(chM,"c:#11897c;s:5;sn:true;f:16;i:1;cL:60;cPT:YzojMDA3YzdjO3M6Ni41O2Y6MzA7aTox");
STL(Z,"c:#0000b2;o:0.83;s:3;sn:true;f:20");
STL(X,"c:#0000b2;o:1;s:3;sn:true;f:20");
STL(Equa5,"c:#0000b2;h:1;s:6;f:20");
STL(P7,"c:#0000b2;h:1;s:6;f:30");
STL(S51,"c:#006633;h:2;s:1;f:24");
STL(Symc53,"c:#0000b2;h:2;s:6;f:30");
STL(Symc32,"c:#0000b2;h:2;s:6;f:30");
STL(S53,"c:#006633;h:2;s:1;f:24");
STL(Symc3,"c:#0000b2;h:1;s:6;f:20");
STL(Symc51,"c:#0000b2;h:2;s:6;f:30");
STL(S5,"c:#006633;h:1;s:1;f:24");
STL(Symc33,"c:#0000b2;h:2;s:6;f:30");
STL(S52,"c:#006633;h:2;s:1;f:24");
STL(Symc52,"c:#0000b2;h:2;s:6;f:30");
STL(Symc4,"c:#0000b2;h:1;s:6;f:20");
STL(Symc41,"c:#0000b2;h:2;s:6;f:30");
STL(S1,"c:#0063ff;s:1;f:24");
STL(S3,"c:#006633;h:1;s:1;f:24");
STL(Symc1,"c:#0000b2;h:2;s:6;f:20");
STL(Symc43,"c:#0000b2;h:2;s:6;f:30");
STL(Symc42,"c:#0000b2;h:2;s:6;f:30");
STL(S9,"c:#006633;h:1;s:1;f:24");
STL(Symc5,"c:#0000b2;h:1;s:6;f:20");
STL(S2,"c:#0063ff;s:1;f:24");
STL(Symc31,"c:#0000b2;h:2;s:6;f:30");
STL(S7,"c:#006633;h:1;s:1;f:24");
STL(S10,"c:#006633;h:2;s:1;f:24");
STL(S61,"c:#006633;h:2;s:1;f:24");
STL(tCerc,"c:#0000b2;h:1;s:6;sn:true;f:20");
STL(S101,"c:#006633;h:2;s:1;f:24");
STL(Quad,"c:#0700ff;s:2;f:30;p:500");
STL(S93,"c:#006633;h:2;s:1;f:24");
STL(S6,"c:#006633;h:1;s:1;f:24");
STL(S92,"c:#006633;h:2;s:1;f:24");
STL(S62,"c:#006633;h:2;s:1;f:24");
STL(S102,"c:#006633;h:2;s:1;f:24");
STL(L4,"c:#780013;h:2;s:1;f:30;p:0");
STL(Symc2,"c:#0000b2;h:2;s:6;f:20");
STL(S91,"c:#006633;h:2;s:1;f:24");
STL(L3,"c:#780013;h:2;s:1;f:30;p:0");
STL(S63,"c:#006633;h:2;s:1;f:24");
STL(S4,"c:#006633;s:1;f:24");
STL(uC,"c:#966400;o:1;s:4;sn:true;f:20");
STL(uB,"c:#007c00;o:1;s:4;sn:true;f:20");
STL(uGene,"c:#0000b2;h:2;s:6;sn:true;f:20");
STL(uA,"c:#0000b2;o:1;s:4;sn:true;f:20");
STL(AltPt3,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MjA=");
STL(AltPt2,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MjA=");
STL(AltPt,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MjA=");
STL(altM2,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(AltPt1,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MjA=");
STL(altM,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(altM1,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(E42,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(E412,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MjA=");
STL(E23,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(E212,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MjA=");
STL(E312,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MjA=");
STL(E612,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MjA=");
STL(E311,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MjA=");
STL(E413,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MjA=");
STL(E41,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MjA=");
STL(E5,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MjA=");
STL(E213,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MjA=");
STL(E43,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(E21,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MjA=");
STL(E61,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MjA=");
STL(E411,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MjA=");
STL(E3,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(E2,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(E51,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MjA=");
STL(E52,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MjA=");
STL(E33,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(E4,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(E31,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MjA=");
STL(E313,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MjA=");
STL(E613,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MjA=");
STL(E211,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MjA=");
STL(E53,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MjA=");
STL(E611,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MjA=");
STL(E22,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(E32,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(PtM41,"c:#0000b2;h:2;s:6;f:20");
STL(PtG5,"c:#0000b2;h:2;s:6;f:20");
STL(PtM4,"c:#0000b2;h:2;s:6;f:20");
STL(PtM42,"c:#0000b2;h:2;s:6;f:20");
STL(PtM6,"c:#0000b2;h:2;s:6;f:20");
STL(P122,"c:#0000b2;h:2;s:6;f:30");
STL(P142,"c:#0000b2;h:2;s:6;f:30");
STL(PtG6,"c:#0000b2;h:2;s:6;f:20");
STL(PtM32,"c:#0000b2;h:2;s:6;f:20");
STL(PtM5,"c:#0000b2;h:2;s:6;f:20");
STL(PtM31,"c:#0000b2;h:2;s:6;f:20");
STL(PtM2,"c:#0000b2;h:2;s:6;f:20");
STL(P121,"c:#0000b2;h:2;s:6;f:30");
STL(P131,"c:#0000b2;h:2;s:6;f:30");
STL(P132,"c:#0000b2;h:2;s:6;f:30");
STL(PtG4,"c:#0000b2;h:2;s:6;f:20");
STL(PtG3,"c:#0000b2;h:2;s:6;f:20");
STL(P12,"c:#0000b2;h:2;s:6;f:30");
STL(P13,"c:#0000b2;h:2;s:6;f:30");
STL(P14,"c:#0000b2;h:2;s:6;f:30");
STL(PtG2,"c:#0000b2;h:2;s:6;f:20");
STL(PtM22,"c:#0000b2;h:2;s:6;f:20");
STL(PtM62,"c:#0000b2;h:2;s:6;f:20");
STL(PtM3,"c:#0000b2;h:2;s:6;f:20");
STL(PtM52,"c:#0000b2;h:2;s:6;f:20");
STL(PtM51,"c:#0000b2;h:2;s:6;f:20");
STL(PtM21,"c:#0000b2;h:2;s:6;f:20");
STL(PtM61,"c:#0000b2;h:2;s:6;f:20");
STL(P141,"c:#0000b2;h:2;s:6;f:30");
STL(Locus4,"c:#4d4d51;s:1;f:30;p:200");
STL(Par22,"c:#780013;h:2;s:1;f:30;p:0");
STL(M1,"c:#0000b2;h:2;s:6;f:20");
STL(Par23,"c:#780013;h:2;s:1;f:30;p:0");
STL(M2,"c:#0000b2;h:2;s:6;f:30");
STL(M21,"c:#0000b2;h:2;s:6;f:30");
STL(Par21,"c:#780013;h:2;s:1;f:30;p:0");
STL(Hori2,"c:#966400;s:1.5;f:30;p:200;dh:true");
STL(Hori,"c:#0000b2;s:1.5;f:30;p:500;dh:true");
STL(Par1,"c:#780013;h:2;s:1;f:30;p:0");
STL(M22,"c:#0000b2;h:2;s:6;f:30");
STL(Locus3,"c:#4d4d51;s:1;f:30;p:200");
STL(Hori1,"c:#0063ff;s:1.5;f:30;p:500;dh:true");
STL(A,"c:#0000b2;o:1;s:4;sn:true;f:20");
STL(C,"c:#966400;o:1;s:4;sn:true;f:20");
STL(B,"c:#007c00;o:1;s:4;sn:true;f:20");
STL(Par2,"c:#780013;h:2;s:1;f:30;p:0");
STL(Par11,"c:#780013;h:2;s:1;f:30;p:0");
STL(Par12,"c:#780013;h:2;s:1;f:30;p:0");
STL(Par13,"c:#780013;h:2;s:1;f:30;p:0");
STL(P15,"c:#0000b2;h:2;s:6;f:30");
STL(P16,"c:#0000b2;h:2;s:6;f:30");
STL(P11,"c:#0000b2;h:2;s:6;f:30");
STL(P1,"c:#0000b2;h:2;s:6;f:20");
STL(P22,"c:#0000b2;h:2;s:6;f:30");
STL(P21,"c:#0000b2;h:2;s:6;f:30");
STL(Locus1,"c:#ff00d3;s:1;f:30;p:200");
STL(P2,"c:#0000b2;h:2;s:6;f:30");
STL(Symc6,"c:#0000b2;h:2;s:6;f:20");
STL(Par41,"c:#780013;h:2;s:1;f:30;p:0");
STL(Par32,"c:#780013;h:2;s:1;f:30;p:0");
STL(Par42,"c:#780013;h:2;s:1;f:30;p:0");
STL(Par31,"c:#780013;h:2;s:1;f:30;p:0");
STL(Locus2,"c:#ff00d3;s:1;f:30;p:200");
STL(Par4,"c:#780013;h:2;s:1;f:30;p:0");
STL(Par3,"c:#780013;h:2;s:1;f:30;p:0");
STL(P42,"c:#0000b2;h:2;s:6;f:30");
STL(P4,"c:#0000b2;h:2;s:6;f:30");
STL(P41,"c:#0000b2;h:2;s:6;f:30");
STL(P3,"c:#0000b2;h:2;s:6;f:30");
STL(P32,"c:#0000b2;h:2;s:6;f:30");
STL(P31,"c:#0000b2;h:2;s:6;f:30");
STL(P51,"c:#0000b2;h:2;s:6;f:30");
STL(P52,"c:#0000b2;h:2;s:6;f:30");
STL(P5,"c:#0000b2;h:2;s:6;f:30");
STL(angM,"c:#006633;h:2;s:4;f:24;p:1");
STL(angM1,"c:#006633;h:2;s:4;f:24;p:1");
STL(angM2,"c:#006633;h:2;s:4;f:24;p:1");
STL(CdB,"c:#163b31;h:1;s:7;sn:true;f:18;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MTtzOjEwO2Y6MzA=");
STL(CdC,"c:#163b31;h:1;s:7;sn:true;f:18;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MTtzOjEwO2Y6MzA=");
STL(CdA,"c:#163b31;h:1;s:7;sn:true;f:18;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MTtzOjEwO2Y6MzA=");
STL(CstAB1,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(CstAB,"c:#2f542d;h:1;s:7;sn:true;f:18;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MTtzOjEwO2Y6MzA=");
STL(Cst2Pts,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(Cst2Pts1,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(Cst2Pts2,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(CstAB2,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(P56,"c:#0000b2;h:2;s:6;f:30");
STL(P55,"c:#0000b2;h:2;s:6;f:30");
STL(P44,"c:#0000b2;h:2;s:6;f:30");
STL(P45,"c:#0000b2;h:2;s:6;f:30");
STL(P54,"c:#0000b2;h:2;s:6;f:30");
STL(P46,"c:#0000b2;h:2;s:6;f:30");
STL(S96,"c:#006633;h:2;s:1;f:24");
STL(S97,"c:#006633;h:2;s:1;f:24");
STL(xIab2,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(S95,"c:#006633;h:2;s:1;f:24");
STL(xIab1,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(xIab,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(tI,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(tI2,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(tetaK5,"c:#0000b2;h:2;s:6;f:30");
STL(tI1,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(tetaK3,"c:#0000b2;h:2;s:6;f:30");
STL(tetaK4,"c:#0000b2;h:2;s:6;f:30");
STL(chuI1,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(chuK5,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(chuI,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(chuK3,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(chuI2,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(chuK4,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(uK5,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(uK4,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(uI2,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(uI1,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(uI,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(uK3,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(Eseg1,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(CdIbc,"c:#697917;h:1;s:7;sn:true;f:18;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MTtzOjEwO2Y6MjA=");
STL(Eseg,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(CdIca,"c:#697917;h:1;s:7;sn:true;f:18;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MTtzOjEwO2Y6MjA=");
STL(CdIab,"c:#697917;h:1;s:7;sn:true;f:18;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MTtzOjEwO2Y6MjA=");
STL(Eseg2,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(E1,"c:#660937;h:1;s:7;f:17;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MTtzOjEwO2Y6MzA=");
STL(E12,"c:#660937;h:1;s:7;f:17;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MTtzOjEwO2Y6MzA=");
STL(E11,"c:#660937;h:1;s:7;f:17;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MTtzOjEwO2Y6MzA=");
STL(PtSeg2,"c:#0000b2;h:2;s:6;f:30");
STL(PtSeg,"c:#0000b2;h:2;s:6;f:30");
STL(PtSeg1,"c:#0000b2;h:2;s:6;f:30");
STL(P43,"c:#0000b2;h:2;s:6;f:30");
STL(P532,"c:#0000b2;h:2;s:6;f:30");
STL(P431,"c:#0000b2;h:2;s:6;f:30");
STL(P531,"c:#0000b2;h:2;s:6;f:30");
STL(CdOt,"c:#0000b2;h:1;s:7;sn:true;f:18;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MTtzOjEwO2Y6MzA=");
STL(P432,"c:#0000b2;h:2;s:6;f:30");
STL(LeSeg2,"c:#b40000;s:2;f:30;p:100");
STL(LeSeg,"c:#b40000;s:2;f:30;p:100");
STL(P53,"c:#0000b2;h:2;s:6;f:30");
STL(LeSeg1,"c:#b40000;s:2;f:30;p:100");
STL(S941,"c:#006633;h:2;s:1;f:24");
STL(CstOB1,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(PtHc,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(S942,"c:#006633;h:2;s:1;f:24");
STL(S94,"c:#006633;h:2;s:1;f:24");
STL(CstOB,"c:#2f542d;h:1;s:7;sn:true;f:18;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MTtzOjEwO2Y6MzA=");
STL(R,"c:#6c6834;h:1;s:7;sn:true;f:20;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MTtzOjEwO2Y6MzA=");
STL(LePt,"c:#13a513;o:1;s:3;f:18");
STL(tetaK,"c:#0000b2;h:2;s:6;f:30");
STL(tetaK1,"c:#0000b2;h:2;s:6;f:30");
STL(tetaK2,"c:#0000b2;h:2;s:6;f:30");
STL(chuK2,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(ChuCerc,"c:#787a71;h:1;s:7;sn:true;f:18;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MTtzOjEwO2Y6MzA=");
STL(chuK1,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(chuK,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(P8,"c:#0000b2;s:6;f:30");
STL(uK1,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(uK2,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(uK,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(E6,"c:#966400;h:1;s:7;f:18;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MTtzOjEwO2Y6MzA=");
STL(EDrt2,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(EDrt1,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(EDrt,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(PtHc1,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA=");
STL(PtDrt2,"c:#0000b2;h:2;s:6;f:30");
STL(PtDrt1,"c:#0000b2;h:2;s:6;f:30");
STL(LePt1,"c:#0000b2;h:1;s:6;f:18");
STL(PtDrt,"c:#0000b2;h:2;s:6;f:30");
STL(MedAC,"c:#1bf41b;s:2;sn:true;f:30;p:200");
STL(MedAB,"c:#1cef1c;s:2;sn:true;f:30;p:200");
STL(Locus5,"c:#ff00c4;s:3;f:30;p:1000");
STL(MedBC,"c:#1af41a;s:2;sn:true;f:30;p:200");
STL(E7,"c:#7e6d3a;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO3M6MTA7ZjozMA==");
SetCoordsStyle("isAxis:false;isGrid:true;isOx:true;isOy:true;isLockOx:false;isLockOy:false;centerZoom:true;color:#111111;fontSize:18;axisWidth:1;gridWidth:0.1");