Rotating Hexagonal Segments and Conic Intersections

Rotating Hexagonal Segments and Conic Intersections
Loading the math board and drawing, please wait…
2018-09-23 17:49
This GeoGebra example dynamically rotates hexagonal segments to reveal how their vertices trace paths that intersect conic sections, specifically an ellipse. The core mathematical concepts include rotation transformations, quadratic functions and equations, orthocenters, and the geometric properties of ellipses. The construction uses GeoGebra commands such as Vector, Circle, and Rotate, along with objects like ns, u, v, d2, length, r, d, button1, n, m, c, a, and a series of points A1_0 through A7_6. By rotating the hexagonal segments and tracking the vertices, users can observe the changing intersections with the ellipse and quadratic curves. This is suitable for high school or early college students learning about transformations, conic equations, and dynamic geometry, and serves as an interactive tool for teachers to demonstrate rotational symmetry and the relationship between polygons and conic sections.

GeoGebra Commands & Parameters

  1. Vector((0, 0), (2, 0)) → v
  2. Circle((0, 0), 1) → c
  3. Rotate(Segment[(x(A1_{0}) + d2 / 2, y(A1_{0} + lenght / 2)), (x(A1_{0}) + d2 / 2, y(A1_{0} - lenght / 2))], r, A1_{0}) → B1_{0}
  4. Rotate(Segment[(x(A2_{0}) + d2 / 2, y(A2_{0} + lenght / 2)), (x(A2_{0}) + d2 / 2, y(A2_{0} - lenght / 2))], r, A2_{0}) → B2_{0}
  5. Rotate(Segment[(x(A2_{1}) + d2 / 2, y(A2_{1} + lenght / 2)), (x(A2_{1}) + d2 / 2, y(A2_{1} - lenght / 2))], r, A2_{1}) → B2_{1}
  6. Rotate(Segment[(x(A3_{0}) + d2 / 2, y(A3_{0} + lenght / 2)), (x(A3_{0}) + d2 / 2, y(A3_{0} - lenght / 2))], r, A3_{0}) → B3_{0}
  7. Rotate(Segment[(x(A3_{1}) + d2 / 2, y(A3_{1} + lenght / 2)), (x(A3_{1}) + d2 / 2, y(A3_{1} - lenght / 2))], r, A3_{1}) → B3_{1}
  8. Rotate(Segment[(x(A3_{2}) + d2 / 2, y(A3_{2} + lenght / 2)), (x(A3_{2}) + d2 / 2, y(A3_{2} - lenght / 2))], r, A3_{2}) → B3_{2}
  9. Rotate(Segment[(x(A4_{0}) + d2 / 2, y(A4_{0} + lenght / 2)), (x(A4_{0}) + d2 / 2, y(A4_{0} - lenght / 2))], r, A4_{0}) → B4_{0}
  10. Rotate(Segment[(x(A4_{1}) + d2 / 2, y(A4_{1} + lenght / 2)), (x(A4_{1}) + d2 / 2, y(A4_{1} - lenght / 2))], r, A4_{1}) → B4_{1}
  11. Rotate(Segment[(x(A4_{2}) + d2 / 2, y(A4_{2} + lenght / 2)), (x(A4_{2}) + d2 / 2, y(A4_{2} - lenght / 2))], r, A4_{2}) → B4_{2}
  12. Rotate(Segment[(x(A4_{3}) + d2 / 2, y(A4_{3} + lenght / 2)), (x(A4_{3}) + d2 / 2, y(A4_{3} - lenght / 2))], r, A4_{3}) → B4_{3}
  13. Rotate(Segment[(x(A5_{0}) + d2 / 2, y(A5_{0} + lenght / 2)), (x(A5_{0}) + d2 / 2, y(A5_{0} - lenght / 2))], r, A5_{0}) → B5_{0}
  14. Rotate(Segment[(x(A5_{1}) + d2 / 2, y(A5_{1} + lenght / 2)), (x(A5_{1}) + d2 / 2, y(A5_{1} - lenght / 2))], r, A5_{1}) → B5_{1}
  15. Rotate(Segment[(x(A5_{2}) + d2 / 2, y(A5_{2} + lenght / 2)), (x(A5_{2}) + d2 / 2, y(A5_{2} - lenght / 2))], r, A5_{2}) → B5_{2}
  16. Rotate(Segment[(x(A5_{3}) + d2 / 2, y(A5_{3} + lenght / 2)), (x(A5_{3}) + d2 / 2, y(A5_{3} - lenght / 2))], r, A5_{3}) → B5_{3}
  17. Rotate(Segment[(x(A5_{4}) + d2 / 2, y(A5_{4} + lenght / 2)), (x(A5_{4}) + d2 / 2, y(A5_{4} - lenght / 2))], r, A5_{4}) → B5_{4}
  18. Rotate(Segment[(x(A6_{0}) + d2 / 2, y(A6_{0} + lenght / 2)), (x(A6_{0}) + d2 / 2, y(A6_{0} - lenght / 2))], r, A6_{0}) → B6_{0}
  19. Rotate(Segment[(x(A6_{1}) + d2 / 2, y(A6_{1} + lenght / 2)), (x(A6_{1}) + d2 / 2, y(A6_{1} - lenght / 2))], r, A6_{1}) → B6_{1}
  20. Rotate(Segment[(x(A6_{2}) + d2 / 2, y(A6_{2} + lenght / 2)), (x(A6_{2}) + d2 / 2, y(A6_{2} - lenght / 2))], r, A6_{2}) → B6_{2}
  21. Rotate(Segment[(x(A6_{3}) + d2 / 2, y(A6_{3} + lenght / 2)), (x(A6_{3}) + d2 / 2, y(A6_{3} - lenght / 2))], r, A6_{3}) → B6_{3}
  22. Rotate(Segment[(x(A6_{4}) + d2 / 2, y(A6_{4} + lenght / 2)), (x(A6_{4}) + d2 / 2, y(A6_{4} - lenght / 2))], r, A6_{4}) → B6_{4}
  23. Rotate(Segment[(x(A6_{5}) + d2 / 2, y(A6_{5} + lenght / 2)), (x(A6_{5}) + d2 / 2, y(A6_{5} - lenght / 2))], r, A6_{5}) → B6_{5}
  24. Rotate(Segment[(x(A7_{0}) + d2 / 2, y(A7_{0} + lenght / 2)), (x(A7_{0}) + d2 / 2, y(A7_{0} - lenght / 2))], r, A7_{0}) → B7_{0}
  25. Rotate(Segment[(x(A7_{1}) + d2 / 2, y(A7_{1} + lenght / 2)), (x(A7_{1}) + d2 / 2, y(A7_{1} - lenght / 2))], r, A7_{1}) → B7_{1}
  26. Rotate(Segment[(x(A7_{2}) + d2 / 2, y(A7_{2} + lenght / 2)), (x(A7_{2}) + d2 / 2, y(A7_{2} - lenght / 2))], r, A7_{2}) → B7_{2}
  27. Rotate(Segment[(x(A7_{3}) + d2 / 2, y(A7_{3} + lenght / 2)), (x(A7_{3}) + d2 / 2, y(A7_{3} - lenght / 2))], r, A7_{3}) → B7_{3}
  28. Rotate(Segment[(x(A7_{4}) + d2 / 2, y(A7_{4} + lenght / 2)), (x(A7_{4}) + d2 / 2, y(A7_{4} - lenght / 2))], r, A7_{4}) → B7_{4}
  29. Rotate(Segment[(x(A7_{5}) + d2 / 2, y(A7_{5} + lenght / 2)), (x(A7_{5}) + d2 / 2, y(A7_{5} - lenght / 2))], r, A7_{5}) → B7_{5}
  30. Rotate(Segment[(x(A7_{6}) + d2 / 2, y(A7_{6} + lenght / 2)), (x(A7_{6}) + d2 / 2, y(A7_{6} - lenght / 2))], r, A7_{6}) → B7_{6}
  31. Rotate(Segment[(x(A8_{0}) + d2 / 2, y(A8_{0} + lenght / 2)), (x(A8_{0}) + d2 / 2, y(A8_{0} - lenght / 2))], r, A8_{0}) → B8_{0}
  32. Rotate(Segment[(x(A8_{1}) + d2 / 2, y(A8_{1} + lenght / 2)), (x(A8_{1}) + d2 / 2, y(A8_{1} - lenght / 2))], r, A8_{1}) → B8_{1}
  33. Rotate(Segment[(x(A8_{2}) + d2 / 2, y(A8_{2} + lenght / 2)), (x(A8_{2}) + d2 / 2, y(A8_{2} - lenght / 2))], r, A8_{2}) → B8_{2}
  34. Rotate(Segment[(x(A8_{3}) + d2 / 2, y(A8_{3} + lenght / 2)), (x(A8_{3}) + d2 / 2, y(A8_{3} - lenght / 2))], r, A8_{3}) → B8_{3}
  35. Rotate(Segment[(x(A8_{4}) + d2 / 2, y(A8_{4} + lenght / 2)), (x(A8_{4}) + d2 / 2, y(A8_{4} - lenght / 2))], r, A8_{4}) → B8_{4}
  36. Rotate(Segment[(x(A8_{5}) + d2 / 2, y(A8_{5} + lenght / 2)), (x(A8_{5}) + d2 / 2, y(A8_{5} - lenght / 2))], r, A8_{5}) → B8_{5}
  37. Rotate(Segment[(x(A8_{6}) + d2 / 2, y(A8_{6} + lenght / 2)), (x(A8_{6}) + d2 / 2, y(A8_{6} - lenght / 2))], r, A8_{6}) → B8_{6}
  38. Rotate(Segment[(x(A8_{7}) + d2 / 2, y(A8_{7} + lenght / 2)), (x(A8_{7}) + d2 / 2, y(A8_{7} - lenght / 2))], r, A8_{7}) → B8_{7}
  39. Rotate(Segment[(x(A9_{0}) + d2 / 2, y(A9_{0} + lenght / 2)), (x(A9_{0}) + d2 / 2, y(A9_{0} - lenght / 2))], r, A9_{0}) → B9_{0}
  40. Rotate(Segment[(x(A9_{1}) + d2 / 2, y(A9_{1} + lenght / 2)), (x(A9_{1}) + d2 / 2, y(A9_{1} - lenght / 2))], r, A9_{1}) → B9_{1}
  41. Rotate(Segment[(x(A9_{2}) + d2 / 2, y(A9_{2} + lenght / 2)), (x(A9_{2}) + d2 / 2, y(A9_{2} - lenght / 2))], r, A9_{2}) → B9_{2}
  42. Rotate(Segment[(x(A9_{3}) + d2 / 2, y(A9_{3} + lenght / 2)), (x(A9_{3}) + d2 / 2, y(A9_{3} - lenght / 2))], r, A9_{3}) → B9_{3}
  43. Rotate(Segment[(x(A9_{4}) + d2 / 2, y(A9_{4} + lenght / 2)), (x(A9_{4}) + d2 / 2, y(A9_{4} - lenght / 2))], r, A9_{4}) → B9_{4}
  44. Rotate(Segment[(x(A9_{5}) + d2 / 2, y(A9_{5} + lenght / 2)), (x(A9_{5}) + d2 / 2, y(A9_{5} - lenght / 2))], r, A9_{5}) → B9_{5}
  45. Rotate(Segment[(x(A9_{6}) + d2 / 2, y(A9_{6} + lenght / 2)), (x(A9_{6}) + d2 / 2, y(A9_{6} - lenght / 2))], r, A9_{6}) → B9_{6}
  46. Rotate(Segment[(x(A9_{7}) + d2 / 2, y(A9_{7} + lenght / 2)), (x(A9_{7}) + d2 / 2, y(A9_{7} - lenght / 2))], r, A9_{7}) → B9_{7}
  47. Rotate(Segment[(x(A9_{8}) + d2 / 2, y(A9_{8} + lenght / 2)), (x(A9_{8}) + d2 / 2, y(A9_{8} - lenght / 2))], r, A9_{8}) → B9_{8}
  48. Rotate(Segment[Rotate[(x(A1_{0}) + d2 / 2, y(A1_{0} + lenght / 2)), 60°, A1_{0}], Rotate[(x(A1_{0}) + d2 / 2, y(A1_{0} - lenght / 2)), 60°, A1_{0}]], r, A1_{0}) → C1_{0}
  49. Rotate(Segment[Rotate[(x(A2_{0}) + d2 / 2, y(A2_{0} + lenght / 2)), 60°, A2_{0}], Rotate[(x(A2_{0}) + d2 / 2, y(A2_{0} - lenght / 2)), 60°, A2_{0}]], r, A2_{0}) → C2_{0}
  50. Rotate(Segment[Rotate[(x(A2_{1}) + d2 / 2, y(A2_{1} + lenght / 2)), 60°, A2_{1}], Rotate[(x(A2_{1}) + d2 / 2, y(A2_{1} - lenght / 2)), 60°, A2_{1}]], r, A2_{1}) → C2_{1}
  51. Rotate(Segment[Rotate[(x(A3_{0}) + d2 / 2, y(A3_{0} + lenght / 2)), 60°, A3_{0}], Rotate[(x(A3_{0}) + d2 / 2, y(A3_{0} - lenght / 2)), 60°, A3_{0}]], r, A3_{0}) → C3_{0}
  52. Rotate(Segment[Rotate[(x(A3_{1}) + d2 / 2, y(A3_{1} + lenght / 2)), 60°, A3_{1}], Rotate[(x(A3_{1}) + d2 / 2, y(A3_{1} - lenght / 2)), 60°, A3_{1}]], r, A3_{1}) → C3_{1}
  53. Rotate(Segment[Rotate[(x(A3_{2}) + d2 / 2, y(A3_{2} + lenght / 2)), 60°, A3_{2}], Rotate[(x(A3_{2}) + d2 / 2, y(A3_{2} - lenght / 2)), 60°, A3_{2}]], r, A3_{2}) → C3_{2}
  54. Rotate(Segment[Rotate[(x(A4_{0}) + d2 / 2, y(A4_{0} + lenght / 2)), 60°, A4_{0}], Rotate[(x(A4_{0}) + d2 / 2, y(A4_{0} - lenght / 2)), 60°, A4_{0}]], r, A4_{0}) → C4_{0}
  55. Rotate(Segment[Rotate[(x(A4_{1}) + d2 / 2, y(A4_{1} + lenght / 2)), 60°, A4_{1}], Rotate[(x(A4_{1}) + d2 / 2, y(A4_{1} - lenght / 2)), 60°, A4_{1}]], r, A4_{1}) → C4_{1}
  56. Rotate(Segment[Rotate[(x(A4_{2}) + d2 / 2, y(A4_{2} + lenght / 2)), 60°, A4_{2}], Rotate[(x(A4_{2}) + d2 / 2, y(A4_{2} - lenght / 2)), 60°, A4_{2}]], r, A4_{2}) → C4_{2}
  57. Rotate(Segment[Rotate[(x(A4_{3}) + d2 / 2, y(A4_{3} + lenght / 2)), 60°, A4_{3}], Rotate[(x(A4_{3}) + d2 / 2, y(A4_{3} - lenght / 2)), 60°, A4_{3}]], r, A4_{3}) → C4_{3}
  58. Rotate(Segment[Rotate[(x(A5_{0}) + d2 / 2, y(A5_{0} + lenght / 2)), 60°, A5_{0}], Rotate[(x(A5_{0}) + d2 / 2, y(A5_{0} - lenght / 2)), 60°, A5_{0}]], r, A5_{0}) → C5_{0}
  59. Rotate(Segment[Rotate[(x(A5_{1}) + d2 / 2, y(A5_{1} + lenght / 2)), 60°, A5_{1}], Rotate[(x(A5_{1}) + d2 / 2, y(A5_{1} - lenght / 2)), 60°, A5_{1}]], r, A5_{1}) → C5_{1}
  60. Rotate(Segment[Rotate[(x(A5_{2}) + d2 / 2, y(A5_{2} + lenght / 2)), 60°, A5_{2}], Rotate[(x(A5_{2}) + d2 / 2, y(A5_{2} - lenght / 2)), 60°, A5_{2}]], r, A5_{2}) → C5_{2}
  61. Rotate(Segment[Rotate[(x(A5_{3}) + d2 / 2, y(A5_{3} + lenght / 2)), 60°, A5_{3}], Rotate[(x(A5_{3}) + d2 / 2, y(A5_{3} - lenght / 2)), 60°, A5_{3}]], r, A5_{3}) → C5_{3}
  62. Rotate(Segment[Rotate[(x(A5_{4}) + d2 / 2, y(A5_{4} + lenght / 2)), 60°, A5_{4}], Rotate[(x(A5_{4}) + d2 / 2, y(A5_{4} - lenght / 2)), 60°, A5_{4}]], r, A5_{4}) → C5_{4}
  63. Rotate(Segment[Rotate[(x(A6_{0}) + d2 / 2, y(A6_{0} + lenght / 2)), 60°, A6_{0}], Rotate[(x(A6_{0}) + d2 / 2, y(A6_{0} - lenght / 2)), 60°, A6_{0}]], r, A6_{0}) → C6_{0}
  64. Rotate(Segment[Rotate[(x(A6_{1}) + d2 / 2, y(A6_{1} + lenght / 2)), 60°, A6_{1}], Rotate[(x(A6_{1}) + d2 / 2, y(A6_{1} - lenght / 2)), 60°, A6_{1}]], r, A6_{1}) → C6_{1}
  65. Rotate(Segment[Rotate[(x(A6_{2}) + d2 / 2, y(A6_{2} + lenght / 2)), 60°, A6_{2}], Rotate[(x(A6_{2}) + d2 / 2, y(A6_{2} - lenght / 2)), 60°, A6_{2}]], r, A6_{2}) → C6_{2}
  66. Rotate(Segment[Rotate[(x(A6_{3}) + d2 / 2, y(A6_{3} + lenght / 2)), 60°, A6_{3}], Rotate[(x(A6_{3}) + d2 / 2, y(A6_{3} - lenght / 2)), 60°, A6_{3}]], r, A6_{3}) → C6_{3}
  67. Rotate(Segment[Rotate[(x(A6_{4}) + d2 / 2, y(A6_{4} + lenght / 2)), 60°, A6_{4}], Rotate[(x(A6_{4}) + d2 / 2, y(A6_{4} - lenght / 2)), 60°, A6_{4}]], r, A6_{4}) → C6_{4}
  68. Rotate(Segment[Rotate[(x(A6_{5}) + d2 / 2, y(A6_{5} + lenght / 2)), 60°, A6_{5}], Rotate[(x(A6_{5}) + d2 / 2, y(A6_{5} - lenght / 2)), 60°, A6_{5}]], r, A6_{5}) → C6_{5}
  69. Rotate(Segment[Rotate[(x(A7_{0}) + d2 / 2, y(A7_{0} + lenght / 2)), 60°, A7_{0}], Rotate[(x(A7_{0}) + d2 / 2, y(A7_{0} - lenght / 2)), 60°, A7_{0}]], r, A7_{0}) → C7_{0}
  70. Rotate(Segment[Rotate[(x(A7_{1}) + d2 / 2, y(A7_{1} + lenght / 2)), 60°, A7_{1}], Rotate[(x(A7_{1}) + d2 / 2, y(A7_{1} - lenght / 2)), 60°, A7_{1}]], r, A7_{1}) → C7_{1}
  71. Rotate(Segment[Rotate[(x(A7_{2}) + d2 / 2, y(A7_{2} + lenght / 2)), 60°, A7_{2}], Rotate[(x(A7_{2}) + d2 / 2, y(A7_{2} - lenght / 2)), 60°, A7_{2}]], r, A7_{2}) → C7_{2}
  72. Rotate(Segment[Rotate[(x(A7_{3}) + d2 / 2, y(A7_{3} + lenght / 2)), 60°, A7_{3}], Rotate[(x(A7_{3}) + d2 / 2, y(A7_{3} - lenght / 2)), 60°, A7_{3}]], r, A7_{3}) → C7_{3}
  73. Rotate(Segment[Rotate[(x(A7_{4}) + d2 / 2, y(A7_{4} + lenght / 2)), 60°, A7_{4}], Rotate[(x(A7_{4}) + d2 / 2, y(A7_{4} - lenght / 2)), 60°, A7_{4}]], r, A7_{4}) → C7_{4}
  74. Rotate(Segment[Rotate[(x(A7_{5}) + d2 / 2, y(A7_{5} + lenght / 2)), 60°, A7_{5}], Rotate[(x(A7_{5}) + d2 / 2, y(A7_{5} - lenght / 2)), 60°, A7_{5}]], r, A7_{5}) → C7_{5}
  75. Rotate(Segment[Rotate[(x(A7_{6}) + d2 / 2, y(A7_{6} + lenght / 2)), 60°, A7_{6}], Rotate[(x(A7_{6}) + d2 / 2, y(A7_{6} - lenght / 2)), 60°, A7_{6}]], r, A7_{6}) → C7_{6}
  76. Rotate(Segment[Rotate[(x(A8_{0}) + d2 / 2, y(A8_{0} + lenght / 2)), 60°, A8_{0}], Rotate[(x(A8_{0}) + d2 / 2, y(A8_{0} - lenght / 2)), 60°, A8_{0}]], r, A8_{0}) → C8_{0}
  77. Rotate(Segment[Rotate[(x(A8_{1}) + d2 / 2, y(A8_{1} + lenght / 2)), 60°, A8_{1}], Rotate[(x(A8_{1}) + d2 / 2, y(A8_{1} - lenght / 2)), 60°, A8_{1}]], r, A8_{1}) → C8_{1}
  78. Rotate(Segment[Rotate[(x(A8_{2}) + d2 / 2, y(A8_{2} + lenght / 2)), 60°, A8_{2}], Rotate[(x(A8_{2}) + d2 / 2, y(A8_{2} - lenght / 2)), 60°, A8_{2}]], r, A8_{2}) → C8_{2}
  79. Rotate(Segment[Rotate[(x(A8_{3}) + d2 / 2, y(A8_{3} + lenght / 2)), 60°, A8_{3}], Rotate[(x(A8_{3}) + d2 / 2, y(A8_{3} - lenght / 2)), 60°, A8_{3}]], r, A8_{3}) → C8_{3}
  80. Rotate(Segment[Rotate[(x(A8_{4}) + d2 / 2, y(A8_{4} + lenght / 2)), 60°, A8_{4}], Rotate[(x(A8_{4}) + d2 / 2, y(A8_{4} - lenght / 2)), 60°, A8_{4}]], r, A8_{4}) → C8_{4}
  81. Rotate(Segment[Rotate[(x(A8_{5}) + d2 / 2, y(A8_{5} + lenght / 2)), 60°, A8_{5}], Rotate[(x(A8_{5}) + d2 / 2, y(A8_{5} - lenght / 2)), 60°, A8_{5}]], r, A8_{5}) → C8_{5}
  82. Rotate(Segment[Rotate[(x(A8_{6}) + d2 / 2, y(A8_{6} + lenght / 2)), 60°, A8_{6}], Rotate[(x(A8_{6}) + d2 / 2, y(A8_{6} - lenght / 2)), 60°, A8_{6}]], r, A8_{6}) → C8_{6}
  83. Rotate(Segment[Rotate[(x(A8_{7}) + d2 / 2, y(A8_{7} + lenght / 2)), 60°, A8_{7}], Rotate[(x(A8_{7}) + d2 / 2, y(A8_{7} - lenght / 2)), 60°, A8_{7}]], r, A8_{7}) → C8_{7}
  84. Rotate(Segment[Rotate[(x(A9_{0}) + d2 / 2, y(A9_{0} + lenght / 2)), 60°, A9_{0}], Rotate[(x(A9_{0}) + d2 / 2, y(A9_{0} - lenght / 2)), 60°, A9_{0}]], r, A9_{0}) → C9_{0}
  85. Rotate(Segment[Rotate[(x(A9_{1}) + d2 / 2, y(A9_{1} + lenght / 2)), 60°, A9_{1}], Rotate[(x(A9_{1}) + d2 / 2, y(A9_{1} - lenght / 2)), 60°, A9_{1}]], r, A9_{1}) → C9_{1}
  86. Rotate(Segment[Rotate[(x(A9_{2}) + d2 / 2, y(A9_{2} + lenght / 2)), 60°, A9_{2}], Rotate[(x(A9_{2}) + d2 / 2, y(A9_{2} - lenght / 2)), 60°, A9_{2}]], r, A9_{2}) → C9_{2}
  87. Rotate(Segment[Rotate[(x(A9_{3}) + d2 / 2, y(A9_{3} + lenght / 2)), 60°, A9_{3}], Rotate[(x(A9_{3}) + d2 / 2, y(A9_{3} - lenght / 2)), 60°, A9_{3}]], r, A9_{3}) → C9_{3}
  88. Rotate(Segment[Rotate[(x(A9_{4}) + d2 / 2, y(A9_{4} + lenght / 2)), 60°, A9_{4}], Rotate[(x(A9_{4}) + d2 / 2, y(A9_{4} - lenght / 2)), 60°, A9_{4}]], r, A9_{4}) → C9_{4}
  89. Rotate(Segment[Rotate[(x(A9_{5}) + d2 / 2, y(A9_{5} + lenght / 2)), 60°, A9_{5}], Rotate[(x(A9_{5}) + d2 / 2, y(A9_{5} - lenght / 2)), 60°, A9_{5}]], r, A9_{5}) → C9_{5}
  90. Rotate(Segment[Rotate[(x(A9_{6}) + d2 / 2, y(A9_{6} + lenght / 2)), 60°, A9_{6}], Rotate[(x(A9_{6}) + d2 / 2, y(A9_{6} - lenght / 2)), 60°, A9_{6}]], r, A9_{6}) → C9_{6}
  91. Rotate(Segment[Rotate[(x(A9_{7}) + d2 / 2, y(A9_{7} + lenght / 2)), 60°, A9_{7}], Rotate[(x(A9_{7}) + d2 / 2, y(A9_{7} - lenght / 2)), 60°, A9_{7}]], r, A9_{7}) → C9_{7}
  92. Rotate(Segment[Rotate[(x(A9_{8}) + d2 / 2, y(A9_{8} + lenght / 2)), 60°, A9_{8}], Rotate[(x(A9_{8}) + d2 / 2, y(A9_{8} - lenght / 2)), 60°, A9_{8}]], r, A9_{8}) → C9_{8}
  93. Rotate(Segment[Rotate[(x(A1_{0}) + d2 / 2, y(A1_{0} + lenght / 2)), ((2 * 60))°, A1_{0}], Rotate[(x(A1_{0}) + d2 / 2, y(A1_{0} - lenght / 2)), ((2 * 60))°, A1_{0}]], r, A1_{0}) → D1_{0}
  94. Rotate(Segment[Rotate[(x(A2_{0}) + d2 / 2, y(A2_{0} + lenght / 2)), ((2 * 60))°, A2_{0}], Rotate[(x(A2_{0}) + d2 / 2, y(A2_{0} - lenght / 2)), ((2 * 60))°, A2_{0}]], r, A2_{0}) → D2_{0}
  95. Rotate(Segment[Rotate[(x(A2_{1}) + d2 / 2, y(A2_{1} + lenght / 2)), ((2 * 60))°, A2_{1}], Rotate[(x(A2_{1}) + d2 / 2, y(A2_{1} - lenght / 2)), ((2 * 60))°, A2_{1}]], r, A2_{1}) → D2_{1}
  96. Rotate(Segment[Rotate[(x(A3_{0}) + d2 / 2, y(A3_{0} + lenght / 2)), ((2 * 60))°, A3_{0}], Rotate[(x(A3_{0}) + d2 / 2, y(A3_{0} - lenght / 2)), ((2 * 60))°, A3_{0}]], r, A3_{0}) → D3_{0}
  97. Rotate(Segment[Rotate[(x(A3_{1}) + d2 / 2, y(A3_{1} + lenght / 2)), ((2 * 60))°, A3_{1}], Rotate[(x(A3_{1}) + d2 / 2, y(A3_{1} - lenght / 2)), ((2 * 60))°, A3_{1}]], r, A3_{1}) → D3_{1}
  98. Rotate(Segment[Rotate[(x(A3_{2}) + d2 / 2, y(A3_{2} + lenght / 2)), ((2 * 60))°, A3_{2}], Rotate[(x(A3_{2}) + d2 / 2, y(A3_{2} - lenght / 2)), ((2 * 60))°, A3_{2}]], r, A3_{2}) → D3_{2}
  99. Rotate(Segment[Rotate[(x(A4_{0}) + d2 / 2, y(A4_{0} + lenght / 2)), ((2 * 60))°, A4_{0}], Rotate[(x(A4_{0}) + d2 / 2, y(A4_{0} - lenght / 2)), ((2 * 60))°, A4_{0}]], r, A4_{0}) → D4_{0}
  100. Rotate(Segment[Rotate[(x(A4_{1}) + d2 / 2, y(A4_{1} + lenght / 2)), ((2 * 60))°, A4_{1}], Rotate[(x(A4_{1}) + d2 / 2, y(A4_{1} - lenght / 2)), ((2 * 60))°, A4_{1}]], r, A4_{1}) → D4_{1}
  101. Rotate(Segment[Rotate[(x(A4_{2}) + d2 / 2, y(A4_{2} + lenght / 2)), ((2 * 60))°, A4_{2}], Rotate[(x(A4_{2}) + d2 / 2, y(A4_{2} - lenght / 2)), ((2 * 60))°, A4_{2}]], r, A4_{2}) → D4_{2}
  102. Rotate(Segment[Rotate[(x(A4_{3}) + d2 / 2, y(A4_{3} + lenght / 2)), ((2 * 60))°, A4_{3}], Rotate[(x(A4_{3}) + d2 / 2, y(A4_{3} - lenght / 2)), ((2 * 60))°, A4_{3}]], r, A4_{3}) → D4_{3}
  103. Rotate(Segment[Rotate[(x(A5_{0}) + d2 / 2, y(A5_{0} + lenght / 2)), ((2 * 60))°, A5_{0}], Rotate[(x(A5_{0}) + d2 / 2, y(A5_{0} - lenght / 2)), ((2 * 60))°, A5_{0}]], r, A5_{0}) → D5_{0}
  104. Rotate(Segment[Rotate[(x(A5_{1}) + d2 / 2, y(A5_{1} + lenght / 2)), ((2 * 60))°, A5_{1}], Rotate[(x(A5_{1}) + d2 / 2, y(A5_{1} - lenght / 2)), ((2 * 60))°, A5_{1}]], r, A5_{1}) → D5_{1}
  105. Rotate(Segment[Rotate[(x(A5_{2}) + d2 / 2, y(A5_{2} + lenght / 2)), ((2 * 60))°, A5_{2}], Rotate[(x(A5_{2}) + d2 / 2, y(A5_{2} - lenght / 2)), ((2 * 60))°, A5_{2}]], r, A5_{2}) → D5_{2}
  106. Rotate(Segment[Rotate[(x(A5_{3}) + d2 / 2, y(A5_{3} + lenght / 2)), ((2 * 60))°, A5_{3}], Rotate[(x(A5_{3}) + d2 / 2, y(A5_{3} - lenght / 2)), ((2 * 60))°, A5_{3}]], r, A5_{3}) → D5_{3}
  107. Rotate(Segment[Rotate[(x(A5_{4}) + d2 / 2, y(A5_{4} + lenght / 2)), ((2 * 60))°, A5_{4}], Rotate[(x(A5_{4}) + d2 / 2, y(A5_{4} - lenght / 2)), ((2 * 60))°, A5_{4}]], r, A5_{4}) → D5_{4}
  108. Rotate(Segment[Rotate[(x(A6_{0}) + d2 / 2, y(A6_{0} + lenght / 2)), ((2 * 60))°, A6_{0}], Rotate[(x(A6_{0}) + d2 / 2, y(A6_{0} - lenght / 2)), ((2 * 60))°, A6_{0}]], r, A6_{0}) → D6_{0}
  109. Rotate(Segment[Rotate[(x(A6_{1}) + d2 / 2, y(A6_{1} + lenght / 2)), ((2 * 60))°, A6_{1}], Rotate[(x(A6_{1}) + d2 / 2, y(A6_{1} - lenght / 2)), ((2 * 60))°, A6_{1}]], r, A6_{1}) → D6_{1}
  110. Rotate(Segment[Rotate[(x(A6_{2}) + d2 / 2, y(A6_{2} + lenght / 2)), ((2 * 60))°, A6_{2}], Rotate[(x(A6_{2}) + d2 / 2, y(A6_{2} - lenght / 2)), ((2 * 60))°, A6_{2}]], r, A6_{2}) → D6_{2}
  111. Rotate(Segment[Rotate[(x(A6_{3}) + d2 / 2, y(A6_{3} + lenght / 2)), ((2 * 60))°, A6_{3}], Rotate[(x(A6_{3}) + d2 / 2, y(A6_{3} - lenght / 2)), ((2 * 60))°, A6_{3}]], r, A6_{3}) → D6_{3}
  112. Rotate(Segment[Rotate[(x(A6_{4}) + d2 / 2, y(A6_{4} + lenght / 2)), ((2 * 60))°, A6_{4}], Rotate[(x(A6_{4}) + d2 / 2, y(A6_{4} - lenght / 2)), ((2 * 60))°, A6_{4}]], r, A6_{4}) → D6_{4}
  113. Rotate(Segment[Rotate[(x(A6_{5}) + d2 / 2, y(A6_{5} + lenght / 2)), ((2 * 60))°, A6_{5}], Rotate[(x(A6_{5}) + d2 / 2, y(A6_{5} - lenght / 2)), ((2 * 60))°, A6_{5}]], r, A6_{5}) → D6_{5}
  114. Rotate(Segment[Rotate[(x(A7_{0}) + d2 / 2, y(A7_{0} + lenght / 2)), ((2 * 60))°, A7_{0}], Rotate[(x(A7_{0}) + d2 / 2, y(A7_{0} - lenght / 2)), ((2 * 60))°, A7_{0}]], r, A7_{0}) → D7_{0}
  115. Rotate(Segment[Rotate[(x(A7_{1}) + d2 / 2, y(A7_{1} + lenght / 2)), ((2 * 60))°, A7_{1}], Rotate[(x(A7_{1}) + d2 / 2, y(A7_{1} - lenght / 2)), ((2 * 60))°, A7_{1}]], r, A7_{1}) → D7_{1}
  116. Rotate(Segment[Rotate[(x(A7_{2}) + d2 / 2, y(A7_{2} + lenght / 2)), ((2 * 60))°, A7_{2}], Rotate[(x(A7_{2}) + d2 / 2, y(A7_{2} - lenght / 2)), ((2 * 60))°, A7_{2}]], r, A7_{2}) → D7_{2}
  117. Rotate(Segment[Rotate[(x(A7_{3}) + d2 / 2, y(A7_{3} + lenght / 2)), ((2 * 60))°, A7_{3}], Rotate[(x(A7_{3}) + d2 / 2, y(A7_{3} - lenght / 2)), ((2 * 60))°, A7_{3}]], r, A7_{3}) → D7_{3}
  118. Rotate(Segment[Rotate[(x(A7_{4}) + d2 / 2, y(A7_{4} + lenght / 2)), ((2 * 60))°, A7_{4}], Rotate[(x(A7_{4}) + d2 / 2, y(A7_{4} - lenght / 2)), ((2 * 60))°, A7_{4}]], r, A7_{4}) → D7_{4}
  119. Rotate(Segment[Rotate[(x(A7_{5}) + d2 / 2, y(A7_{5} + lenght / 2)), ((2 * 60))°, A7_{5}], Rotate[(x(A7_{5}) + d2 / 2, y(A7_{5} - lenght / 2)), ((2 * 60))°, A7_{5}]], r, A7_{5}) → D7_{5}
  120. Rotate(Segment[Rotate[(x(A7_{6}) + d2 / 2, y(A7_{6} + lenght / 2)), ((2 * 60))°, A7_{6}], Rotate[(x(A7_{6}) + d2 / 2, y(A7_{6} - lenght / 2)), ((2 * 60))°, A7_{6}]], r, A7_{6}) → D7_{6}
  121. Rotate(Segment[Rotate[(x(A8_{0}) + d2 / 2, y(A8_{0} + lenght / 2)), ((2 * 60))°, A8_{0}], Rotate[(x(A8_{0}) + d2 / 2, y(A8_{0} - lenght / 2)), ((2 * 60))°, A8_{0}]], r, A8_{0}) → D8_{0}
  122. Rotate(Segment[Rotate[(x(A8_{1}) + d2 / 2, y(A8_{1} + lenght / 2)), ((2 * 60))°, A8_{1}], Rotate[(x(A8_{1}) + d2 / 2, y(A8_{1} - lenght / 2)), ((2 * 60))°, A8_{1}]], r, A8_{1}) → D8_{1}
  123. Rotate(Segment[Rotate[(x(A8_{2}) + d2 / 2, y(A8_{2} + lenght / 2)), ((2 * 60))°, A8_{2}], Rotate[(x(A8_{2}) + d2 / 2, y(A8_{2} - lenght / 2)), ((2 * 60))°, A8_{2}]], r, A8_{2}) → D8_{2}
  124. Rotate(Segment[Rotate[(x(A8_{3}) + d2 / 2, y(A8_{3} + lenght / 2)), ((2 * 60))°, A8_{3}], Rotate[(x(A8_{3}) + d2 / 2, y(A8_{3} - lenght / 2)), ((2 * 60))°, A8_{3}]], r, A8_{3}) → D8_{3}
  125. Rotate(Segment[Rotate[(x(A8_{4}) + d2 / 2, y(A8_{4} + lenght / 2)), ((2 * 60))°, A8_{4}], Rotate[(x(A8_{4}) + d2 / 2, y(A8_{4} - lenght / 2)), ((2 * 60))°, A8_{4}]], r, A8_{4}) → D8_{4}
  126. Rotate(Segment[Rotate[(x(A8_{5}) + d2 / 2, y(A8_{5} + lenght / 2)), ((2 * 60))°, A8_{5}], Rotate[(x(A8_{5}) + d2 / 2, y(A8_{5} - lenght / 2)), ((2 * 60))°, A8_{5}]], r, A8_{5}) → D8_{5}
  127. Rotate(Segment[Rotate[(x(A8_{6}) + d2 / 2, y(A8_{6} + lenght / 2)), ((2 * 60))°, A8_{6}], Rotate[(x(A8_{6}) + d2 / 2, y(A8_{6} - lenght / 2)), ((2 * 60))°, A8_{6}]], r, A8_{6}) → D8_{6}
  128. Rotate(Segment[Rotate[(x(A8_{7}) + d2 / 2, y(A8_{7} + lenght / 2)), ((2 * 60))°, A8_{7}], Rotate[(x(A8_{7}) + d2 / 2, y(A8_{7} - lenght / 2)), ((2 * 60))°, A8_{7}]], r, A8_{7}) → D8_{7}
  129. Rotate(Segment[Rotate[(x(A9_{0}) + d2 / 2, y(A9_{0} + lenght / 2)), ((2 * 60))°, A9_{0}], Rotate[(x(A9_{0}) + d2 / 2, y(A9_{0} - lenght / 2)), ((2 * 60))°, A9_{0}]], r, A9_{0}) → D9_{0}
  130. Rotate(Segment[Rotate[(x(A9_{1}) + d2 / 2, y(A9_{1} + lenght / 2)), ((2 * 60))°, A9_{1}], Rotate[(x(A9_{1}) + d2 / 2, y(A9_{1} - lenght / 2)), ((2 * 60))°, A9_{1}]], r, A9_{1}) → D9_{1}
  131. Rotate(Segment[Rotate[(x(A9_{2}) + d2 / 2, y(A9_{2} + lenght / 2)), ((2 * 60))°, A9_{2}], Rotate[(x(A9_{2}) + d2 / 2, y(A9_{2} - lenght / 2)), ((2 * 60))°, A9_{2}]], r, A9_{2}) → D9_{2}
  132. Rotate(Segment[Rotate[(x(A9_{3}) + d2 / 2, y(A9_{3} + lenght / 2)), ((2 * 60))°, A9_{3}], Rotate[(x(A9_{3}) + d2 / 2, y(A9_{3} - lenght / 2)), ((2 * 60))°, A9_{3}]], r, A9_{3}) → D9_{3}
  133. Rotate(Segment[Rotate[(x(A9_{4}) + d2 / 2, y(A9_{4} + lenght / 2)), ((2 * 60))°, A9_{4}], Rotate[(x(A9_{4}) + d2 / 2, y(A9_{4} - lenght / 2)), ((2 * 60))°, A9_{4}]], r, A9_{4}) → D9_{4}
  134. Rotate(Segment[Rotate[(x(A9_{5}) + d2 / 2, y(A9_{5} + lenght / 2)), ((2 * 60))°, A9_{5}], Rotate[(x(A9_{5}) + d2 / 2, y(A9_{5} - lenght / 2)), ((2 * 60))°, A9_{5}]], r, A9_{5}) → D9_{5}
  135. Rotate(Segment[Rotate[(x(A9_{6}) + d2 / 2, y(A9_{6} + lenght / 2)), ((2 * 60))°, A9_{6}], Rotate[(x(A9_{6}) + d2 / 2, y(A9_{6} - lenght / 2)), ((2 * 60))°, A9_{6}]], r, A9_{6}) → D9_{6}
  136. Rotate(Segment[Rotate[(x(A9_{7}) + d2 / 2, y(A9_{7} + lenght / 2)), ((2 * 60))°, A9_{7}], Rotate[(x(A9_{7}) + d2 / 2, y(A9_{7} - lenght / 2)), ((2 * 60))°, A9_{7}]], r, A9_{7}) → D9_{7}
  137. Rotate(Segment[Rotate[(x(A9_{8}) + d2 / 2, y(A9_{8} + lenght / 2)), ((2 * 60))°, A9_{8}], Rotate[(x(A9_{8}) + d2 / 2, y(A9_{8} - lenght / 2)), ((2 * 60))°, A9_{8}]], r, A9_{8}) → D9_{8}
  138. Rotate(Segment[Rotate[(x(A1_{0}) + d2 / 2, y(A1_{0} + lenght / 2)), ((3 * 60))°, A1_{0}], Rotate[(x(A1_{0}) + d2 / 2, y(A1_{0} - lenght / 2)), ((3 * 60))°, A1_{0}]], r, A1_{0}) → E1_{0}
  139. Rotate(Segment[Rotate[(x(A2_{0}) + d2 / 2, y(A2_{0} + lenght / 2)), ((3 * 60))°, A2_{0}], Rotate[(x(A2_{0}) + d2 / 2, y(A2_{0} - lenght / 2)), ((3 * 60))°, A2_{0}]], r, A2_{0}) → E2_{0}
  140. Rotate(Segment[Rotate[(x(A2_{1}) + d2 / 2, y(A2_{1} + lenght / 2)), ((3 * 60))°, A2_{1}], Rotate[(x(A2_{1}) + d2 / 2, y(A2_{1} - lenght / 2)), ((3 * 60))°, A2_{1}]], r, A2_{1}) → E2_{1}
  141. Rotate(Segment[Rotate[(x(A3_{0}) + d2 / 2, y(A3_{0} + lenght / 2)), ((3 * 60))°, A3_{0}], Rotate[(x(A3_{0}) + d2 / 2, y(A3_{0} - lenght / 2)), ((3 * 60))°, A3_{0}]], r, A3_{0}) → E3_{0}
  142. Rotate(Segment[Rotate[(x(A3_{1}) + d2 / 2, y(A3_{1} + lenght / 2)), ((3 * 60))°, A3_{1}], Rotate[(x(A3_{1}) + d2 / 2, y(A3_{1} - lenght / 2)), ((3 * 60))°, A3_{1}]], r, A3_{1}) → E3_{1}
  143. Rotate(Segment[Rotate[(x(A3_{2}) + d2 / 2, y(A3_{2} + lenght / 2)), ((3 * 60))°, A3_{2}], Rotate[(x(A3_{2}) + d2 / 2, y(A3_{2} - lenght / 2)), ((3 * 60))°, A3_{2}]], r, A3_{2}) → E3_{2}
  144. Rotate(Segment[Rotate[(x(A4_{0}) + d2 / 2, y(A4_{0} + lenght / 2)), ((3 * 60))°, A4_{0}], Rotate[(x(A4_{0}) + d2 / 2, y(A4_{0} - lenght / 2)), ((3 * 60))°, A4_{0}]], r, A4_{0}) → E4_{0}
  145. Rotate(Segment[Rotate[(x(A4_{1}) + d2 / 2, y(A4_{1} + lenght / 2)), ((3 * 60))°, A4_{1}], Rotate[(x(A4_{1}) + d2 / 2, y(A4_{1} - lenght / 2)), ((3 * 60))°, A4_{1}]], r, A4_{1}) → E4_{1}
  146. Rotate(Segment[Rotate[(x(A4_{2}) + d2 / 2, y(A4_{2} + lenght / 2)), ((3 * 60))°, A4_{2}], Rotate[(x(A4_{2}) + d2 / 2, y(A4_{2} - lenght / 2)), ((3 * 60))°, A4_{2}]], r, A4_{2}) → E4_{2}
  147. Rotate(Segment[Rotate[(x(A4_{3}) + d2 / 2, y(A4_{3} + lenght / 2)), ((3 * 60))°, A4_{3}], Rotate[(x(A4_{3}) + d2 / 2, y(A4_{3} - lenght / 2)), ((3 * 60))°, A4_{3}]], r, A4_{3}) → E4_{3}
  148. Rotate(Segment[Rotate[(x(A5_{0}) + d2 / 2, y(A5_{0} + lenght / 2)), ((3 * 60))°, A5_{0}], Rotate[(x(A5_{0}) + d2 / 2, y(A5_{0} - lenght / 2)), ((3 * 60))°, A5_{0}]], r, A5_{0}) → E5_{0}
  149. Rotate(Segment[Rotate[(x(A5_{1}) + d2 / 2, y(A5_{1} + lenght / 2)), ((3 * 60))°, A5_{1}], Rotate[(x(A5_{1}) + d2 / 2, y(A5_{1} - lenght / 2)), ((3 * 60))°, A5_{1}]], r, A5_{1}) → E5_{1}
  150. Rotate(Segment[Rotate[(x(A5_{2}) + d2 / 2, y(A5_{2} + lenght / 2)), ((3 * 60))°, A5_{2}], Rotate[(x(A5_{2}) + d2 / 2, y(A5_{2} - lenght / 2)), ((3 * 60))°, A5_{2}]], r, A5_{2}) → E5_{2}
  151. Rotate(Segment[Rotate[(x(A5_{3}) + d2 / 2, y(A5_{3} + lenght / 2)), ((3 * 60))°, A5_{3}], Rotate[(x(A5_{3}) + d2 / 2, y(A5_{3} - lenght / 2)), ((3 * 60))°, A5_{3}]], r, A5_{3}) → E5_{3}
  152. Rotate(Segment[Rotate[(x(A5_{4}) + d2 / 2, y(A5_{4} + lenght / 2)), ((3 * 60))°, A5_{4}], Rotate[(x(A5_{4}) + d2 / 2, y(A5_{4} - lenght / 2)), ((3 * 60))°, A5_{4}]], r, A5_{4}) → E5_{4}
  153. Rotate(Segment[Rotate[(x(A6_{0}) + d2 / 2, y(A6_{0} + lenght / 2)), ((3 * 60))°, A6_{0}], Rotate[(x(A6_{0}) + d2 / 2, y(A6_{0} - lenght / 2)), ((3 * 60))°, A6_{0}]], r, A6_{0}) → E6_{0}
  154. Rotate(Segment[Rotate[(x(A6_{1}) + d2 / 2, y(A6_{1} + lenght / 2)), ((3 * 60))°, A6_{1}], Rotate[(x(A6_{1}) + d2 / 2, y(A6_{1} - lenght / 2)), ((3 * 60))°, A6_{1}]], r, A6_{1}) → E6_{1}
  155. Rotate(Segment[Rotate[(x(A6_{2}) + d2 / 2, y(A6_{2} + lenght / 2)), ((3 * 60))°, A6_{2}], Rotate[(x(A6_{2}) + d2 / 2, y(A6_{2} - lenght / 2)), ((3 * 60))°, A6_{2}]], r, A6_{2}) → E6_{2}
  156. Rotate(Segment[Rotate[(x(A6_{3}) + d2 / 2, y(A6_{3} + lenght / 2)), ((3 * 60))°, A6_{3}], Rotate[(x(A6_{3}) + d2 / 2, y(A6_{3} - lenght / 2)), ((3 * 60))°, A6_{3}]], r, A6_{3}) → E6_{3}
  157. Rotate(Segment[Rotate[(x(A6_{4}) + d2 / 2, y(A6_{4} + lenght / 2)), ((3 * 60))°, A6_{4}], Rotate[(x(A6_{4}) + d2 / 2, y(A6_{4} - lenght / 2)), ((3 * 60))°, A6_{4}]], r, A6_{4}) → E6_{4}
  158. Rotate(Segment[Rotate[(x(A6_{5}) + d2 / 2, y(A6_{5} + lenght / 2)), ((3 * 60))°, A6_{5}], Rotate[(x(A6_{5}) + d2 / 2, y(A6_{5} - lenght / 2)), ((3 * 60))°, A6_{5}]], r, A6_{5}) → E6_{5}
  159. Rotate(Segment[Rotate[(x(A7_{0}) + d2 / 2, y(A7_{0} + lenght / 2)), ((3 * 60))°, A7_{0}], Rotate[(x(A7_{0}) + d2 / 2, y(A7_{0} - lenght / 2)), ((3 * 60))°, A7_{0}]], r, A7_{0}) → E7_{0}
  160. Rotate(Segment[Rotate[(x(A7_{1}) + d2 / 2, y(A7_{1} + lenght / 2)), ((3 * 60))°, A7_{1}], Rotate[(x(A7_{1}) + d2 / 2, y(A7_{1} - lenght / 2)), ((3 * 60))°, A7_{1}]], r, A7_{1}) → E7_{1}
  161. Rotate(Segment[Rotate[(x(A7_{2}) + d2 / 2, y(A7_{2} + lenght / 2)), ((3 * 60))°, A7_{2}], Rotate[(x(A7_{2}) + d2 / 2, y(A7_{2} - lenght / 2)), ((3 * 60))°, A7_{2}]], r, A7_{2}) → E7_{2}
  162. Rotate(Segment[Rotate[(x(A7_{3}) + d2 / 2, y(A7_{3} + lenght / 2)), ((3 * 60))°, A7_{3}], Rotate[(x(A7_{3}) + d2 / 2, y(A7_{3} - lenght / 2)), ((3 * 60))°, A7_{3}]], r, A7_{3}) → E7_{3}
  163. Rotate(Segment[Rotate[(x(A7_{4}) + d2 / 2, y(A7_{4} + lenght / 2)), ((3 * 60))°, A7_{4}], Rotate[(x(A7_{4}) + d2 / 2, y(A7_{4} - lenght / 2)), ((3 * 60))°, A7_{4}]], r, A7_{4}) → E7_{4}
  164. Rotate(Segment[Rotate[(x(A7_{5}) + d2 / 2, y(A7_{5} + lenght / 2)), ((3 * 60))°, A7_{5}], Rotate[(x(A7_{5}) + d2 / 2, y(A7_{5} - lenght / 2)), ((3 * 60))°, A7_{5}]], r, A7_{5}) → E7_{5}
  165. Rotate(Segment[Rotate[(x(A7_{6}) + d2 / 2, y(A7_{6} + lenght / 2)), ((3 * 60))°, A7_{6}], Rotate[(x(A7_{6}) + d2 / 2, y(A7_{6} - lenght / 2)), ((3 * 60))°, A7_{6}]], r, A7_{6}) → E7_{6}
  166. Rotate(Segment[Rotate[(x(A8_{0}) + d2 / 2, y(A8_{0} + lenght / 2)), ((3 * 60))°, A8_{0}], Rotate[(x(A8_{0}) + d2 / 2, y(A8_{0} - lenght / 2)), ((3 * 60))°, A8_{0}]], r, A8_{0}) → E8_{0}
  167. Rotate(Segment[Rotate[(x(A8_{1}) + d2 / 2, y(A8_{1} + lenght / 2)), ((3 * 60))°, A8_{1}], Rotate[(x(A8_{1}) + d2 / 2, y(A8_{1} - lenght / 2)), ((3 * 60))°, A8_{1}]], r, A8_{1}) → E8_{1}
  168. Rotate(Segment[Rotate[(x(A8_{2}) + d2 / 2, y(A8_{2} + lenght / 2)), ((3 * 60))°, A8_{2}], Rotate[(x(A8_{2}) + d2 / 2, y(A8_{2} - lenght / 2)), ((3 * 60))°, A8_{2}]], r, A8_{2}) → E8_{2}
  169. Rotate(Segment[Rotate[(x(A8_{3}) + d2 / 2, y(A8_{3} + lenght / 2)), ((3 * 60))°, A8_{3}], Rotate[(x(A8_{3}) + d2 / 2, y(A8_{3} - lenght / 2)), ((3 * 60))°, A8_{3}]], r, A8_{3}) → E8_{3}
  170. Rotate(Segment[Rotate[(x(A8_{4}) + d2 / 2, y(A8_{4} + lenght / 2)), ((3 * 60))°, A8_{4}], Rotate[(x(A8_{4}) + d2 / 2, y(A8_{4} - lenght / 2)), ((3 * 60))°, A8_{4}]], r, A8_{4}) → E8_{4}
  171. Rotate(Segment[Rotate[(x(A8_{5}) + d2 / 2, y(A8_{5} + lenght / 2)), ((3 * 60))°, A8_{5}], Rotate[(x(A8_{5}) + d2 / 2, y(A8_{5} - lenght / 2)), ((3 * 60))°, A8_{5}]], r, A8_{5}) → E8_{5}
  172. Rotate(Segment[Rotate[(x(A8_{6}) + d2 / 2, y(A8_{6} + lenght / 2)), ((3 * 60))°, A8_{6}], Rotate[(x(A8_{6}) + d2 / 2, y(A8_{6} - lenght / 2)), ((3 * 60))°, A8_{6}]], r, A8_{6}) → E8_{6}
  173. Rotate(Segment[Rotate[(x(A8_{7}) + d2 / 2, y(A8_{7} + lenght / 2)), ((3 * 60))°, A8_{7}], Rotate[(x(A8_{7}) + d2 / 2, y(A8_{7} - lenght / 2)), ((3 * 60))°, A8_{7}]], r, A8_{7}) → E8_{7}
  174. Rotate(Segment[Rotate[(x(A9_{0}) + d2 / 2, y(A9_{0} + lenght / 2)), ((3 * 60))°, A9_{0}], Rotate[(x(A9_{0}) + d2 / 2, y(A9_{0} - lenght / 2)), ((3 * 60))°, A9_{0}]], r, A9_{0}) → E9_{0}
  175. Rotate(Segment[Rotate[(x(A9_{1}) + d2 / 2, y(A9_{1} + lenght / 2)), ((3 * 60))°, A9_{1}], Rotate[(x(A9_{1}) + d2 / 2, y(A9_{1} - lenght / 2)), ((3 * 60))°, A9_{1}]], r, A9_{1}) → E9_{1}
  176. Rotate(Segment[Rotate[(x(A9_{2}) + d2 / 2, y(A9_{2} + lenght / 2)), ((3 * 60))°, A9_{2}], Rotate[(x(A9_{2}) + d2 / 2, y(A9_{2} - lenght / 2)), ((3 * 60))°, A9_{2}]], r, A9_{2}) → E9_{2}
  177. Rotate(Segment[Rotate[(x(A9_{3}) + d2 / 2, y(A9_{3} + lenght / 2)), ((3 * 60))°, A9_{3}], Rotate[(x(A9_{3}) + d2 / 2, y(A9_{3} - lenght / 2)), ((3 * 60))°, A9_{3}]], r, A9_{3}) → E9_{3}
  178. Rotate(Segment[Rotate[(x(A9_{4}) + d2 / 2, y(A9_{4} + lenght / 2)), ((3 * 60))°, A9_{4}], Rotate[(x(A9_{4}) + d2 / 2, y(A9_{4} - lenght / 2)), ((3 * 60))°, A9_{4}]], r, A9_{4}) → E9_{4}
  179. Rotate(Segment[Rotate[(x(A9_{5}) + d2 / 2, y(A9_{5} + lenght / 2)), ((3 * 60))°, A9_{5}], Rotate[(x(A9_{5}) + d2 / 2, y(A9_{5} - lenght / 2)), ((3 * 60))°, A9_{5}]], r, A9_{5}) → E9_{5}
  180. Rotate(Segment[Rotate[(x(A9_{6}) + d2 / 2, y(A9_{6} + lenght / 2)), ((3 * 60))°, A9_{6}], Rotate[(x(A9_{6}) + d2 / 2, y(A9_{6} - lenght / 2)), ((3 * 60))°, A9_{6}]], r, A9_{6}) → E9_{6}
  181. Rotate(Segment[Rotate[(x(A9_{7}) + d2 / 2, y(A9_{7} + lenght / 2)), ((3 * 60))°, A9_{7}], Rotate[(x(A9_{7}) + d2 / 2, y(A9_{7} - lenght / 2)), ((3 * 60))°, A9_{7}]], r, A9_{7}) → E9_{7}
  182. Rotate(Segment[Rotate[(x(A9_{8}) + d2 / 2, y(A9_{8} + lenght / 2)), ((3 * 60))°, A9_{8}], Rotate[(x(A9_{8}) + d2 / 2, y(A9_{8} - lenght / 2)), ((3 * 60))°, A9_{8}]], r, A9_{8}) → E9_{8}
  183. Rotate(Segment[Rotate[(x(A1_{0}) + d2 / 2, y(A1_{0} + lenght / 2)), ((4 * 60))°, A1_{0}], Rotate[(x(A1_{0}) + d2 / 2, y(A1_{0} - lenght / 2)), ((4 * 60))°, A1_{0}]], r, A1_{0}) → F1_{0}
  184. Rotate(Segment[Rotate[(x(A2_{0}) + d2 / 2, y(A2_{0} + lenght / 2)), ((4 * 60))°, A2_{0}], Rotate[(x(A2_{0}) + d2 / 2, y(A2_{0} - lenght / 2)), ((4 * 60))°, A2_{0}]], r, A2_{0}) → F2_{0}
  185. Rotate(Segment[Rotate[(x(A2_{1}) + d2 / 2, y(A2_{1} + lenght / 2)), ((4 * 60))°, A2_{1}], Rotate[(x(A2_{1}) + d2 / 2, y(A2_{1} - lenght / 2)), ((4 * 60))°, A2_{1}]], r, A2_{1}) → F2_{1}
  186. Rotate(Segment[Rotate[(x(A3_{0}) + d2 / 2, y(A3_{0} + lenght / 2)), ((4 * 60))°, A3_{0}], Rotate[(x(A3_{0}) + d2 / 2, y(A3_{0} - lenght / 2)), ((4 * 60))°, A3_{0}]], r, A3_{0}) → F3_{0}
  187. Rotate(Segment[Rotate[(x(A3_{1}) + d2 / 2, y(A3_{1} + lenght / 2)), ((4 * 60))°, A3_{1}], Rotate[(x(A3_{1}) + d2 / 2, y(A3_{1} - lenght / 2)), ((4 * 60))°, A3_{1}]], r, A3_{1}) → F3_{1}
  188. Rotate(Segment[Rotate[(x(A3_{2}) + d2 / 2, y(A3_{2} + lenght / 2)), ((4 * 60))°, A3_{2}], Rotate[(x(A3_{2}) + d2 / 2, y(A3_{2} - lenght / 2)), ((4 * 60))°, A3_{2}]], r, A3_{2}) → F3_{2}
  189. Rotate(Segment[Rotate[(x(A4_{0}) + d2 / 2, y(A4_{0} + lenght / 2)), ((4 * 60))°, A4_{0}], Rotate[(x(A4_{0}) + d2 / 2, y(A4_{0} - lenght / 2)), ((4 * 60))°, A4_{0}]], r, A4_{0}) → F4_{0}
  190. Rotate(Segment[Rotate[(x(A4_{1}) + d2 / 2, y(A4_{1} + lenght / 2)), ((4 * 60))°, A4_{1}], Rotate[(x(A4_{1}) + d2 / 2, y(A4_{1} - lenght / 2)), ((4 * 60))°, A4_{1}]], r, A4_{1}) → F4_{1}
  191. Rotate(Segment[Rotate[(x(A4_{2}) + d2 / 2, y(A4_{2} + lenght / 2)), ((4 * 60))°, A4_{2}], Rotate[(x(A4_{2}) + d2 / 2, y(A4_{2} - lenght / 2)), ((4 * 60))°, A4_{2}]], r, A4_{2}) → F4_{2}
  192. Rotate(Segment[Rotate[(x(A4_{3}) + d2 / 2, y(A4_{3} + lenght / 2)), ((4 * 60))°, A4_{3}], Rotate[(x(A4_{3}) + d2 / 2, y(A4_{3} - lenght / 2)), ((4 * 60))°, A4_{3}]], r, A4_{3}) → F4_{3}
  193. Rotate(Segment[Rotate[(x(A5_{0}) + d2 / 2, y(A5_{0} + lenght / 2)), ((4 * 60))°, A5_{0}], Rotate[(x(A5_{0}) + d2 / 2, y(A5_{0} - lenght / 2)), ((4 * 60))°, A5_{0}]], r, A5_{0}) → F5_{0}
  194. Rotate(Segment[Rotate[(x(A5_{1}) + d2 / 2, y(A5_{1} + lenght / 2)), ((4 * 60))°, A5_{1}], Rotate[(x(A5_{1}) + d2 / 2, y(A5_{1} - lenght / 2)), ((4 * 60))°, A5_{1}]], r, A5_{1}) → F5_{1}
  195. Rotate(Segment[Rotate[(x(A5_{2}) + d2 / 2, y(A5_{2} + lenght / 2)), ((4 * 60))°, A5_{2}], Rotate[(x(A5_{2}) + d2 / 2, y(A5_{2} - lenght / 2)), ((4 * 60))°, A5_{2}]], r, A5_{2}) → F5_{2}
  196. Rotate(Segment[Rotate[(x(A5_{3}) + d2 / 2, y(A5_{3} + lenght / 2)), ((4 * 60))°, A5_{3}], Rotate[(x(A5_{3}) + d2 / 2, y(A5_{3} - lenght / 2)), ((4 * 60))°, A5_{3}]], r, A5_{3}) → F5_{3}
  197. Rotate(Segment[Rotate[(x(A5_{4}) + d2 / 2, y(A5_{4} + lenght / 2)), ((4 * 60))°, A5_{4}], Rotate[(x(A5_{4}) + d2 / 2, y(A5_{4} - lenght / 2)), ((4 * 60))°, A5_{4}]], r, A5_{4}) → F5_{4}
  198. Rotate(Segment[Rotate[(x(A6_{0}) + d2 / 2, y(A6_{0} + lenght / 2)), ((4 * 60))°, A6_{0}], Rotate[(x(A6_{0}) + d2 / 2, y(A6_{0} - lenght / 2)), ((4 * 60))°, A6_{0}]], r, A6_{0}) → F6_{0}
  199. Rotate(Segment[Rotate[(x(A6_{1}) + d2 / 2, y(A6_{1} + lenght / 2)), ((4 * 60))°, A6_{1}], Rotate[(x(A6_{1}) + d2 / 2, y(A6_{1} - lenght / 2)), ((4 * 60))°, A6_{1}]], r, A6_{1}) → F6_{1}
  200. Rotate(Segment[Rotate[(x(A6_{2}) + d2 / 2, y(A6_{2} + lenght / 2)), ((4 * 60))°, A6_{2}], Rotate[(x(A6_{2}) + d2 / 2, y(A6_{2} - lenght / 2)), ((4 * 60))°, A6_{2}]], r, A6_{2}) → F6_{2}
  201. Rotate(Segment[Rotate[(x(A6_{3}) + d2 / 2, y(A6_{3} + lenght / 2)), ((4 * 60))°, A6_{3}], Rotate[(x(A6_{3}) + d2 / 2, y(A6_{3} - lenght / 2)), ((4 * 60))°, A6_{3}]], r, A6_{3}) → F6_{3}
  202. Rotate(Segment[Rotate[(x(A6_{4}) + d2 / 2, y(A6_{4} + lenght / 2)), ((4 * 60))°, A6_{4}], Rotate[(x(A6_{4}) + d2 / 2, y(A6_{4} - lenght / 2)), ((4 * 60))°, A6_{4}]], r, A6_{4}) → F6_{4}
  203. Rotate(Segment[Rotate[(x(A6_{5}) + d2 / 2, y(A6_{5} + lenght / 2)), ((4 * 60))°, A6_{5}], Rotate[(x(A6_{5}) + d2 / 2, y(A6_{5} - lenght / 2)), ((4 * 60))°, A6_{5}]], r, A6_{5}) → F6_{5}
  204. Rotate(Segment[Rotate[(x(A7_{0}) + d2 / 2, y(A7_{0} + lenght / 2)), ((4 * 60))°, A7_{0}], Rotate[(x(A7_{0}) + d2 / 2, y(A7_{0} - lenght / 2)), ((4 * 60))°, A7_{0}]], r, A7_{0}) → F7_{0}
  205. Rotate(Segment[Rotate[(x(A7_{1}) + d2 / 2, y(A7_{1} + lenght / 2)), ((4 * 60))°, A7_{1}], Rotate[(x(A7_{1}) + d2 / 2, y(A7_{1} - lenght / 2)), ((4 * 60))°, A7_{1}]], r, A7_{1}) → F7_{1}
  206. Rotate(Segment[Rotate[(x(A7_{2}) + d2 / 2, y(A7_{2} + lenght / 2)), ((4 * 60))°, A7_{2}], Rotate[(x(A7_{2}) + d2 / 2, y(A7_{2} - lenght / 2)), ((4 * 60))°, A7_{2}]], r, A7_{2}) → F7_{2}
  207. Rotate(Segment[Rotate[(x(A7_{3}) + d2 / 2, y(A7_{3} + lenght / 2)), ((4 * 60))°, A7_{3}], Rotate[(x(A7_{3}) + d2 / 2, y(A7_{3} - lenght / 2)), ((4 * 60))°, A7_{3}]], r, A7_{3}) → F7_{3}
  208. Rotate(Segment[Rotate[(x(A7_{4}) + d2 / 2, y(A7_{4} + lenght / 2)), ((4 * 60))°, A7_{4}], Rotate[(x(A7_{4}) + d2 / 2, y(A7_{4} - lenght / 2)), ((4 * 60))°, A7_{4}]], r, A7_{4}) → F7_{4}
  209. Rotate(Segment[Rotate[(x(A7_{5}) + d2 / 2, y(A7_{5} + lenght / 2)), ((4 * 60))°, A7_{5}], Rotate[(x(A7_{5}) + d2 / 2, y(A7_{5} - lenght / 2)), ((4 * 60))°, A7_{5}]], r, A7_{5}) → F7_{5}
  210. Rotate(Segment[Rotate[(x(A7_{6}) + d2 / 2, y(A7_{6} + lenght / 2)), ((4 * 60))°, A7_{6}], Rotate[(x(A7_{6}) + d2 / 2, y(A7_{6} - lenght / 2)), ((4 * 60))°, A7_{6}]], r, A7_{6}) → F7_{6}
  211. Rotate(Segment[Rotate[(x(A8_{0}) + d2 / 2, y(A8_{0} + lenght / 2)), ((4 * 60))°, A8_{0}], Rotate[(x(A8_{0}) + d2 / 2, y(A8_{0} - lenght / 2)), ((4 * 60))°, A8_{0}]], r, A8_{0}) → F8_{0}
  212. Rotate(Segment[Rotate[(x(A8_{1}) + d2 / 2, y(A8_{1} + lenght / 2)), ((4 * 60))°, A8_{1}], Rotate[(x(A8_{1}) + d2 / 2, y(A8_{1} - lenght / 2)), ((4 * 60))°, A8_{1}]], r, A8_{1}) → F8_{1}
  213. Rotate(Segment[Rotate[(x(A8_{2}) + d2 / 2, y(A8_{2} + lenght / 2)), ((4 * 60))°, A8_{2}], Rotate[(x(A8_{2}) + d2 / 2, y(A8_{2} - lenght / 2)), ((4 * 60))°, A8_{2}]], r, A8_{2}) → F8_{2}
  214. Rotate(Segment[Rotate[(x(A8_{3}) + d2 / 2, y(A8_{3} + lenght / 2)), ((4 * 60))°, A8_{3}], Rotate[(x(A8_{3}) + d2 / 2, y(A8_{3} - lenght / 2)), ((4 * 60))°, A8_{3}]], r, A8_{3}) → F8_{3}
  215. Rotate(Segment[Rotate[(x(A8_{4}) + d2 / 2, y(A8_{4} + lenght / 2)), ((4 * 60))°, A8_{4}], Rotate[(x(A8_{4}) + d2 / 2, y(A8_{4} - lenght / 2)), ((4 * 60))°, A8_{4}]], r, A8_{4}) → F8_{4}
  216. Rotate(Segment[Rotate[(x(A8_{5}) + d2 / 2, y(A8_{5} + lenght / 2)), ((4 * 60))°, A8_{5}], Rotate[(x(A8_{5}) + d2 / 2, y(A8_{5} - lenght / 2)), ((4 * 60))°, A8_{5}]], r, A8_{5}) → F8_{5}
  217. Rotate(Segment[Rotate[(x(A8_{6}) + d2 / 2, y(A8_{6} + lenght / 2)), ((4 * 60))°, A8_{6}], Rotate[(x(A8_{6}) + d2 / 2, y(A8_{6} - lenght / 2)), ((4 * 60))°, A8_{6}]], r, A8_{6}) → F8_{6}
  218. Rotate(Segment[Rotate[(x(A8_{7}) + d2 / 2, y(A8_{7} + lenght / 2)), ((4 * 60))°, A8_{7}], Rotate[(x(A8_{7}) + d2 / 2, y(A8_{7} - lenght / 2)), ((4 * 60))°, A8_{7}]], r, A8_{7}) → F8_{7}
  219. Rotate(Segment[Rotate[(x(A9_{0}) + d2 / 2, y(A9_{0} + lenght / 2)), ((4 * 60))°, A9_{0}], Rotate[(x(A9_{0}) + d2 / 2, y(A9_{0} - lenght / 2)), ((4 * 60))°, A9_{0}]], r, A9_{0}) → F9_{0}
  220. Rotate(Segment[Rotate[(x(A9_{1}) + d2 / 2, y(A9_{1} + lenght / 2)), ((4 * 60))°, A9_{1}], Rotate[(x(A9_{1}) + d2 / 2, y(A9_{1} - lenght / 2)), ((4 * 60))°, A9_{1}]], r, A9_{1}) → F9_{1}
  221. Rotate(Segment[Rotate[(x(A9_{2}) + d2 / 2, y(A9_{2} + lenght / 2)), ((4 * 60))°, A9_{2}], Rotate[(x(A9_{2}) + d2 / 2, y(A9_{2} - lenght / 2)), ((4 * 60))°, A9_{2}]], r, A9_{2}) → F9_{2}
  222. Rotate(Segment[Rotate[(x(A9_{3}) + d2 / 2, y(A9_{3} + lenght / 2)), ((4 * 60))°, A9_{3}], Rotate[(x(A9_{3}) + d2 / 2, y(A9_{3} - lenght / 2)), ((4 * 60))°, A9_{3}]], r, A9_{3}) → F9_{3}
  223. Rotate(Segment[Rotate[(x(A9_{4}) + d2 / 2, y(A9_{4} + lenght / 2)), ((4 * 60))°, A9_{4}], Rotate[(x(A9_{4}) + d2 / 2, y(A9_{4} - lenght / 2)), ((4 * 60))°, A9_{4}]], r, A9_{4}) → F9_{4}
  224. Rotate(Segment[Rotate[(x(A9_{5}) + d2 / 2, y(A9_{5} + lenght / 2)), ((4 * 60))°, A9_{5}], Rotate[(x(A9_{5}) + d2 / 2, y(A9_{5} - lenght / 2)), ((4 * 60))°, A9_{5}]], r, A9_{5}) → F9_{5}
  225. Rotate(Segment[Rotate[(x(A9_{6}) + d2 / 2, y(A9_{6} + lenght / 2)), ((4 * 60))°, A9_{6}], Rotate[(x(A9_{6}) + d2 / 2, y(A9_{6} - lenght / 2)), ((4 * 60))°, A9_{6}]], r, A9_{6}) → F9_{6}
  226. Rotate(Segment[Rotate[(x(A9_{7}) + d2 / 2, y(A9_{7} + lenght / 2)), ((4 * 60))°, A9_{7}], Rotate[(x(A9_{7}) + d2 / 2, y(A9_{7} - lenght / 2)), ((4 * 60))°, A9_{7}]], r, A9_{7}) → F9_{7}
  227. Rotate(Segment[Rotate[(x(A9_{8}) + d2 / 2, y(A9_{8} + lenght / 2)), ((4 * 60))°, A9_{8}], Rotate[(x(A9_{8}) + d2 / 2, y(A9_{8} - lenght / 2)), ((4 * 60))°, A9_{8}]], r, A9_{8}) → F9_{8}
  228. Rotate(Segment[Rotate[(x(A1_{0}) + d2 / 2, y(A1_{0} + lenght / 2)), ((5 * 60))°, A1_{0}], Rotate[(x(A1_{0}) + d2 / 2, y(A1_{0} - lenght / 2)), ((5 * 60))°, A1_{0}]], r, A1_{0}) → G1_{0}
  229. Rotate(Segment[Rotate[(x(A2_{0}) + d2 / 2, y(A2_{0} + lenght / 2)), ((5 * 60))°, A2_{0}], Rotate[(x(A2_{0}) + d2 / 2, y(A2_{0} - lenght / 2)), ((5 * 60))°, A2_{0}]], r, A2_{0}) → G2_{0}
  230. Rotate(Segment[Rotate[(x(A2_{1}) + d2 / 2, y(A2_{1} + lenght / 2)), ((5 * 60))°, A2_{1}], Rotate[(x(A2_{1}) + d2 / 2, y(A2_{1} - lenght / 2)), ((5 * 60))°, A2_{1}]], r, A2_{1}) → G2_{1}
  231. Rotate(Segment[Rotate[(x(A3_{0}) + d2 / 2, y(A3_{0} + lenght / 2)), ((5 * 60))°, A3_{0}], Rotate[(x(A3_{0}) + d2 / 2, y(A3_{0} - lenght / 2)), ((5 * 60))°, A3_{0}]], r, A3_{0}) → G3_{0}
  232. Rotate(Segment[Rotate[(x(A3_{1}) + d2 / 2, y(A3_{1} + lenght / 2)), ((5 * 60))°, A3_{1}], Rotate[(x(A3_{1}) + d2 / 2, y(A3_{1} - lenght / 2)), ((5 * 60))°, A3_{1}]], r, A3_{1}) → G3_{1}
  233. Rotate(Segment[Rotate[(x(A3_{2}) + d2 / 2, y(A3_{2} + lenght / 2)), ((5 * 60))°, A3_{2}], Rotate[(x(A3_{2}) + d2 / 2, y(A3_{2} - lenght / 2)), ((5 * 60))°, A3_{2}]], r, A3_{2}) → G3_{2}
  234. Rotate(Segment[Rotate[(x(A4_{0}) + d2 / 2, y(A4_{0} + lenght / 2)), ((5 * 60))°, A4_{0}], Rotate[(x(A4_{0}) + d2 / 2, y(A4_{0} - lenght / 2)), ((5 * 60))°, A4_{0}]], r, A4_{0}) → G4_{0}
  235. Rotate(Segment[Rotate[(x(A4_{1}) + d2 / 2, y(A4_{1} + lenght / 2)), ((5 * 60))°, A4_{1}], Rotate[(x(A4_{1}) + d2 / 2, y(A4_{1} - lenght / 2)), ((5 * 60))°, A4_{1}]], r, A4_{1}) → G4_{1}
  236. Rotate(Segment[Rotate[(x(A4_{2}) + d2 / 2, y(A4_{2} + lenght / 2)), ((5 * 60))°, A4_{2}], Rotate[(x(A4_{2}) + d2 / 2, y(A4_{2} - lenght / 2)), ((5 * 60))°, A4_{2}]], r, A4_{2}) → G4_{2}
  237. Rotate(Segment[Rotate[(x(A4_{3}) + d2 / 2, y(A4_{3} + lenght / 2)), ((5 * 60))°, A4_{3}], Rotate[(x(A4_{3}) + d2 / 2, y(A4_{3} - lenght / 2)), ((5 * 60))°, A4_{3}]], r, A4_{3}) → G4_{3}
  238. Rotate(Segment[Rotate[(x(A5_{0}) + d2 / 2, y(A5_{0} + lenght / 2)), ((5 * 60))°, A5_{0}], Rotate[(x(A5_{0}) + d2 / 2, y(A5_{0} - lenght / 2)), ((5 * 60))°, A5_{0}]], r, A5_{0}) → G5_{0}
  239. Rotate(Segment[Rotate[(x(A5_{1}) + d2 / 2, y(A5_{1} + lenght / 2)), ((5 * 60))°, A5_{1}], Rotate[(x(A5_{1}) + d2 / 2, y(A5_{1} - lenght / 2)), ((5 * 60))°, A5_{1}]], r, A5_{1}) → G5_{1}
  240. Rotate(Segment[Rotate[(x(A5_{2}) + d2 / 2, y(A5_{2} + lenght / 2)), ((5 * 60))°, A5_{2}], Rotate[(x(A5_{2}) + d2 / 2, y(A5_{2} - lenght / 2)), ((5 * 60))°, A5_{2}]], r, A5_{2}) → G5_{2}
  241. Rotate(Segment[Rotate[(x(A5_{3}) + d2 / 2, y(A5_{3} + lenght / 2)), ((5 * 60))°, A5_{3}], Rotate[(x(A5_{3}) + d2 / 2, y(A5_{3} - lenght / 2)), ((5 * 60))°, A5_{3}]], r, A5_{3}) → G5_{3}
  242. Rotate(Segment[Rotate[(x(A5_{4}) + d2 / 2, y(A5_{4} + lenght / 2)), ((5 * 60))°, A5_{4}], Rotate[(x(A5_{4}) + d2 / 2, y(A5_{4} - lenght / 2)), ((5 * 60))°, A5_{4}]], r, A5_{4}) → G5_{4}
  243. Rotate(Segment[Rotate[(x(A6_{0}) + d2 / 2, y(A6_{0} + lenght / 2)), ((5 * 60))°, A6_{0}], Rotate[(x(A6_{0}) + d2 / 2, y(A6_{0} - lenght / 2)), ((5 * 60))°, A6_{0}]], r, A6_{0}) → G6_{0}
  244. Rotate(Segment[Rotate[(x(A6_{1}) + d2 / 2, y(A6_{1} + lenght / 2)), ((5 * 60))°, A6_{1}], Rotate[(x(A6_{1}) + d2 / 2, y(A6_{1} - lenght / 2)), ((5 * 60))°, A6_{1}]], r, A6_{1}) → G6_{1}
  245. Rotate(Segment[Rotate[(x(A6_{2}) + d2 / 2, y(A6_{2} + lenght / 2)), ((5 * 60))°, A6_{2}], Rotate[(x(A6_{2}) + d2 / 2, y(A6_{2} - lenght / 2)), ((5 * 60))°, A6_{2}]], r, A6_{2}) → G6_{2}
  246. Rotate(Segment[Rotate[(x(A6_{3}) + d2 / 2, y(A6_{3} + lenght / 2)), ((5 * 60))°, A6_{3}], Rotate[(x(A6_{3}) + d2 / 2, y(A6_{3} - lenght / 2)), ((5 * 60))°, A6_{3}]], r, A6_{3}) → G6_{3}
  247. Rotate(Segment[Rotate[(x(A6_{4}) + d2 / 2, y(A6_{4} + lenght / 2)), ((5 * 60))°, A6_{4}], Rotate[(x(A6_{4}) + d2 / 2, y(A6_{4} - lenght / 2)), ((5 * 60))°, A6_{4}]], r, A6_{4}) → G6_{4}
  248. Rotate(Segment[Rotate[(x(A6_{5}) + d2 / 2, y(A6_{5} + lenght / 2)), ((5 * 60))°, A6_{5}], Rotate[(x(A6_{5}) + d2 / 2, y(A6_{5} - lenght / 2)), ((5 * 60))°, A6_{5}]], r, A6_{5}) → G6_{5}
  249. Rotate(Segment[Rotate[(x(A7_{0}) + d2 / 2, y(A7_{0} + lenght / 2)), ((5 * 60))°, A7_{0}], Rotate[(x(A7_{0}) + d2 / 2, y(A7_{0} - lenght / 2)), ((5 * 60))°, A7_{0}]], r, A7_{0}) → G7_{0}
  250. Rotate(Segment[Rotate[(x(A7_{1}) + d2 / 2, y(A7_{1} + lenght / 2)), ((5 * 60))°, A7_{1}], Rotate[(x(A7_{1}) + d2 / 2, y(A7_{1} - lenght / 2)), ((5 * 60))°, A7_{1}]], r, A7_{1}) → G7_{1}
  251. Rotate(Segment[Rotate[(x(A7_{2}) + d2 / 2, y(A7_{2} + lenght / 2)), ((5 * 60))°, A7_{2}], Rotate[(x(A7_{2}) + d2 / 2, y(A7_{2} - lenght / 2)), ((5 * 60))°, A7_{2}]], r, A7_{2}) → G7_{2}
  252. Rotate(Segment[Rotate[(x(A7_{3}) + d2 / 2, y(A7_{3} + lenght / 2)), ((5 * 60))°, A7_{3}], Rotate[(x(A7_{3}) + d2 / 2, y(A7_{3} - lenght / 2)), ((5 * 60))°, A7_{3}]], r, A7_{3}) → G7_{3}
  253. Rotate(Segment[Rotate[(x(A7_{4}) + d2 / 2, y(A7_{4} + lenght / 2)), ((5 * 60))°, A7_{4}], Rotate[(x(A7_{4}) + d2 / 2, y(A7_{4} - lenght / 2)), ((5 * 60))°, A7_{4}]], r, A7_{4}) → G7_{4}
  254. Rotate(Segment[Rotate[(x(A7_{5}) + d2 / 2, y(A7_{5} + lenght / 2)), ((5 * 60))°, A7_{5}], Rotate[(x(A7_{5}) + d2 / 2, y(A7_{5} - lenght / 2)), ((5 * 60))°, A7_{5}]], r, A7_{5}) → G7_{5}
  255. Rotate(Segment[Rotate[(x(A7_{6}) + d2 / 2, y(A7_{6} + lenght / 2)), ((5 * 60))°, A7_{6}], Rotate[(x(A7_{6}) + d2 / 2, y(A7_{6} - lenght / 2)), ((5 * 60))°, A7_{6}]], r, A7_{6}) → G7_{6}
  256. Rotate(Segment[Rotate[(x(A8_{0}) + d2 / 2, y(A8_{0} + lenght / 2)), ((5 * 60))°, A8_{0}], Rotate[(x(A8_{0}) + d2 / 2, y(A8_{0} - lenght / 2)), ((5 * 60))°, A8_{0}]], r, A8_{0}) → G8_{0}
  257. Rotate(Segment[Rotate[(x(A8_{1}) + d2 / 2, y(A8_{1} + lenght / 2)), ((5 * 60))°, A8_{1}], Rotate[(x(A8_{1}) + d2 / 2, y(A8_{1} - lenght / 2)), ((5 * 60))°, A8_{1}]], r, A8_{1}) → G8_{1}
  258. Rotate(Segment[Rotate[(x(A8_{2}) + d2 / 2, y(A8_{2} + lenght / 2)), ((5 * 60))°, A8_{2}], Rotate[(x(A8_{2}) + d2 / 2, y(A8_{2} - lenght / 2)), ((5 * 60))°, A8_{2}]], r, A8_{2}) → G8_{2}
  259. Rotate(Segment[Rotate[(x(A8_{3}) + d2 / 2, y(A8_{3} + lenght / 2)), ((5 * 60))°, A8_{3}], Rotate[(x(A8_{3}) + d2 / 2, y(A8_{3} - lenght / 2)), ((5 * 60))°, A8_{3}]], r, A8_{3}) → G8_{3}
  260. Rotate(Segment[Rotate[(x(A8_{4}) + d2 / 2, y(A8_{4} + lenght / 2)), ((5 * 60))°, A8_{4}], Rotate[(x(A8_{4}) + d2 / 2, y(A8_{4} - lenght / 2)), ((5 * 60))°, A8_{4}]], r, A8_{4}) → G8_{4}
  261. Rotate(Segment[Rotate[(x(A8_{5}) + d2 / 2, y(A8_{5} + lenght / 2)), ((5 * 60))°, A8_{5}], Rotate[(x(A8_{5}) + d2 / 2, y(A8_{5} - lenght / 2)), ((5 * 60))°, A8_{5}]], r, A8_{5}) → G8_{5}
  262. Rotate(Segment[Rotate[(x(A8_{6}) + d2 / 2, y(A8_{6} + lenght / 2)), ((5 * 60))°, A8_{6}], Rotate[(x(A8_{6}) + d2 / 2, y(A8_{6} - lenght / 2)), ((5 * 60))°, A8_{6}]], r, A8_{6}) → G8_{6}
  263. Rotate(Segment[Rotate[(x(A8_{7}) + d2 / 2, y(A8_{7} + lenght / 2)), ((5 * 60))°, A8_{7}], Rotate[(x(A8_{7}) + d2 / 2, y(A8_{7} - lenght / 2)), ((5 * 60))°, A8_{7}]], r, A8_{7}) → G8_{7}
  264. Rotate(Segment[Rotate[(x(A9_{0}) + d2 / 2, y(A9_{0} + lenght / 2)), ((5 * 60))°, A9_{0}], Rotate[(x(A9_{0}) + d2 / 2, y(A9_{0} - lenght / 2)), ((5 * 60))°, A9_{0}]], r, A9_{0}) → G9_{0}
  265. Rotate(Segment[Rotate[(x(A9_{1}) + d2 / 2, y(A9_{1} + lenght / 2)), ((5 * 60))°, A9_{1}], Rotate[(x(A9_{1}) + d2 / 2, y(A9_{1} - lenght / 2)), ((5 * 60))°, A9_{1}]], r, A9_{1}) → G9_{1}
  266. Rotate(Segment[Rotate[(x(A9_{2}) + d2 / 2, y(A9_{2} + lenght / 2)), ((5 * 60))°, A9_{2}], Rotate[(x(A9_{2}) + d2 / 2, y(A9_{2} - lenght / 2)), ((5 * 60))°, A9_{2}]], r, A9_{2}) → G9_{2}
  267. Rotate(Segment[Rotate[(x(A9_{3}) + d2 / 2, y(A9_{3} + lenght / 2)), ((5 * 60))°, A9_{3}], Rotate[(x(A9_{3}) + d2 / 2, y(A9_{3} - lenght / 2)), ((5 * 60))°, A9_{3}]], r, A9_{3}) → G9_{3}
  268. Rotate(Segment[Rotate[(x(A9_{4}) + d2 / 2, y(A9_{4} + lenght / 2)), ((5 * 60))°, A9_{4}], Rotate[(x(A9_{4}) + d2 / 2, y(A9_{4} - lenght / 2)), ((5 * 60))°, A9_{4}]], r, A9_{4}) → G9_{4}
  269. Rotate(Segment[Rotate[(x(A9_{5}) + d2 / 2, y(A9_{5} + lenght / 2)), ((5 * 60))°, A9_{5}], Rotate[(x(A9_{5}) + d2 / 2, y(A9_{5} - lenght / 2)), ((5 * 60))°, A9_{5}]], r, A9_{5}) → G9_{5}
  270. Rotate(Segment[Rotate[(x(A9_{6}) + d2 / 2, y(A9_{6} + lenght / 2)), ((5 * 60))°, A9_{6}], Rotate[(x(A9_{6}) + d2 / 2, y(A9_{6} - lenght / 2)), ((5 * 60))°, A9_{6}]], r, A9_{6}) → G9_{6}
  271. Rotate(Segment[Rotate[(x(A9_{7}) + d2 / 2, y(A9_{7} + lenght / 2)), ((5 * 60))°, A9_{7}], Rotate[(x(A9_{7}) + d2 / 2, y(A9_{7} - lenght / 2)), ((5 * 60))°, A9_{7}]], r, A9_{7}) → G9_{7}
  272. Rotate(Segment[Rotate[(x(A9_{8}) + d2 / 2, y(A9_{8} + lenght / 2)), ((5 * 60))°, A9_{8}], Rotate[(x(A9_{8}) + d2 / 2, y(A9_{8} - lenght / 2)), ((5 * 60))°, A9_{8}]], r, A9_{8}) → G9_{8}

AI Drawing Prompt Reference

Draw a unit circle centered at the origin, and a vector from the origin to (2,0). Place a series of points on the circle. From each point, construct a vertical segment centered at that point with a fixed length. Rotate each segment by the same angle around its center point, creating multiple rotated segments. The endpoints of these rotated segments trace paths that intersect an ellipse. Dynamically adjust the rotation angle to observe how the intersection points change, illustrating rotational symmetry and the geometric relationship between polygons and conic sections.
The prompt above was compiled from the original drawing commands and is for reference only.