home *** CD-ROM | disk | FTP | other *** search
/ Freelog 3 / Freelog003.iso / Logs / Educ / WinGeom / INVCO1.GEO < prev    next >
Text File  |  1993-04-14  |  960b  |  84 lines
  1. point A(-0.9;4.425)
  2. point B(-2.4;-0.17)
  3. point C(3.575;-0.22)
  4. point D(-5.9;6.15)
  5. point E(-5.42;-1.77)
  6.  
  7. def_macro 'Inv Coeff Baryc',Inv_Coeff_Baryc
  8. obj_initiaux pppp
  9. obj_finaux p
  10.  
  11.   nomme D
  12.   nomme C
  13.   nomme B
  14.   nomme A
  15.   B
  16.   C
  17.   droite_2_pts
  18.   nomme D1
  19.   A
  20.   D
  21.   droite_2_pts
  22.   nomme D2
  23.   D1
  24.   D2
  25.   inter
  26.   nomme_inter E
  27.   B
  28.   C
  29.   milieu
  30.   nomme F
  31.   F
  32.   E
  33.   homothΘtie -1
  34.   nomme G
  35.   A
  36.   C
  37.   droite_2_pts
  38.   nomme D3
  39.   B
  40.   D
  41.   droite_2_pts
  42.   nomme D4
  43.   D3
  44.   D4
  45.   inter
  46.   nomme_inter H
  47.   A
  48.   C
  49.   milieu
  50.   nomme I
  51.   I
  52.   H
  53.   homothΘtie -1
  54.   nomme J
  55.   A
  56.   G
  57.   droite_2_pts
  58.   nomme D5
  59.   B
  60.   J
  61.   droite_2_pts
  62.   nomme D6
  63.   D5
  64.   D6
  65.   inter
  66.   nomme_inter K
  67.   K
  68.  
  69. fin_macro
  70.  
  71. D
  72. E
  73. droite_2_pts
  74. nomme D0
  75. A
  76. B
  77. C
  78. D0
  79. rΘpΦte
  80. macro Inv_Coeff_Baryc
  81. nomme F
  82. commente 'Voici l''image de la droite D1 dans la transformation qui est une ellipse si D1 ne coupe pas l''ellipse des points sans image '
  83. fin.
  84.