// Teste que les mediatrices sont concourrantes, ici avec 6 parametres
assume(Ax=-1);
assume(Ay=-1);
A:=point(Ax,Ay);
assume(Bx=0.5);
assume(By=1);
B:=point(Bx,By);
assume(Cx=1);
assume(Cy=-1);
C:=point(Cx,Cy);
triangle(A,B,C);
a:=mediatrice(A,B);
b:=mediatrice(B,C);
c:=mediatrice(C,A);
M:=head(inter(a,b));
N:=head(inter(b,c));
normal(longueur2(M,N));