C1:=cercle(A,B); O:=milieu(A,B); t:=element(0..2*pi); C:=element(C1,t); D1:=perpendiculaire(C,droite(o,C)); D2:=parallele(o,droite(A,C)); M:=inter(D1,D2); N:=M[0]; lieu(N,C);