// Macros : $macros={}; $macros["ConstDroiteck2"]={ name:"Const. Droite [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.5","-0.4"); STL(CstGene,"c:#2f542d;s:7;f:18;p:4;cL:200;cPT:YzojNzgwMDEzO3M6MTA7ZjozMA=="); return [CstGene]; }}; $macros["CoordInter2droites"]={ name:"Coord Inter 2 droites", parameters:["expression","expression"], exec: function (CstDrt1,CstDrt2){ CdInter=Expression("CdInter","CoordInter = ","","","[log(sqrt(CstDrt1[1]-(((CstDrt1[1]-CstDrt2[1])/(CstDrt1[0]-CstDrt2[0])-CstDrt1[0]-CstDrt2[0])/2+CstDrt1[0])^2)+sqrt(CstDrt1[1]-(((CstDrt1[1]-CstDrt2[1])/(CstDrt1[0]-CstDrt2[0])-CstDrt1[0]-CstDrt2[0])/2+CstDrt1[0])^2-1)),((CstDrt1[1]-CstDrt2[1])/(CstDrt1[0]-CstDrt2[0])-CstDrt1[0]-CstDrt2[0])/2]","2.3","-0.9"); STL(CdInter,"c:#512475;s:7;f:18;p:4;cL:200;cPT:YzojNzgwMDEzO3M6MTA7ZjozMA=="); return [CdInter]; }}; $macros["CoordMilieu"]={ 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.1"); 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.8","-1.5"); tI=Expression("tI","thetaI= ","","","sqrt(CstAB[1])*(exp(xIab)-exp(-xIab))/(exp(xIab)+exp(-xIab))-CstAB[0]","2.4","-1.6"); chuI=Expression("chuI","chuI =","","","sqrt(CstAB[1]-(tI+CstAB[0])^2)","1.7","-0.9"); 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["CoordMilieu3Exp"]={ 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.8","-1.5"); tI=Expression("tI","thetaI= ","","","sqrt(CstAB[1])*(exp(xIab)-exp(-xIab))/(exp(xIab)+exp(-xIab))-CstAB[0]","2.3","-1.7"); chuI=Expression("chuI","chuI =","","","sqrt(CstAB[1]-(tI+CstAB[0])^2)","1.7","-0.9"); 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["CoordparAoAuA"]={ name:"Coord par A oA uA", parameters:["point","point","point"], exec: function (A,oA,uA){ E1=Expression("E1","","","","A-oA","0.36049591399451686","-0.736224049707112"); CdA=Expression("CdA","","","","[uA[2],IF(E1[1]>0,acos(E1[0]/sqrt(E1[0]^2+E1[1]^2)),2*\u03C0-acos(E1[0]/sqrt(E1[0]^2+E1[1]^2)))]","0.6143662759624864","-1.4470610632174268"); STL(CdA,"c:#435805;s:7;sn:true;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO3M6MTA7ZjozMA=="); return [CdA]; }}; $macros["droiteparConst"]={ name:"droite par Const", parameters:["expression"], exec: function (CstAB){ PmaxDrte=Point("PmaxDrte","[-CstAB[0]+sqrt(CstAB[1]-1),-1]","0"); PminDrte=Point("PminDrte","[-CstAB[0]-sqrt(CstAB[1]-1),-1]","0"); SegDrte=Segment("SegDrte",PminDrte,PmaxDrte); tetaK=PointOn("tetaK",SegDrte,0.8); chuK=Expression("chuK","chuK = ","","","sqrt(CstAB[1]-(x(tetaK)+CstAB[0])^2)","2","-0.7"); uK=Expression("uK","uK = ","","","log(chuK+sqrt(chuK^2-1))","2.","-0.5"); PtDrt=Point("PtDrt","[cos(x(tetaK))/chuK,sin(x(tetaK))/chuK,uK-(exp(uK)-exp(-uK))/(exp(uK)+exp(-uK))]","0"); LaDroite=Locus("LaDroite",PtDrt,tetaK); STL(LaDroite,"c:#b40000;s:3;f:30;p:0"); return [LaDroite]; }}; $macros["HauteurABC"]={ name:"Hauteur (AB) C", parameters:["expression","expression","expression"], exec: function (CdA,CdB,CdC){ 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.2","-1.3"); tHc=Expression("tHc","theta H_C = ","","","(2*CdC[1]*CstAB[1]-CstAB[0]*((exp(CdC[0])+exp(-CdC[0]))^2/4+(CdC[1]+CstAB[0])^2-CstAB[1]))/((exp(CdC[0])+exp(-CdC[0]))^2/4+(CdC[1]+CstAB[0])^2+CstAB[1]) ","1.1","-0.8"); chuHc=Expression("chuHc","chuHc = ","","","sqrt(CstAB[1]-(tHc+CstAB[0])^2)","1.6963991054406837","-2.393472484595991"); uHc=Expression("uHc","uHc = ","","","log(chuHc+sqrt(chuHc^2-1))","1.93","-0.8"); CdHc=Expression("CdHc","Coord Hc = ","","","[uHc,tHc]","1.3","-1.6"); Hc=Point("Hc","[cos(tHc)/chuHc,sin(tHc)/chuHc,uHc-(exp(uHc)-exp(-uHc))/(exp(uHc)+exp(-uHc))]","0"); CstHc=Expression("CstHc","Const Hauteur Hc = ","","","[((exp(CdHc[0])+exp(-CdHc[0]))^2/4-(exp(CdC[0])+exp(-CdC[0]))^2/4+CdHc[1]^2-CdC[1]^2)/(2*(CdC[1]-CdHc[1])),(exp(CdHc[0])+exp(-CdHc[0]))^2/4+(CdHc[1]+((exp(CdHc[0])+exp(-CdHc[0]))^2/4-(exp(CdC[0])+exp(-CdC[0]))^2/4+CdHc[1]^2-CdC[1]^2)/(2*(CdC[1]-CdHc[1])))^2]","1.5","-1.8"); PmaxHt=Point("PmaxHt","[-CstHc[0]+sqrt(CstHc[1]-1),-1.3]","0"); PminHt=Point("PminHt","[-CstHc[0]-sqrt(CstHc[1]-1),-1.3]","0"); SegHaut=Segment("SegHaut",PminHt,PmaxHt); tetaK3=PointOn("tetaK3",SegHaut,0.7); chuK3=Expression("chuK3","chuK = ","","","sqrt(CstHc[1]-(x(tetaK3)+CstHc[0])^2)","-1.3","-0.7"); uK3=Expression("uK3","uK = ","","","log(chuK3+sqrt(chuK3^2-1))","-1.1","-0.55"); PtSurH=Point("PtSurH","[cos(x(tetaK3))/chuK3,sin(x(tetaK3))/chuK3,uK3-(exp(uK3)-exp(-uK3))/(exp(uK3)+exp(-uK3))]","0"); Hauteur=Locus("Hauteur",PtSurH,tetaK3); STL(Hc,"c:#007c00;s:4;f:30"); STL(Hauteur,"c:#007c00;s:2;f:30;p:200"); return [Hc,CstHc,Hauteur]; }}; $macros["HoricycleAltitude"]={ name:"Horicycle Altitude", parameters:["point"], exec: function (uG){ altG=Expression("altG","","","","uG[2]","-1.6498183460809837","-0.40080332701402427"); G1=Point("G1","[2/(exp(altG)+exp(-altG)),0,altG-(exp(altG)-exp(-altG))/(exp(altG)+exp(-altG))]","0"); G2=Point("G2","[0,2/(exp(altG)+exp(-altG)),altG-(exp(altG)-exp(-altG))/(exp(altG)+exp(-altG))]","0"); P13=Point("P13","[-2/(exp(altG)+exp(-altG)),0,altG-(exp(altG)-exp(-altG))/(exp(altG)+exp(-altG))]","0"); C11=Circle3pts3D("C11",G1,G2,P13); STL(C11,"c:#cc66cc;s:1;f:30;p:0"); return [C11]; }}; $macros["Mediatriceetcoord"]={ name:"M\u00e9diatrice et coord", parameters:["expression","expression"], exec: function (CdA,CdB){ // calcul de la constante de la droite et du milieu du segment 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.8","-2.6"); 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.8","-1.5"); tI=Expression("tI","thetaI= ","","","sqrt(CstAB[1])*(exp(xIab)-exp(-xIab))/(exp(xIab)+exp(-xIab))-CstAB[0]","2.2","-1.2"); chuI=Expression("chuI","chuI =","","","sqrt(CstAB[1]-(tI+CstAB[0])^2)","1.7","-0.9"); uI=Expression("uI","uI = ","","","log(chuI+sqrt(chuI^2-1))","1.3","-0.9"); CdIab=Expression("CdIab","coord Iab =","","","[uI,tI]","1.6","-2.2"); CstMed=Expression("CstMed","Const Mediatrice AB = ","","","[CstAB[0]-CstAB[1]/(CdIab[1]+CstAB[0]),(CstAB[1]/(CdIab[1]+CstAB[0]))^2-CstAB[1]]","1.8","-2.9"); PminMed=Point("PminMed","[-CstMed[0]-sqrt(CstMed[1]-1),-1.5]","0"); PmaxMed=Point("PmaxMed","[-CstMed[0]+sqrt(CstMed[1]-1),-1.5]","0"); SegMed=Segment("SegMed",PminMed,PmaxMed); tetaK=PointOn("tetaK",SegMed,0.7); chuK=Expression("chuK","chuK = ","","","sqrt(CstMed[1]-(x(tetaK)+CstMed[0])^2)","-1.3","-0.7"); uK=Expression("uK","uK = ","","","log(chuK+sqrt(chuK^2-1))","1.2","-0.6"); PtDrt=Point("PtDrt","[cos(x(tetaK))/chuK,sin(x(tetaK))/chuK,uK-(exp(uK)-exp(-uK))/(exp(uK)+exp(-uK))]","0"); LaDroite=Locus("LaDroite",PtDrt,tetaK); STL(CdIab,"c:#697917;s:7;sn:true;f:18;p:4;cL:200;cPT:YzojNzgwMDEzO3M6MTA7ZjoyMA=="); STL(CstMed,"c:#660937;s:7;f:17;p:4;cL:200;cPT:YzojNzgwMDEzO3M6MTA7ZjozMA=="); STL(LaDroite,"c:#b40000;s:3;f:30;p:1000"); return [CdIab,CstMed,LaDroite]; }}; $macros["PointparCoord"]={ name:"Point par Coord", parameters:["expression"], exec: function (CdM){ LePt=Point("LePt","[2*cos(CdM[1])/(exp(CdM[0])+exp(-CdM[0])),2*sin(CdM[1])/(exp(CdM[0])+exp(-CdM[0])),CdM[0]-(exp(CdM[0])-exp(-CdM[0]))/(exp(CdM[0])+exp(-CdM[0]))]","0"); STL(LePt,"c:#0000b2;s:6;f:18"); return [LePt]; }}; $macros["SegmentParCoord"]={ name:"Segment Par Coord", parameters:["expression","expression"], exec: function (CdA,CdB){ 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") PmaxSeg=Point("PmaxSeg","[max(CdA[1],CdB[1]),-0.5]","0"); PminSeg=Point("PminSeg","[min(CdA[1],CdB[1]),-0.5]","0"); Segdeseg=Segment("Segdeseg",PminSeg,PmaxSeg); tetaK=PointOn("tetaK",Segdeseg,0.4); chuK=Expression("chuK","chuK = ","","","sqrt(Cst2Pts[1]-(x(tetaK)+Cst2Pts[0])^2)","0.9","-1.7"); uK=Expression("uK","uK = ","","","log(chuK+sqrt(chuK^2-1))","0.8","-1.5"); PtSeg=Point("PtSeg","[cos(x(tetaK))/chuK,sin(x(tetaK))/chuK,uK-(exp(uK)-exp(-uK))/(exp(uK)+exp(-uK))]","0"); LeSeg=Locus("LeSeg",PtSeg,tetaK); STL(LeSeg,"c:#b40000;s:3;f:30;p:100"); return [LeSeg]; }}; // Coordinates System : SetCoords(-74,33,272.76274442794005,true); // Geometry : O=Point("O",1.3528240477778462,-1.3418254782837173); X=Point("X","[1,0,0]","0"); P11=Point("P11","[-sqrt(2)/2,-sqrt(2)/2,0]","0"); Y=Point("Y","[0,1,0]","0"); Z=Point("Z","[0,0,1]","0"); C1=Circle3pts3D("C1",X,Y,P11); S11=Segment("S11",O,X); S21=Segment("S21",O,Y); S31=Segment("S31",O,Z); uI=Point("uI","[x(O.coords2D())+1,y(O.coords2D())]","0"); Center1=Center("Center1",C1); S2=Segment("S2",O,uI); S3=Segment("S3",uI,Y); Symc1=Symmetry("Symc1",Z,Center1); Symc2=Symmetry("Symc2",Symc1,Center1); Symc3=Symmetry("Symc3",Symc2,Center1); S1=Segment("S1",O,Symc3); uC=PointOn("uC",S1,0.07877367917377442); uG=PointOn("uG",S1,0.20052710313256453); uB=PointOn("uB",S1,0.1518299138913878); uA=PointOn("uA",S1,0.2591908153459675); altG3=Expression("altG3","","","","uC[2]","0.2712980475218445","-0.2894038261279965"); altG=Expression("altG","","","","uG[2]","0.3812837424631328","-0.7589012950948892"); altG1=Expression("altG1","","","","uA[2]","0.2712980475218445","-0.29114940848044574"); altG2=Expression("altG2","","","","uB[2]","0.2712980475218445","-0.2984817881431983"); G1=Point("G1","[2/(exp(altG)+exp(-altG)),0,altG-(exp(altG)-exp(-altG))/(exp(altG)+exp(-altG))]","0"); G2=Point("G2","[0,2/(exp(altG)+exp(-altG)),altG-(exp(altG)-exp(-altG))/(exp(altG)+exp(-altG))]","0"); G13=Point("G13","[2/(exp(altG3)+exp(-altG3)),0,altG3-(exp(altG3)-exp(-altG3))/(exp(altG3)+exp(-altG3))]","0"); G23=Point("G23","[0,2/(exp(altG3)+exp(-altG3)),altG3-(exp(altG3)-exp(-altG3))/(exp(altG3)+exp(-altG3))]","0"); P133=Point("P133","[-2/(exp(altG3)+exp(-altG3)),0,altG3-(exp(altG3)-exp(-altG3))/(exp(altG3)+exp(-altG3))]","0"); P131=Point("P131","[-2/(exp(altG1)+exp(-altG1)),0,altG1-(exp(altG1)-exp(-altG1))/(exp(altG1)+exp(-altG1))]","0"); G11=Point("G11","[2/(exp(altG1)+exp(-altG1)),0,altG1-(exp(altG1)-exp(-altG1))/(exp(altG1)+exp(-altG1))]","0"); G12=Point("G12","[2/(exp(altG2)+exp(-altG2)),0,altG2-(exp(altG2)-exp(-altG2))/(exp(altG2)+exp(-altG2))]","0"); G22=Point("G22","[0,2/(exp(altG2)+exp(-altG2)),altG2-(exp(altG2)-exp(-altG2))/(exp(altG2)+exp(-altG2))]","0"); P132=Point("P132","[-2/(exp(altG2)+exp(-altG2)),0,altG2-(exp(altG2)-exp(-altG2))/(exp(altG2)+exp(-altG2))]","0"); P13=Point("P13","[-2/(exp(altG)+exp(-altG)),0,altG-(exp(altG)-exp(-altG))/(exp(altG)+exp(-altG))]","0"); G21=Point("G21","[0,2/(exp(altG1)+exp(-altG1)),altG1-(exp(altG1)-exp(-altG1))/(exp(altG1)+exp(-altG1))]","0"); HoriC=Circle3pts3D("HoriC",G13,G23,P133); Locus3=Locus("Locus3",G1,uG); Locus4=Locus("Locus4",P13,uG); HoriA=Circle3pts3D("HoriA",G11,G21,P131); HoriB=Circle3pts3D("HoriB",G12,G22,P132); Par2=Parallel("Par2",S3,G2); oG=MidPoint("oG",G1,P13); Center4=Center("Center4",HoriC); Center3=Center("Center3",HoriB); Par1=Parallel("Par1",S2,oG); Center2=Center("Center2",HoriA); C=PointOn("C",HoriC,222); A=PointOn("A",HoriA,164); B=PointOn("B",HoriB,763); uG1=OrderedIntersection("uG1",Par2,Par1,0); E12=Expression("E12","","","","C-Center4","0.5296744525852636","-0.49810922881598413"); E11=Expression("E11","","","","B-Center3","0.4574685085168726","-0.49810922881598413"); E1=Expression("E1","","","","A-Center2","0.38526256444848156","0.007332379662752553"); CdC=Expression("CdC","","","","[uC[2],IF(E12[1]>0,acos(E12[0]/sqrt(E12[0]^2+E12[1]^2)),2*\u03C0-acos(E12[0]/sqrt(E12[0]^2+E12[1]^2)))]","3.204249912622866","-1.1255202782325169"); CdB=Expression("CdB","","","","[uB[2],IF(E11[1]>0,acos(E11[0]/sqrt(E11[0]^2+E11[1]^2)),2*\u03C0-acos(E11[0]/sqrt(E11[0]^2+E11[1]^2)))]","3.204249912622866","-0.9422107866637032"); CdA=Expression("CdA","","","","[uA[2],IF(E1[1]>0,acos(E1[0]/sqrt(E1[0]^2+E1[1]^2)),2*\u03C0-acos(E1[0]/sqrt(E1[0]^2+E1[1]^2)))]","3.204249912622866","-0.7589012950948892"); Symc4=Symmetry("Symc4",oG,uG1); Locus1=Locus("Locus1",uG1,uG); 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.2712980475218445","-0.28149139661081135"); Locus2=Locus("Locus2",Symc4,uG); PminSeg=Point("PminSeg","[min(CdA[1],CdB[1]),-0.5]","0"); PminSeg1=Point("PminSeg1","[min(CdB[1],CdC[1]),-0.5]","0"); 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.0351160610640002","-0.93134489322633"); PmaxSeg=Point("PmaxSeg","[max(CdA[1],CdB[1]),-0.5]","0"); 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.2712980475218445","-0.28149139661081135"); 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.0351160610640002","-0.93134489322633"); 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.2712980475218445","-0.28149139661081135"); 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.0351160610640002","-0.93134489322633"); PmaxSeg2=Point("PmaxSeg2","[max(CdC[1],CdA[1]),-0.5]","0"); PminSeg2=Point("PminSeg2","[min(CdC[1],CdA[1]),-0.5]","0"); PmaxSeg1=Point("PmaxSeg1","[max(CdB[1],CdC[1]),-0.5]","0"); Segdeseg2=Segment("Segdeseg2",PminSeg2,PmaxSeg2); Segdeseg1=Segment("Segdeseg1",PminSeg1,PmaxSeg1); tHc1=Expression("tHc1","theta H_C = ","","","(2*CdA[1]*CstAB1[1]-CstAB1[0]*((exp(CdA[0])+exp(-CdA[0]))^2/4+(CdA[1]+CstAB1[0])^2-CstAB1[1]))/((exp(CdA[0])+exp(-CdA[0]))^2/4+(CdA[1]+CstAB1[0])^2+CstAB1[1]) ","0.9629101169956095","-0.5703151728843753"); tHc=Expression("tHc","theta H_C = ","","","(2*CdC[1]*CstAB[1]-CstAB[0]*((exp(CdC[0])+exp(-CdC[0]))^2/4+(CdC[1]+CstAB[0])^2-CstAB[1]))/((exp(CdC[0])+exp(-CdC[0]))^2/4+(CdC[1]+CstAB[0])^2+CstAB[1]) ","0.9629101169956095","-0.5703151728843753"); tHc2=Expression("tHc2","theta H_C = ","","","(2*CdB[1]*CstAB2[1]-CstAB2[0]*((exp(CdB[0])+exp(-CdB[0]))^2/4+(CdB[1]+CstAB2[0])^2-CstAB2[1]))/((exp(CdB[0])+exp(-CdB[0]))^2/4+(CdB[1]+CstAB2[0])^2+CstAB2[1]) ","0.9629101169956095","-0.5703151728843753"); Segdeseg=Segment("Segdeseg",PminSeg,PmaxSeg); chuHc=Expression("chuHc","chuHc = ","","","sqrt(CstAB[1]-(tHc+CstAB[0])^2)","1.3935457214944935","-1.7208970238569563"); tetaK1=PointOn("tetaK1",Segdeseg1,0.4); tetaK2=PointOn("tetaK2",Segdeseg2,0.4); chuHc2=Expression("chuHc2","chuHc = ","","","sqrt(CstAB2[1]-(tHc2+CstAB2[0])^2)","1.3935457214944935","-1.7208970238569563"); tetaK=PointOn("tetaK",Segdeseg,0.4); chuHc1=Expression("chuHc1","chuHc = ","","","sqrt(CstAB1[1]-(tHc1+CstAB1[0])^2)","1.3935457214944935","-1.7208970238569563"); chuK2=Expression("chuK2","chuK = ","","","sqrt(Cst2Pts2[1]-(x(tetaK2)+Cst2Pts2[0])^2)","0.8184982288588274","-1.2201686694998939"); chuK=Expression("chuK","chuK = ","","","sqrt(Cst2Pts[1]-(x(tetaK)+Cst2Pts[0])^2)","0.8184982288588274","-1.2201686694998939"); uHc=Expression("uHc","uHc = ","","","log(chuHc+sqrt(chuHc^2-1))","1.5622194527632545","-0.5703151728843753"); uHc1=Expression("uHc1","uHc = ","","","log(chuHc1+sqrt(chuHc1^2-1))","1.5622194527632545","-0.5703151728843753"); uHc2=Expression("uHc2","uHc = ","","","log(chuHc2+sqrt(chuHc2^2-1))","1.5622194527632545","-0.5703151728843753"); chuK1=Expression("chuK1","chuK = ","","","sqrt(Cst2Pts1[1]-(x(tetaK1)+Cst2Pts1[0])^2)","0.8184982288588274","-1.2201686694998939"); CdHc1=Expression("CdHc1","Coord Hc = ","","","[uHc1,tHc1]","1.1073220051323913","-1.147962725431503"); uK=Expression("uK","uK = ","","","log(chuK+sqrt(chuK^2-1))","0.7462922847904365","-1.075756781363112"); uK2=Expression("uK2","uK = ","","","log(chuK2+sqrt(chuK2^2-1))","0.7462922847904365","-1.075756781363112"); Ha=Point("Ha","[cos(tHc1)/chuHc1,sin(tHc1)/chuHc1,uHc1-(exp(uHc1)-exp(-uHc1))/(exp(uHc1)+exp(-uHc1))]","0"); Hc=Point("Hc","[cos(tHc)/chuHc,sin(tHc)/chuHc,uHc-(exp(uHc)-exp(-uHc))/(exp(uHc)+exp(-uHc))]","0"); CdHc=Expression("CdHc","Coord Hc = ","","","[uHc,tHc]","1.1073220051323913","-1.147962725431503"); CdHc2=Expression("CdHc2","Coord Hc = ","","","[uHc2,tHc2]","1.1073220051323913","-1.147962725431503"); Hb=Point("Hb","[cos(tHc2)/chuHc2,sin(tHc2)/chuHc2,uHc2-(exp(uHc2)-exp(-uHc2))/(exp(uHc2)+exp(-uHc2))]","0"); uK1=Expression("uK1","uK = ","","","log(chuK1+sqrt(chuK1^2-1))","0.7462922847904365","-1.075756781363112"); PtSeg2=Point("PtSeg2","[cos(x(tetaK2))/chuK2,sin(x(tetaK2))/chuK2,uK2-(exp(uK2)-exp(-uK2))/(exp(uK2)+exp(-uK2))]","0"); PtSeg=Point("PtSeg","[cos(x(tetaK))/chuK,sin(x(tetaK))/chuK,uK-(exp(uK)-exp(-uK))/(exp(uK)+exp(-uK))]","0"); CstHc2=Expression("CstHc2","Const Hauteur Hb = ","","","[((exp(CdHc2[0])+exp(-CdHc2[0]))^2/4-(exp(CdB[0])+exp(-CdB[0]))^2/4+CdHc2[1]^2-CdB[1]^2)/(2*(CdB[1]-CdHc2[1])),(exp(CdHc2[0])+exp(-CdHc2[0]))^2/4+(CdHc2[1]+((exp(CdHc2[0])+exp(-CdHc2[0]))^2/4-(exp(CdB[0])+exp(-CdB[0]))^2/4+CdHc2[1]^2-CdB[1]^2)/(2*(CdB[1]-CdHc2[1])))^2]","2.544335742975136","-0.4656061085847871"); CstHc1=Expression("CstHc1","Const Hauteur Ha = ","","","[((exp(CdHc1[0])+exp(-CdHc1[0]))^2/4-(exp(CdA[0])+exp(-CdA[0]))^2/4+CdHc1[1]^2-CdA[1]^2)/(2*(CdA[1]-CdHc1[1])),(exp(CdHc1[0])+exp(-CdHc1[0]))^2/4+(CdHc1[1]+((exp(CdHc1[0])+exp(-CdHc1[0]))^2/4-(exp(CdA[0])+exp(-CdA[0]))^2/4+CdHc1[1]^2-CdA[1]^2)/(2*(CdA[1]-CdHc1[1])))^2]","2.5076738446613733","-0.31895851532973607"); CstHc=Expression("CstHc","Const Hauteur Hc = ","","","[((exp(CdHc[0])+exp(-CdHc[0]))^2/4-(exp(CdC[0])+exp(-CdC[0]))^2/4+CdHc[1]^2-CdC[1]^2)/(2*(CdC[1]-CdHc[1])),(exp(CdHc[0])+exp(-CdHc[0]))^2/4+(CdHc[1]+((exp(CdHc[0])+exp(-CdHc[0]))^2/4-(exp(CdC[0])+exp(-CdC[0]))^2/4+CdHc[1]^2-CdC[1]^2)/(2*(CdC[1]-CdHc[1])))^2]","2.6176595396026614","-0.13564902376092225"); PtSeg1=Point("PtSeg1","[cos(x(tetaK1))/chuK1,sin(x(tetaK1))/chuK1,uK1-(exp(uK1)-exp(-uK1))/(exp(uK1)+exp(-uK1))]","0"); PmaxHt1=Point("PmaxHt1","[-CstHc1[0]+sqrt(CstHc1[1]-1),-1.3]","0"); LeSeg=Locus("LeSeg",PtSeg,tetaK); PmaxHt2=Point("PmaxHt2","[-CstHc2[0]+sqrt(CstHc2[1]-1),-1.3]","0"); LeSeg2=Locus("LeSeg2",PtSeg2,tetaK2); CdInter=Expression("CdInter","CoordInter = ","","","[log(sqrt(CstHc[1]-(((CstHc[1]-CstHc1[1])/(CstHc[0]-CstHc1[0])-CstHc[0]-CstHc1[0])/2+CstHc[0])^2)+sqrt(CstHc[1]-(((CstHc[1]-CstHc1[1])/(CstHc[0]-CstHc1[0])-CstHc[0]-CstHc1[0])/2+CstHc[0])^2-1)),((CstHc[1]-CstHc1[1])/(CstHc[0]-CstHc1[0])-CstHc[0]-CstHc1[0])/2]","3.167588014309103","-1.5654630579976703"); PminHt=Point("PminHt","[-CstHc[0]-sqrt(CstHc[1]-1),-1.3]","0"); PmaxHt=Point("PmaxHt","[-CstHc[0]+sqrt(CstHc[1]-1),-1.3]","0"); PminHt2=Point("PminHt2","[-CstHc2[0]-sqrt(CstHc2[1]-1),-1.3]","0"); PminHt1=Point("PminHt1","[-CstHc1[0]-sqrt(CstHc1[1]-1),-1.3]","0"); LeSeg1=Locus("LeSeg1",PtSeg1,tetaK1); SegHaut2=Segment("SegHaut2",PminHt2,PmaxHt2); SegHaut=Segment("SegHaut",PminHt,PmaxHt); SegHaut1=Segment("SegHaut1",PminHt1,PmaxHt1); H=Point("H","[2*cos(CdInter[1])/(exp(CdInter[0])+exp(-CdInter[0])),2*sin(CdInter[1])/(exp(CdInter[0])+exp(-CdInter[0])),CdInter[0]-(exp(CdInter[0])-exp(-CdInter[0]))/(exp(CdInter[0])+exp(-CdInter[0]))]","0"); tetaK32=PointOn("tetaK32",SegHaut2,0.7); tetaK3=PointOn("tetaK3",SegHaut,0.7); tetaK31=PointOn("tetaK31",SegHaut1,0.7); chuK3=Expression("chuK3","chuK = ","","","sqrt(CstHc[1]-(x(tetaK3)+CstHc[0])^2)","0.2712980475218445","-0.49810922881598413"); chuK32=Expression("chuK32","chuK = ","","","sqrt(CstHc2[1]-(x(tetaK32)+CstHc2[0])^2)","0.2712980475218445","-0.49810922881598413"); chuK31=Expression("chuK31","chuK = ","","","sqrt(CstHc1[1]-(x(tetaK31)+CstHc1[0])^2)","0.2712980475218445","-0.49810922881598413"); uK3=Expression("uK3","uK = ","","","log(chuK3+sqrt(chuK3^2-1))","0.2712980475218445","-0.3898003127133978"); uK32=Expression("uK32","uK = ","","","log(chuK32+sqrt(chuK32^2-1))","0.2712980475218445","-0.3898003127133978"); uK31=Expression("uK31","uK = ","","","log(chuK31+sqrt(chuK31^2-1))","0.2712980475218445","-0.3898003127133978"); PtSurH2=Point("PtSurH2","[cos(x(tetaK32))/chuK32,sin(x(tetaK32))/chuK32,uK32-(exp(uK32)-exp(-uK32))/(exp(uK32)+exp(-uK32))]","0"); PtSurH=Point("PtSurH","[cos(x(tetaK3))/chuK3,sin(x(tetaK3))/chuK3,uK3-(exp(uK3)-exp(-uK3))/(exp(uK3)+exp(-uK3))]","0"); PtSurH1=Point("PtSurH1","[cos(x(tetaK31))/chuK31,sin(x(tetaK31))/chuK31,uK31-(exp(uK31)-exp(-uK31))/(exp(uK31)+exp(-uK31))]","0"); Hauteur=Locus("Hauteur",PtSurH,tetaK3); Hauteur1=Locus("Hauteur1",PtSurH1,tetaK31); Hauteur2=Locus("Hauteur2",PtSurH2,tetaK32); // Styles : STL(O,"c:#0000b2;s:6;sn:true;f:18;np:2.813039483038342;fl:true"); STL(X,"c:#0000b2;o:1;s:4;sn:true;f:18"); STL(P11,"c:#0000b2;h:1;s:6;f:18"); STL(Y,"c:#0000b2;o:1;s:4;sn:true;f:18"); STL(Z,"c:#0000b2;h:1;o:1;s:4;sn:true;f:18"); STL(C1,"c:#cc66cc;s:2.5;f:30;p:0"); STL(S11,"c:#117dad;s:1;f:24"); STL(S21,"c:#117dad;s:1;f:24"); STL(S31,"c:#117dad;h:1;s:1;f:24"); STL(uI,"c:#0000b2;h:2;s:6;sn:true;f:18"); STL(Center1,"c:#0000b2;h:1;s:6;f:18"); STL(S2,"c:#006633;h:2;s:1;f:24"); STL(S3,"c:#006633;h:2;s:1;f:24"); STL(Symc1,"c:#0000b2;h:1;s:6;f:18"); STL(Symc2,"c:#0000b2;h:1;s:6;f:18"); STL(Symc3,"c:#0000b2;h:1;s:6;f:18"); STL(S1,"c:#006633;s:1;f:24"); STL(uC,"c:#007c00;s:5;sn:true;f:16;sp:2"); STL(uG,"c:#0000b2;h:2;s:6;sn:true;f:18"); STL(uB,"c:#007c00;s:5;sn:true;f:16;sp:2"); STL(uA,"c:#007c00;s:5;sn:true;f:16;sp:2"); STL(altG3,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MTg="); STL(altG,"c:#567f3b;h:1;s:7;sn:true;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MTtzOjEwO2Y6MTg="); STL(altG1,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MTg="); STL(altG2,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MTg="); STL(G1,"c:#0000b2;h:2;s:6;sn:true;f:18"); STL(G2,"c:#0000b2;h:2;s:6;sn:true;f:18"); STL(G13,"c:#0000b2;h:2;s:6;f:18"); STL(G23,"c:#0000b2;h:2;s:6;f:18"); STL(P133,"c:#0000b2;h:2;s:6;f:18"); STL(P131,"c:#0000b2;h:2;s:6;f:18"); STL(G11,"c:#0000b2;h:2;s:6;f:18"); STL(G12,"c:#0000b2;h:2;s:6;f:18"); STL(G22,"c:#0000b2;h:2;s:6;f:18"); STL(P132,"c:#0000b2;h:2;s:6;f:18"); STL(P13,"c:#0000b2;h:2;s:6;f:18"); STL(G21,"c:#0000b2;h:2;s:6;f:18"); STL(HoriC,"c:#cc66cc;s:1;sn:true;f:30;p:0;dh:true"); STL(Locus3,"c:#780013;s:1;f:30;p:100"); STL(Locus4,"c:#780013;s:1;f:30;p:100"); STL(HoriA,"c:#cc66cc;s:1;sn:true;f:30;p:0;dh:true"); STL(HoriB,"c:#cc66cc;s:1;sn:true;f:30;p:0;dh:true"); STL(Par2,"c:#780013;h:2;s:1;f:30;p:0"); STL(oG,"c:#0000b2;h:2;s:6;sn:true;f:18"); STL(Center4,"c:#0000b2;h:1;s:6;sn:true;f:18"); STL(Center3,"c:#0000b2;h:1;s:6;sn:true;f:18"); STL(Par1,"c:#780013;h:1;s:1;f:30;p:0"); STL(Center2,"c:#0000b2;h:1;s:6;sn:true;f:18"); STL(C,"c:#0000b2;o:1;s:6;sn:true;f:18"); STL(A,"c:#0000b2;o:1;s:5;sn:true;f:18;np:3.490123854495881"); STL(B,"c:#0000b2;o:1;s:5;sn:true;f:18"); STL(uG1,"c:#0000b2;h:2;s:6;sn:true;f:18"); STL(E12,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MTg="); STL(E11,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MTg="); STL(E1,"c:#48314c;h:1;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MTtzOjEwO2Y6MTg="); STL(CdC,"c:#435805;s:7;sn:true;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO3M6MTA7ZjoxOA=="); STL(CdB,"c:#435805;s:7;sn:true;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO3M6MTA7ZjoxOA=="); STL(CdA,"c:#435805;s:7;sn:true;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO3M6MTA7ZjoxOA=="); STL(Symc4,"c:#0000b2;h:1;s:6;f:18"); STL(Locus1,"c:#780013;s:1;f:30;p:100"); STL(Cst2Pts1,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA="); STL(Locus2,"c:#780013;s:1;f:30;p:100"); STL(PminSeg,"c:#0000b2;h:2;s:6;f:30"); STL(PminSeg1,"c:#0000b2;h:2;s:6;f:30"); STL(CstAB2,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA="); STL(PmaxSeg,"c:#0000b2;h:2;s:6;f:30"); STL(Cst2Pts,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA="); STL(CstAB,"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(CstAB1,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA="); STL(PmaxSeg2,"c:#0000b2;h:2;s:6;f:30"); STL(PminSeg2,"c:#0000b2;h:2;s:6;f:30"); STL(PmaxSeg1,"c:#0000b2;h:2;s:6;f:30"); STL(Segdeseg2,"c:#006633;h:2;s:1;f:24"); STL(Segdeseg1,"c:#006633;h:2;s:1;f:24"); STL(tHc1,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA="); STL(tHc,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA="); STL(tHc2,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA="); STL(Segdeseg,"c:#006633;h:2;s:1;f:24"); STL(chuHc,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA="); STL(tetaK1,"c:#0000b2;h:2;s:6;f:30"); STL(tetaK2,"c:#0000b2;h:2;s:6;f:30"); STL(chuHc2,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA="); STL(tetaK,"c:#0000b2;h:2;s:6;f:30"); STL(chuHc1,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA="); STL(chuK2,"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(uHc,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA="); STL(uHc1,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA="); STL(uHc2,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA="); STL(chuK1,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA="); STL(CdHc1,"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(uK2,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA="); STL(Ha,"c:#b40000;s:4;sn:true;f:15"); STL(Hc,"c:#b40000;s:4;sn:true;f:15;np:1.6565867393056315"); STL(CdHc,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA="); STL(CdHc2,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA="); STL(Hb,"c:#b40000;s:4;sn:true;f:15;np:3.618730409761395"); STL(uK1,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA="); STL(PtSeg2,"c:#0000b2;h:2;s:6;f:30"); STL(PtSeg,"c:#0000b2;h:2;s:6;f:30"); STL(CstHc2,"c:#780013;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO3M6MTA7ZjozMA=="); STL(CstHc1,"c:#780013;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO3M6MTA7ZjozMA=="); STL(CstHc,"c:#780013;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO3M6MTA7ZjozMA=="); STL(PtSeg1,"c:#0000b2;h:2;s:6;f:30"); STL(PmaxHt1,"c:#0000b2;h:2;s:6;f:30"); STL(LeSeg,"c:#b40000;s:3;f:30;p:100"); STL(PmaxHt2,"c:#0000b2;h:2;s:6;f:30"); STL(LeSeg2,"c:#b40000;s:3;f:30;p:100"); STL(CdInter,"c:#512475;s:7;f:18;p:4;cL:200;cPT:YzojNzgwMDEzO3M6MTA7ZjozMA=="); STL(PminHt,"c:#0000b2;h:2;s:6;f:30"); STL(PmaxHt,"c:#0000b2;h:2;s:6;f:30"); STL(PminHt2,"c:#0000b2;h:2;s:6;f:30"); STL(PminHt1,"c:#0000b2;h:2;s:6;f:30"); STL(LeSeg1,"c:#b40000;s:3;f:30;p:100"); STL(SegHaut2,"c:#006633;h:2;s:1;f:24"); STL(SegHaut,"c:#006633;h:2;s:1;f:24"); STL(SegHaut1,"c:#006633;h:2;s:1;f:24"); STL(H,"c:#0000b2;s:4;sn:true;f:18"); STL(tetaK32,"c:#0000b2;h:2;s:6;f:30"); STL(tetaK3,"c:#0000b2;h:2;s:6;f:30"); STL(tetaK31,"c:#0000b2;h:2;s:6;f:30"); STL(chuK3,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA="); STL(chuK32,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA="); STL(chuK31,"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(uK32,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA="); STL(uK31,"c:#780013;h:2;s:7;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MzA="); STL(PtSurH2,"c:#0000b2;h:2;s:6;f:30"); STL(PtSurH,"c:#0000b2;h:2;s:6;f:30"); STL(PtSurH1,"c:#0000b2;h:2;s:6;f:30"); STL(Hauteur,"c:#e09a0f;s:2;f:30;p:500"); STL(Hauteur1,"c:#007c00;s:2;f:30;p:500"); STL(Hauteur2,"c:#1600ff;s:2;f:30;p:500"); SetCoordsStyle("3Dmode:true;isAxis:false;isGrid:true;isOx:true;isOy:true;isLockOx:false;isLockOy:false;centerZoom:true;color:#111111;fontSize:18;axisWidth:1;gridWidth:0.1");