正多边形中的反射 by Arthur Lee

GeoGebra 命令及参数

1. Rotate(B, 360 * ° / n, A) → B'
2. Segment(B, B') → a
3. Sequence(Segment[Rotate[B, 360° * k / n, A], Rotate[B', 360° * k / n, A]], k, 0, n - 1) → list1
4. Sequence(Mirror[C, Element[list1, i]], i, 1, n) → list2
5. Sequence(Segment[Element[list2, i], Element[list2, i + 1]], i, 1, n - 1) → list3
6. Segment(Element[list2, n], Element[list2, 1]) → b
7. Circle(D, E) → c
8. Point(c) → G
9. Tangent(G, c) → d,
10. Mirror(F, d) → F'
11. Locus(F', G) → loc1