home *** CD-ROM | disk | FTP | other *** search
/ SGI Developer Toolbox 6.1 / SGI Developer Toolbox 6.1 - Disc 4.iso / src / tutorials / geometer / Theorems / curves / inverseofconic.T < prev    next >
Encoding:
Text File  |  1994-08-02  |  463 b   |  13 lines
  1. .geometry "version 0.1";
  2. v1 = .free(0.0108696, 0.00271739, .L0, "1");
  3. v2 = .free(0.211957, 0.00815217, .L0);
  4. v3 = .free(-0.0788044, -0.255435, .L0);
  5. c1 = .c.vv(v2, v3, .L0);
  6. v4 = .free(0.0625, 0.228261, .L0, "4");
  7. v5 = .free(0.290761, 0.508152, .L0, "5");
  8. v6 = .free(0.320652, -0.127717, .L0, "2");
  9. v7 = .free(0.415761, 0.160326, .L0, "3");
  10. cc1 = .conic.vvvvv(v1, v6, v7, v5, v4, .red);
  11. vvv = .vonconic(cc1, 0.0998992, -0.29385);
  12. vv1 = .v.vcinv(vvv, c1, .smear);
  13.