home *** CD-ROM | disk | FTP | other *** search
/ Freelog 3 / Freelog003.iso / Logs / Educ / WinGeom / ORTHOBAL.GEO < prev    next >
Text File  |  1993-03-28  |  544b  |  48 lines

  1. point A(-2.28;4.437)
  2. point B(4.343;5.062)
  3. point C(6.562;1.125)
  4. point D(-0.87;-0.56)
  5.  
  6. def_macro 'Orthocentre d''un triangle',orthocentre_dun_tria
  7. obj_initiaux ppp
  8. obj_finaux p
  9.  
  10.   nomme C
  11.   nomme B
  12.   nomme A
  13.   A
  14.   B
  15.   droite_2_pts
  16.   nomme D0
  17.   B
  18.   C
  19.   droite_2_pts
  20.   nomme D1
  21.   D1
  22.   A
  23.   droite_perpendiculaire
  24.   nomme D2
  25.   D0
  26.   C
  27.   droite_perpendiculaire
  28.   nomme D3
  29.   D3
  30.   D2
  31.   inter
  32.   nomme_inter D
  33.   D
  34.  
  35. fin_macro
  36.  
  37. A
  38. B
  39. cercle_diamΦtre
  40. nomme C0
  41. C0
  42. rΘpΦte
  43. C
  44. D
  45. macro orthocentre_dun_tria
  46. nomme E
  47. fin.
  48.