Fichier regle.mp (figure 1) — Modifié le 24 Mars 2008 à 16 h 13

regle.mp (figure 1)
Source

prologues:=2;

input geometriesyr16
input outilssyr

figure(0,0,10u,10u);
pair A,B;
A=u*(1,3);
B-A=u*(6,2);
trace regle(A,B,1);
fin;

figure(0,0,15u,10u);
pair A,B;
A=u*(1,8);
B-A=u*(10,-2);
trace regle(A,B,1);
fin;

end