/* Droite parallèle à une droite donnée
   passant par un point donné
*/

// import geometry_dev; // extension devenue l'extension geometry officielle
import geometry;        // le 12/05/09, dans la version 1.71 d'asymptote. :-))

size(7cm,0);

// Affichage du repère courant
show(currentcoordsys);
// Tracé de la droite d'équation y = 2x - 3
line d1=line(2,-3);
draw(d1,.8blue);
// Point A de coordonnées (4,1)
point pA=(4,1);
dot("A",pA);
// Parallèle à d1 passant par A
line d2=parallel(pA,d1);
draw(d2,.8green);

draw(box((-2,-2),(5,4)),invisible);