home *** CD-ROM | disk | FTP | other *** search
/ Freelog 3 / Freelog003.iso / Logs / Educ / WinGeom / CISSOIDE.GEO < prev    next >
Text File  |  1993-05-12  |  905b  |  64 lines
  1. def_macro 'Cissoide A C0 B',cissoide_a_c0_b
  2. obj_initiaux pcp
  3. obj_finaux p
  4.  
  5.   nomme D
  6.   nomme C0
  7.   nomme A
  8.   A
  9.   D
  10.   droite_2_pts
  11.   nomme D0
  12.   D0
  13.   C0
  14.   inter
  15.   nomme_inter B,C
  16.   A
  17.   D
  18.   milieu
  19.   nomme E
  20.   E
  21.   C
  22.   homothΘtie -1
  23.   nomme F
  24.   F
  25.  
  26. fin_macro
  27.  
  28. point A(-2.05;-2.8)
  29. point B(1.925;-2.67)
  30. point C(4.325;-0.62)
  31. B
  32. C
  33. cercle_centre_pt
  34. nomme C0
  35. point D(4.8;-6.42)
  36. point E(3.55;2.4)
  37. E
  38. D
  39. droite_2_pts
  40. nomme D0
  41. commente 'A, C0 et D0 dΘfinissent la cisso∩de'
  42. A
  43. D
  44. droite_2_pts
  45. nomme D1
  46. D1
  47. C0
  48. inter
  49. nomme_inter F,G
  50. A
  51. C0
  52. D
  53. macro cissoide_a_c0_b
  54. nomme H
  55. commente 'Par un point D de D0 nous menons la droite AD qui coupe C0 en F et G. De A nous reportons AH=GD. H est un point de la cisso∩de'
  56. A
  57. C0
  58. D0
  59. rΘpΦte
  60. macro cissoide_a_c0_b
  61. nomme I
  62. commente 'En dΘplaτant A ou D ou E nous obtenons les diffΘrentes formes de cisso∩de de droite et de cercle'
  63. fin.
  64.