// fltk 7Fl_Tile 26 -51 908 45 20
[
// fltk N4xcas23Comment_Multiline_InputE 26 -51 908 45 20
essayer avec differentes valeurs de [a,b,c] pour voir les differents cas :£a+b+c=0, a+b+c=1, a+b+c<>0 et <>1 en modifiant la ligne 1 du niveau 2 (déplacer le signe //)
,
// fltk N4xcas10Log_OutputE 26 -6 908 0 20

]
,
// fltk 7Fl_Tile 26 -4 908 531 20
[
// fltk N4xcas6FigureE 26 -4 908 530 20
// fltk N4xcas12History_PackE 28 -672 281 1198 20
[
// fltk 7Fl_Tile 50 -672 259 98 20
[
// fltk N4xcas19Multiline_Input_tabE 50 -672 259 70 20
//[a,b,c]:=[1,-3,2];£//[a,b,c]:=[2,-3,2];£[a,b,c]:=[1,-3,1];
,
// fltk N4xcas10Log_OutputE 50 -602 259 1 20

,
// fltk N4xcas10Gen_OutputE 50 -601 259 27 14
[1,-3,1]
]
,
// fltk 7Fl_Tile 50 -572 259 63 20
[
// fltk N4xcas19Multiline_Input_tabE 50 -572 259 35 20
A:=point(2);
,
// fltk N4xcas10Log_OutputE 50 -537 259 1 20

,
// fltk N4xcas10Gen_OutputE 50 -536 259 27 14
point(2,0)
]
,
// fltk 7Fl_Tile 50 -507 259 63 20
[
// fltk N4xcas19Multiline_Input_tabE 50 -507 259 35 20
B:=point(1+2*i);
,
// fltk N4xcas10Log_OutputE 50 -472 259 1 20

,
// fltk N4xcas10Gen_OutputE 50 -471 259 27 14
point(1,2)
]
,
// fltk 7Fl_Tile 50 -442 259 63 20
[
// fltk N4xcas19Multiline_Input_tabE 50 -442 259 35 20
C:=point(-2+i);
,
// fltk N4xcas10Log_OutputE 50 -407 259 1 20

,
// fltk N4xcas10Gen_OutputE 50 -406 259 27 14
point(-2,1)
]
,
// fltk 7Fl_Tile 50 -377 259 58 20
[
// fltk N4xcas19Multiline_Input_tabE 50 -377 259 30 20
O:=point(0,0);
,
// fltk N4xcas10Log_OutputE 50 -347 259 1 20

,
// fltk N4xcas10Gen_OutputE 50 -346 259 27 14
point(0,0)
]
,
// fltk 7Fl_Tile 50 -317 259 63 20
[
// fltk N4xcas19Multiline_Input_tabE 50 -317 259 35 20
E:=cercle(0,1)
,
// fltk N4xcas10Log_OutputE 50 -282 259 1 20

,
// fltk N4xcas10Gen_OutputE 50 -281 259 27 14
cercle(point(0,0),1)
]
,
// fltk 7Fl_Tile 50 -252 259 80 20
[
// fltk N4xcas19Multiline_Input_tabE 50 -252 259 30 20
t:=element(0 .. (2*pi),1.947787443)
,
// fltk N4xcas10Log_OutputE 50 -222 259 1 20

,
// fltk 9Fl_Scroll 50 -221 259 49 14
[
// fltk N4xcas10Gen_OutputE 50 -221 265 27 14
parameter(t,0,2*pi,1.947787443)
,
// fltk 12Fl_Scrollbar 50 122 243 20 14
[]
,
// fltk 12Fl_Scrollbar 293 95 16 33 14
[]
]
]
,
// fltk 7Fl_Tile 50 -170 259 85 20
[
// fltk N4xcas19Multiline_Input_tabE 50 -170 259 35 20
M:=element(E,t)
,
// fltk N4xcas10Log_OutputE 50 -135 259 1 20

,
// fltk 9Fl_Scroll 50 -134 259 49 14
[
// fltk N4xcas10Gen_OutputE 50 -134 340 27 14
point(-0.368124550615,0.929776486708)
,
// fltk 12Fl_Scrollbar 50 127 243 20 14
[]
,
// fltk 12Fl_Scrollbar 293 100 16 33 14
[]
]
]
,
// fltk 7Fl_Tile 50 -83 259 85 20
[
// fltk N4xcas19Multiline_Input_tabE 50 -83 259 35 20
N:=point(affixe(M)+a*(A-M)+b*(B-M)+c*(C-M));
,
// fltk N4xcas10Log_OutputE 50 -48 259 1 20

,
// fltk 9Fl_Scroll 50 -47 259 49 14
[
// fltk N4xcas10Gen_OutputE 50 -47 327 27 14
point(-3.73624910123,-3.14044702658)
,
// fltk 12Fl_Scrollbar 50 127 243 20 14
[]
,
// fltk 12Fl_Scrollbar 293 100 16 33 14
[]
]
]
,
// fltk 7Fl_Tile 50 4 259 106 20
[
// fltk N4xcas19Multiline_Input_tabE 50 4 259 35 20
affichage(lieu(N,M),rouge+line_width_2);
,
// fltk N4xcas10Log_OutputE 50 39 259 44 20
// Warning: a A b B c C  declared as global variable(s)£Equation 0 = 16*x^2+96*x+16*y^2+160*y+480£
,
// fltk N4xcas10Gen_OutputE 50 83 259 27 14
Too large for display
]
,
// fltk 7Fl_Tile 50 112 259 80 20
[
// fltk N4xcas19Multiline_Input_tabE 50 112 259 30 20
P:=a*A+b*B+c*C;segment(0,P)
,
// fltk N4xcas10Log_OutputE 50 142 259 1 20

,
// fltk 9Fl_Scroll 50 143 259 49 14
[
// fltk N4xcas10Gen_OutputE 50 143 379 27 14
[point(-3,-5),polygone(point(0,0),point(-3,-5))]
,
// fltk 12Fl_Scrollbar 50 172 259 20 14
[]
,
// fltk 12Fl_Scrollbar 309 143 16 29 14
[]
]
]
,
// fltk 7Fl_Tile 50 194 259 80 20
[
// fltk N4xcas19Multiline_Input_tabE 50 194 259 30 20
Mt:=affichage(translation(affixe(P),M),quadrant2)
,
// fltk N4xcas10Log_OutputE 50 224 259 1 20

,
// fltk 9Fl_Scroll 50 225 259 49 14
[
// fltk N4xcas10Gen_OutputE 50 225 327 27 14
point(-3.36812455062,-4.07022351329)
,
// fltk 12Fl_Scrollbar 50 254 259 20 14
[]
,
// fltk 12Fl_Scrollbar 309 225 16 29 14
[]
]
]
,
// fltk 7Fl_Tile 50 276 259 58 20
[
// fltk N4xcas19Multiline_Input_tabE 50 276 259 30 20
G:=affichage(barycentre([A,a],[B,b],[C,c]),quadrant3)
,
// fltk N4xcas10Log_OutputE 50 306 259 1 20

,
// fltk N4xcas10Gen_OutputE 50 307 259 27 14
point(3,5)
]
,
// fltk 7Fl_Tile 50 336 259 85 20
[
// fltk N4xcas19Multiline_Input_tabE 50 336 259 35 20
Mh:=affichage(homothetie(G,1-(a+b+c),M),quadrant4);
,
// fltk N4xcas10Log_OutputE 50 371 259 1 20

,
// fltk 9Fl_Scroll 50 372 259 49 14
[
// fltk N4xcas10Gen_OutputE 50 372 327 27 14
point(-3.73624910123,-3.14044702658)
,
// fltk 12Fl_Scrollbar 50 401 259 20 14
[]
,
// fltk 12Fl_Scrollbar 309 372 16 29 14
[]
]
]
,
// fltk 7Fl_Tile 50 423 259 63 20
[
// fltk N4xcas19Multiline_Input_tabE 50 423 259 35 20
homothetie(G,1-(a+b+c),E)
,
// fltk N4xcas10Log_OutputE 50 458 259 1 20

,
// fltk N4xcas10Gen_OutputE 50 459 259 27 14
cercle(point(-3,-5),2)
]
,
// fltk 7Fl_Tile 50 488 259 36 20
[
// fltk N4xcas19Multiline_Input_tabE 50 488 259 35 20

,
// fltk N4xcas10Log_OutputE 50 523 259 1 20

]
]
// fltk N4xcas5Geo2dE 327 22 487 504 20
-8.9244,6.7127,-8.2524,7.5475,[[1,-3,1],pnt(pnt[2,0,"A"]),pnt(pnt[1+2*i,0,"B"]),pnt(pnt[-2+i,0,"C"]),pnt(pnt[0,0,"O"]),pnt(pnt[cercle(pnt[group[-1,1],0,2*pi]),0,"E"]),parameter(t,0,2*pi,1.947787443),pnt(pnt[-0.368124550615+0.929776486708*i,[0,[pnt(pnt[cercle(pnt[group[-1,1],0,2*pi]),0]),1.947787443]],"M"]),pnt(pnt[-3.73624910123-3.14044702658*i,0,"N"]),pnt(pnt[curve(group[pnt[2-(-1-(i)*` t`)/(1-(i)*` t`)+(-1-(i)*` t`)/(1-(i)*` t`)-3*(1+2*i-(-1-(i)*` t`)/(1-(i)*` t`))-2+i-(-1-(i)*` t`)/(1-(i)*` t`),` t`,-4.0,4.0],group[-1.23529411765-4.05882352941*i,-1.24676125848-4.03763109192*i,-1.25906735751-4.01554404145*i,-1.2722940776-3.99251191287*i,-1.28653295129-3.96848137536*i,-1.30188679245-3.94339622642*i,-1.31847133758-3.91719745223*i,-1.33641715728-3.88982338099*i,-1.35587188612-3.86120996441*i,-1.37700282752-3.83129123468*i,-1.4-3.8*i,-1.42507970244-3.76726886291*i,-1.45248868778-3.73303167421*i,-1.48250904704-3.69722557298*i,-1.51546391753-3.65979381443*i,-1.55172413793-3.62068965517*i,-1.59171597633-3.5798816568*i,-1.63593004769-3.5373608903*i,-1.68493150685-3.49315068493*i,-1.7393715342-3.44731977819*i,-1.8-3.4*i,-1.86767895879-3.35140997831*i,-1.94339622642-3.30188679245*i,-2.02827763496-3.25192802057*i,-2.12359550562-3.20224719101*i,-2.23076923077-3.15384615385*i,-2.35135135135-3.10810810811*i,-2.48698884758-3.06691449814*i,-2.6393442623-3.03278688525*i,-2.80995475113-3.00904977376*i,-3-3.0*i,-3.20994475138-3.01104972376*i,-3.43902439024-3.0487804878*i,-3.68456375839-3.12080536913*i,-3.94117647059-3.23529411765*i,-4.2-3.4*i,-4.44827586207-3.62068965517*i,-4.66972477064-3.89908256881*i,-4.84615384615-4.23076923077*i,-4.9603960396-4.60396039604*i,-5.0-5.0*i,-4.9603960396-5.39603960396*i,-4.84615384615-5.76923076923*i,-4.66972477064-6.10091743119*i,-4.44827586207-6.37931034483*i,-4.2-6.6*i,-3.94117647059-6.76470588235*i,-3.68456375839-6.87919463087*i,-3.43902439024-6.9512195122*i,-3.20994475138-6.98895027624*i,-3-7.0*i,-2.80995475113-6.99095022624*i,-2.6393442623-6.96721311475*i,-2.48698884758-6.93308550186*i,-2.35135135135-6.89189189189*i,-2.23076923077-6.84615384615*i,-2.12359550562-6.79775280899*i,-2.02827763496-6.74807197943*i,-1.94339622642-6.69811320755*i,-1.86767895879-6.64859002169*i,-1.8-6.6*i,-1.7393715342-6.55268022181*i,-1.68493150685-6.50684931507*i,-1.63593004769-6.4626391097*i,-1.59171597633-6.4201183432*i,-1.55172413793-6.37931034483*i,-1.51546391753-6.34020618557*i,-1.48250904704-6.30277442702*i,-1.45248868778-6.26696832579*i,-1.42507970244-6.23273113709*i,-1.4-6.2*i,-1.37700282752-6.16870876532*i,-1.35587188612-6.13879003559*i,-1.33641715728-6.11017661901*i,-1.31847133758-6.08280254777*i,-1.30188679245-6.05660377358*i,-1.28653295129-6.03151862464*i,-1.2722940776-6.00748808713*i,-1.25906735751-5.98445595855*i,-1.24676125848-5.96236890808*i]]),65537]),pnt(pnt[-3-5*i,0,"P"]),pnt(pnt[group[0,-3-5*i],0]),pnt(pnt[-3.36812455062-4.07022351329*i,quadrant2,"Mt"]),pnt(pnt[3+5*i,quadrant3,"G"]),pnt(pnt[-3.73624910123-3.14044702658*i,quadrant4,"Mh"]),pnt(pnt[cercle(pnt[group[-5-5*i,-1-5*i],0,2*pi]),0])],-7.0658,7.0658,1,0,0,0,0.5,0.5,1,0,1,2.5,0

,
// fltk N4xcas10Log_OutputE 26 526 908 1 20

]