/* Une autre routine pour définir une conique est
       conic conic(point M1, point M2, point M3, point M4, point M5)
   qui retourne la conique non dégénérée passant par les 5 points.
*/
import geometry;
size(7.5cm,0);

show(currentcoordsys,dotpen=invisible);

point pA=(0,1), pB=(1,-2), pC=(2,-3), pD=(3,-2), pE=(4,1),
      pF=(1,-1.5), pG=(1,2);
dot(pA^^pB^^pC^^pD^^pE^^pF^^pG);

conic c1=conic(pA,pB,pC,pD,pE);
draw(c1,.8bp+blue);

conic c2=conic(pA,pB,pC,pD,pF);
draw(c2,.8bp+red);

conic c3=conic(pA,pB,pC,pD,pG);
draw(c3,.8bp+.8green);

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