// Macros :
$macros={};
$macros["Parabole3pts"]={
	name:"Parabole3pts",
	parameters:["point","point","point"],
	exec:
	function (A,B,C){
Den=Expression("Den","Den=","","","x(A)(x(C)^2-x(B)^2)+x(B)x(C)*(x(B)-x(C))+x(A)^2*(x(B)-x(C))","-12.291987897706957","4.986348565400363");
NumB=Expression("NumB","NumB = ","","","x(A)^2*(y(C)-y(B))-x(B)^2*y(C)+y(B)*x(C)^2+y(A)*(x(B)^2-x(C)^2)","-0.1875217050304001","4.986348565400363");
NumC=Expression("NumC","NumC = ","","","x(A)*(y(B)x(C)^2-x(B)^2*y(C))+x(A)^2*(x(B)y(C)-y(B)x(C))+y(A)(x(B)^2*x(C)-x(B)x(C)^2)","-16.225939410326838","7.104630149118761");
NumA=Expression("NumA","NumA = ","","","x(A)*(y(C)-y(B))-x(B)*y(C)+y(B)*x(C)+y(A)*(x(B)-x(C))","-5.937143146551764","6.499406839484933");
c=Expression("c","","","","NumC/Den","-0.792745014664228","5.894183529851105");
b=Expression("b","","","","-NumB/Den","-1.0953566694811419","7.104630149118761");
a=Expression("a","","","","NumA/Den","-0.792745014664228","8.315076768386417");
f=Expression("f","f(x) =","","","a*x^2+b*x+c","-9.265871349537818","8.617688423203331");
f1=Curvus("f1","","","a*x^2+b*x+c");
STL(c,"c:#0000b2;s:7;sn:true;f:18;p:4;cL:200;cPT:YzojYjQwMDAwO3M6MTA7ZjoxNg==");
STL(b,"c:#0000b2;s:7;sn:true;f:18;p:4;cL:200;cPT:YzojYjQwMDAwO3M6MTA7ZjoxNg==");
STL(a,"c:#0000b2;s:7;sn:true;f:18;p:4;cL:200;cPT:YzojYjQwMDAwO3M6MTA7ZjoxNg==");
STL(f,"c:#780013;s:7;sn:true;f:18;p:4;cL:200;cPT:YzojYjQwMDAwO3M6MTA7ZjoxNg==");
STL(f1,"c:#109b10;s:2.5;f:30;p:0");
return [c,b,a,f,f1];
}};

// Coordinates System :
SetCoords(506.1967773562408,315.7771487326621,33.04565386303511);


// Geometry :
C=Point("C",2.8083336776570476,6.680973832375082);
B=Point("B",-8.690909205385681,4.804781572510215);
P=Point("P",-10.809190789104079,-7.148378792757885);
Q=Point("Q",-3.576772238979836,-3.0025991217661643);
R=Point("R",4.049041462406395,-7.814124433355095);
A=Point("A",-5.331919836917937,1.7181426933776929);
NumC=Expression("NumC","NumC = ","","","x(A)*(y(B)x(C)^2-x(B)^2*y(C))+x(A)^2*(x(B)y(C)-y(B)x(C))+y(A)(x(B)^2*x(C)-x(B)x(C)^2)","-11.989376242890044","6.5296680049666245");
Den1=Expression("Den1","Den=","","","x(P)(x(R)^2-x(Q)^2)+x(Q)x(R)*(x(Q)-x(R))+x(P)^2*(x(Q)-x(R))","-8.055424730270163","4.411386421248227");
NumC1=Expression("NumC1","NumC = ","","","x(P)*(y(Q)x(R)^2-x(Q)^2*y(R))+x(P)^2*(x(Q)y(R)-y(Q)x(R))+y(P)(x(Q)^2*x(R)-x(Q)x(R)^2)","-11.989376242890044","6.5296680049666245");
NumB=Expression("NumB","NumB = ","","","x(A)^2*(y(C)-y(B))-x(B)^2*y(C)+y(B)*x(C)^2+y(A)*(x(B)^2-x(C)^2)","4.049041462406395","4.411386421248227");
NumB1=Expression("NumB1","NumB = ","","","x(P)^2*(y(R)-y(Q))-x(Q)^2*y(R)+y(Q)*x(R)^2+y(P)*(x(Q)^2-x(R)^2)","4.049041462406395","4.411386421248227");
Den=Expression("Den","Den=","","","x(A)(x(C)^2-x(B)^2)+x(B)x(C)*(x(B)-x(C))+x(A)^2*(x(B)-x(C))","-8.055424730270163","4.411386421248227");
NumA1=Expression("NumA1","NumA = ","","","x(P)*(y(R)-y(Q))-x(Q)*y(R)+y(Q)*x(R)+y(P)*(x(Q)-x(R))","-1.7005799791149698","5.924444695332797");
NumA=Expression("NumA","NumA = ","","","x(A)*(y(C)-y(B))-x(B)*y(C)+y(B)*x(C)+y(A)*(x(B)-x(C))","-1.7005799791149698","5.924444695332797");
b1=Expression("b1","","","","-NumB/Den","-13.805046171791528","4.713998076065141");
a2=Expression("a2","","","","NumA1/Den1","-6.542366456185593","6.22705635014971");
a1=Expression("a1","","","","NumA/Den","-13.805046171791528","5.924444695332797");
c2=Expression("c2","","","","NumC1/Den1","-6.542366456185593","4.411386421248227");
c1=Expression("c1","","","","NumC/Den","-13.805046171791528","3.503551456797485");
b2=Expression("b2","","","","-NumB1/Den1","-6.542366456185593","5.3192213856989685");
f2=Expression("f2","f(x) =","","","a2*x^2+b2*x+c2","-6.542366456185593","7.134891314600452");
t=Expression("t","","","","a1*a2*((b2-b1)^2-4*(a2-a1)*(c2-c1))","-13.805046171791528","-1.9434583299069657");
h1=Curvus("h1","","","a1*x^2+b1*x+c1");
f1=Expression("f1","f(x) =","","","a1*x^2+b1*x+c1","-13.805046171791528","7.134891314600452");
h2=Curvus("h2","","","a2*x^2+b2*x+c2");
x2=Expression("x2","","","","-(sqrt(t)+a1*(b2-b1))/(2*a1*(a2-a1))","-13.805046171791528","-3.7591282588084494");
x1=Expression("x1","","","","(sqrt(t)-a1*(b2-b1))/(2*a1*(a2-a1))","-13.805046171791528","-2.851293294357707");
M=Point("M","[x1,f1(x1)]","0");
U=Point("U","[x2,f1(x2)]","0");
xN=Expression("xN","","","","(2*a1*x1+b1-b2)/(2*a2)","-9.568483004354732","-1.9434583299069657");
xV=Expression("xV","","","","(2*a1*x2+b1-b2)/(2*a2)","-9.568483004354732","-2.851293294357707");
N=Point("N","[xN,f2(xN)]","0");
V=Point("V","[xV,f2(xV)]","0");
L1=Line("L1",M,N);
L2=Line("L2",U,V);


// Styles :
STL(C,"c:#b40000;o:1;s:6;sn:true;f:16");
STL(B,"c:#b40000;o:1;s:6;sn:true;f:16");
STL(P,"c:#007c00;o:1;s:6;sn:true;f:16");
STL(Q,"c:#007c00;o:1;s:6;sn:true;f:16;np:4.754031559483278");
STL(R,"c:#007c00;o:1;s:6;sn:true;f:16;np:4.155789662374467");
STL(A,"c:#b40000;o:1;s:6;sn:true;f:16;np:0.982793723247329");
STL(NumC,"c:#457e55;h:1;s:7;sn:true;f:15;p:4;cL:200;cPT:YzojYjQwMDAwO2g6MTtzOjEwO2Y6MTY=");
STL(Den1,"c:#457e55;h:2;s:7;f:15;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MTY=");
STL(NumC1,"c:#457e55;h:2;s:7;f:15;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MTY=");
STL(NumB,"c:#457e55;h:1;s:7;sn:true;f:15;p:4;cL:200;cPT:YzojYjQwMDAwO2g6MTtzOjEwO2Y6MTY=");
STL(NumB1,"c:#457e55;h:2;s:7;f:15;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MTY=");
STL(Den,"c:#457e55;h:1;s:7;sn:true;f:15;p:4;cL:200;cPT:YzojYjQwMDAwO2g6MTtzOjEwO2Y6MTY=");
STL(NumA1,"c:#457e55;h:2;s:7;f:15;p:4;cL:200;cPT:YzojNzgwMDEzO2g6MjtzOjEwO2Y6MTY=");
STL(NumA,"c:#457e55;h:1;s:7;sn:true;f:15;p:4;cL:200;cPT:YzojYjQwMDAwO2g6MTtzOjEwO2Y6MTY=");
STL(b1,"c:#0000b2;s:7;sn:true;f:15;p:4;cL:200;cPT:YzojYjQwMDAwO3M6MTA7ZjoxNg==");
STL(a2,"c:#457e55;s:7;sn:true;f:15;p:4;cL:200;cPT:YzojYjQwMDAwO3M6MTA7ZjoxNg==");
STL(a1,"c:#0000b2;s:7;sn:true;f:15;p:4;cL:200;cPT:YzojYjQwMDAwO3M6MTA7ZjoxNg==");
STL(c2,"c:#457e55;s:7;sn:true;f:15;p:4;cL:200;cPT:YzojYjQwMDAwO3M6MTA7ZjoxNg==");
STL(c1,"c:#0000b2;s:7;sn:true;f:15;p:4;cL:200;cPT:YzojYjQwMDAwO3M6MTA7ZjoxNg==");
STL(b2,"c:#457e55;s:7;sn:true;f:15;p:4;cL:200;cPT:YzojYjQwMDAwO3M6MTA7ZjoxNg==");
STL(f2,"c:#457e55;s:7;sn:true;f:15;p:4;cL:200;cPT:YzojYjQwMDAwO3M6MTA7ZjoxNg==");
STL(t,"c:#966400;s:7;sn:true;f:17;p:4;cL:200;cPT:YzojNzgwMDEzO3M6MTA7ZjoxNg==");
STL(h1,"c:#0000b2;s:2.5;sn:true;f:30;p:0");
STL(f1,"c:#0000b2;s:7;sn:true;f:15;p:4;cL:200;cPT:YzojYjQwMDAwO3M6MTA7ZjoxNg==");
STL(h2,"c:#109b10;s:2.5;sn:true;f:30;p:0");
STL(x2,"c:#966400;s:7;sn:true;f:15;p:4;cL:200;cPT:YzojNzgwMDEzO3M6MTA7ZjoxNg==");
STL(x1,"c:#966400;s:7;sn:true;f:15;p:4;cL:200;cPT:YzojNzgwMDEzO3M6MTA7ZjoxNg==");
STL(M,"c:#0000b2;s:6;sn:true;f:16;sp:2");
STL(U,"c:#0000b2;s:6;sn:true;f:16;sp:2");
STL(xN,"c:#007c00;s:7;sn:true;f:15;p:4;cL:200;cPT:YzojNzgwMDEzO3M6MTA7ZjoxNg==");
STL(xV,"c:#007c00;s:7;sn:true;f:15;p:4;cL:200;cPT:YzojNzgwMDEzO3M6MTA7ZjoxNg==");
STL(N,"c:#b40000;s:6;sn:true;f:16;sp:3");
STL(V,"c:#b40000;s:6;sn:true;f:16;sp:3");
STL(L1,"c:#b40000;s:3;f:30;p:0");
STL(L2,"c:#b40000;s:3;f:30;p:0");
SetCoordsStyle("isAxis:true;isGrid:true;isOx:true;isOy:true;isLockOx:false;isLockOy:false;centerZoom:false;color:#111111;fontSize:18;axisWidth:1;gridWidth:0.1");