couleur(noir); S:=point(0); J:=point(1); I:=point(2+2*i); A:=point(4+6*i); droite(A,J); droite(S,I); droite(S,J); M:=element(droite(S,I),-3/2); N:=inter_droite(droite(A,M),droite(S,J)); droite(A,M); segment(I,N); segment(J,M); K:=inter_droite(droite(I,N),droite(J,M)); couleur(rouge); L:=lieu(K,M); B:=conj_harmonique(I,J,A); droite(S,B);
On remarque que L est la droite SB.