20 Aug 2007

## Asymptote using geometry.asy – fig0340

 (Compiled with Asymptote version 2.14svn-r5318)
```
import geometry;
size(10cm,0);

// currentcoordsys=cartesiansystem((2,1),i=(1,0.5),j=(-0.25,.75));
// show(currentcoordsys);

point F1=(1,0);
point F2=(4,1);
dot("\$F_1\$",F1,W);
dot("\$F_2\$",F2);

// Enlarge the bounding box of the current picture
draw(box((0,-2), (5,4)), invisible);

/* View the definition of hyperbola hyperbola(point,point,real,bool) */
hyperbola h=hyperbola(F1, F2, 0.9);
draw(h, linewidth(3mm));
draw(h.A1, grey);
draw(h.A2, grey);
draw(h.D1);
draw(h.D2);

/* View the definition of hyperbola hyperbola(point,real,real,real) */
draw(hyperbola(h.C, h.a, h.b, h.angle), 2mm+green);

/* View the definition of hyperbola hyperbola(bqe) */
draw(hyperbola(equation(h)), 1mm+red);

/* View the definition of hyperbola conj(hyperbola) */
hyperbola ch=conj(h);
draw(ch, blue);
draw(ch.A1, 0.5blue);
draw(ch.A2, 0.5blue);
draw(ch.D1);
draw(ch.D2);
dot("\${V'}_1\$", ch.V1, NE);
dot("\${V'}_2\$", ch.V2, SW);
dot("\${F'}_1\$", ch.F1, S);
dot("\${F'}_2\$", ch.F2, N);

dot("\$V_1\$", h.V1, 2E, linewidth(2mm));
dot("\$V_2\$", h.V2, 2W, linewidth(2mm));

```

Étiquettes : , , , , ,