// Macros : $macros={}; $macros["CdBaryDrte"]={ name:"CdBary Drte", parameters:["expression","expression"], exec: function (CbN,CbM){ DbMN=Expression("DbMN","","","","[CbN[1]*CbM[2]-CbM[1]*CbN[2],CbN[2]*CbM[0]-CbM[2]*CbN[0],CbN[0]*CbM[1]-CbM[0]*CbN[1]]","-13.0125","-4.8625"); STL(DbMN,"c:#b40000;s:7;sn:true;f:18;p:4;cL:200;cPT:YzojNzgwMDEzO3M6NjtmOjE4"); return [DbMN]; }}; $macros["CoordBary"]={ name:"Coord Bary", parameters:["point","point","point","point"], exec: function (A,B,C,M){ L3=Line("L3",A,C); L2=Line("L2",A,B); L1=Line("L1",B,C); Par2=Parallel("Par2",L3,M); Par1=Parallel("Par1",L2,M); U=OrderedIntersection("U",Par1,L1,0); V=OrderedIntersection("V",Par2,L1,0); CbM=Expression("CbM","","","","[(x(V)-x(U))/(x(C)-x(B)),(x(C)-x(V))/(x(C)-x(B)),(x(U)-x(B))/(x(C)-x(B))]","-12.0125","4.6375"); STL(CbM,"c:#54394f;s:7;sn:true;f:24;p:4;cL:200;cPT:YzojNzgwMDEzO3M6MTA7ZjozMA=="); return [CbM]; }}; // Coordinates System : SetCoords(449.5,182.5,40); // Geometry : A=Point("A",-2.6625,2.0375); E1=Expression("E1","Equation barycentrique (tangentielle) des droites ","","","11","-10.9875","3.8125"); C=Point("C",-0.2625,-3.1375); M=Point("M",0.4597240223269921,-0.9723720945920299); B=Point("B",-5.8375,-1.9125); N=Point("N",-8.305039509499233,0.9535176500693382); L1=Line("L1",B,C); L21=Line("L21",A,B); J=MidPoint("J",B,A); L11=Line("L11",B,C); L2=Line("L2",A,B); L3=Line("L3",A,C); K=MidPoint("K",A,C); L31=Line("L31",A,C); L7=Line("L7",J,K); Par2=Parallel("Par2",L3,M); Par11=Parallel("Par11",L21,N); Par5=Parallel("Par5",L3,B); Par21=Parallel("Par21",L31,N); Par1=Parallel("Par1",L2,M); Par4=Parallel("Par4",L2,C); Par3=Parallel("Par3",L1,A); V=OrderedIntersection("V",Par2,L1,0); U=OrderedIntersection("U",Par1,L1,0); P3=OrderedIntersection("P3",Par5,Par4,0); P2=OrderedIntersection("P2",Par4,Par3,0); P1=OrderedIntersection("P1",Par5,Par3,0); V1=OrderedIntersection("V1",Par21,L11,0); U1=OrderedIntersection("U1",Par11,L11,0); CbM=Expression("CbM","","","","[(x(V)-x(U))/(x(C)-x(B)),(x(C)-x(V))/(x(C)-x(B)),(x(U)-x(B))/(x(C)-x(B))]","-10.9875","-5.1875"); L6=Line("L6",P1,C); CbN=Expression("CbN","","","","[(x(V1)-x(U1))/(x(C)-x(B)),(x(C)-x(V1))/(x(C)-x(B)),(x(U1)-x(B))/(x(C)-x(B))]","-10.9875","-4.4375"); L5=Line("L5",B,P2); L4=Line("L4",A,P3); P4=OrderedIntersection("P4",L6,L5,0); DbMN=Expression("DbMN","","","","[CbN[1]*CbM[2]-CbM[1]*CbN[2],CbN[2]*CbM[0]-CbM[2]*CbN[0],CbN[0]*CbM[1]-CbM[0]*CbN[1]]","-10.9875","-6.1875"); // Styles : STL(A,"c:#0000b2;o:1;s:4;sn:true;f:18"); STL(E1,"c:#b40000;s:7;f:16;p:-1;cL:200;cPT:YzojNzgwMDEzO3M6MTA7ZjozMA=="); STL(C,"c:#0000b2;o:1;s:4;sn:true;f:18"); STL(M,"c:#b40000;o:1;s:4;sn:true;f:18;mg:[Par3,10],[Par4,10],[Par5,10],[L4,10],[L6,10],[L5,10],[L1,10],[L3,10],[L2,10],[L7,10]"); STL(B,"c:#0000b2;o:1;s:4;sn:true;f:18"); STL(N,"c:#b40000;o:1;s:4;sn:true;f:18;mg:[Par3,10],[Par5,10],[Par4,10],[L3,10],[L1,10],[L2,10],[L4,10],[L5,10],[L7,10],[L6,10]"); STL(L1,"c:#0000b2;s:1;f:30;p:0"); STL(L21,"c:#780013;h:2;s:1;f:30;p:0"); STL(J,"c:#007c00;s:4;sn:true;f:18"); STL(L11,"c:#780013;h:2;s:1;f:30;p:0"); STL(L2,"c:#0000b2;s:1;f:30;p:0"); STL(L3,"c:#0000b2;s:1;f:30;p:0"); STL(K,"c:#007c00;s:4;sn:true;f:18"); STL(L31,"c:#780013;h:2;s:1;f:30;p:0"); STL(L7,"c:#ff00d3;s:1;f:30;p:0"); STL(Par2,"c:#780013;h:1;s:1;f:30;p:0"); STL(Par11,"c:#780013;h:2;s:1;f:30;p:0"); STL(Par5,"c:#966400;s:1;f:30;p:0"); STL(Par21,"c:#780013;h:2;s:1;f:30;p:0"); STL(Par1,"c:#780013;h:1;s:1;f:30;p:0"); STL(Par4,"c:#966400;s:1;f:30;p:0"); STL(Par3,"c:#966400;s:1;f:30;p:0"); STL(V,"c:#0000b2;h:1;s:4;sn:true;f:18"); STL(U,"c:#0000b2;h:1;s:4;sn:true;f:18"); STL(P3,"c:#0000b2;h:1;s:4;f:18"); STL(P2,"c:#0000b2;h:1;s:4;f:18"); STL(P1,"c:#0000b2;h:1;s:4;f:18"); STL(V1,"c:#0000b2;h:2;s:4;f:18"); STL(U1,"c:#0000b2;h:2;s:4;f:18"); STL(CbM,"c:#0026ff;s:7;sn:true;f:15;p:4;cL:200;cPT:YzojNzgwMDEzO3M6NDtmOjE4"); STL(L6,"c:#007c00;s:1;f:30;p:0"); STL(CbN,"c:#0026ff;s:7;sn:true;f:15;p:4;cL:200;cPT:YzojNzgwMDEzO3M6NDtmOjE4"); STL(L5,"c:#007c00;s:1;f:30;p:0"); STL(L4,"c:#007c00;s:1;f:30;p:0"); STL(P4,"c:#0000b2;h:1;s:4;f:18"); STL(DbMN,"c:#b40000;s:7;sn:true;f:15;p:4;cL:200;cPT:YzojNzgwMDEzO3M6NDtmOjE4"); SetCoordsStyle("isAxis:false;isGrid:true;isOx:true;isOy:true;isLockOx:false;isLockOy:false;centerZoom:false;color:#111111;fontSize:18;axisWidth:1;gridWidth:0.1");