home *** CD-ROM | disk | FTP | other *** search
/ Freelog 3 / Freelog003.iso / Logs / Educ / WinGeom / CARRETOU.GEO < prev    next >
Text File  |  1994-02-25  |  1KB  |  152 lines
  1. repΦre -10 10 -10 10
  2. quadriller 0
  3. def_macro 'CarrΘ',carre
  4. obj_initiaux ppp
  5. obj_finaux ssss
  6.  
  7.   nomme E
  8.   nomme A
  9.   nomme C
  10.   A
  11.   C
  12.   milieu
  13.   nomme B
  14.   B
  15.   E
  16.   homothΘtie -1
  17.   nomme D
  18.   B
  19.   E
  20.   rotation 1.570796
  21.   nomme F
  22.   B
  23.   D
  24.   rotation 1.570796
  25.   nomme G
  26.   G
  27.   E
  28.   segment
  29.   nomme _s0
  30.   D
  31.   G
  32.   segment
  33.   nomme _s1
  34.   F
  35.   D
  36.   segment
  37.   nomme _s2
  38.   E
  39.   F
  40.   segment
  41.   nomme _s3
  42.   _s3
  43.   _s2
  44.   _s1
  45.   _s0
  46.  
  47. fin_macro
  48.  
  49. point A(-2.02;-3.7)
  50. point B(4.35;-3.7)
  51. B
  52. A
  53. rotation -1.57079
  54. nomme C
  55. A
  56. B
  57. rotation 1.570796
  58. nomme D
  59. D
  60. A
  61. segment
  62. nomme _s0
  63. C
  64. D
  65. segment
  66. nomme _s1
  67. B
  68. C
  69. segment
  70. nomme _s2
  71. A
  72. B
  73. segment
  74. nomme _s3
  75. _s1
  76. pt_sur_objet E _s1 0.850980
  77. C
  78. A
  79. E
  80. macro carre
  81. nomme _s4
  82. nomme _s5
  83. nomme _s6
  84. nomme _s7
  85. E
  86. C
  87. cercle_centre_pt
  88. nomme C0
  89. _s7
  90. C0
  91. inter
  92. nomme_inter F,G
  93. _s6
  94. _s5
  95. inter
  96. nomme_inter G
  97. E
  98. G
  99. F
  100. macro carre
  101. nomme _s8
  102. nomme _s9
  103. nomme _s10
  104. nomme _s11
  105. _s10
  106. _s9
  107. inter
  108. nomme_inter H
  109. F
  110. E
  111. cercle_centre_pt
  112. nomme C1
  113. _s11
  114. C1
  115. inter
  116. nomme_inter I,J
  117. F
  118. H
  119. I
  120. macro carre
  121. nomme _s12
  122. nomme _s13
  123. nomme _s14
  124. nomme _s15
  125. _s14
  126. _s13
  127. inter
  128. nomme_inter J
  129. I
  130. F
  131. cercle_centre_pt
  132. nomme C2
  133. _s15
  134. C2
  135. inter
  136. nomme_inter K,L
  137. I
  138. J
  139. K
  140. macro carre
  141. nomme _s16
  142. nomme _s17
  143. nomme _s18
  144. nomme _s19
  145. C0
  146. gommer
  147. C1
  148. gommer
  149. C2
  150. gommer
  151. fin.
  152.