/* Droite définie par équation cartésienne ax+by+c=0  dans le repère R
   Syntaxe : line line(coordsys R=currentcoordsys, real a, real b, real c)
   ou
   Droite définie par équation réduite y=mx+p dans le repère R
   Syntaxe : line line(coordsys R=currentcoordsys, real slope, real origin)
*/

// 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 x + 2y - 3 = 0
line d1=line(1,3,-3);
draw(d1,blue);
// Tracé de la droite d'équation y = 2x - 3
line d2=line(2,-3);
draw(d2,.8green);
// Point d'intersection des deux droites
dot("I",intersectionpoint(d1,d2),N,.7red);

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