等腰三角形对称变换作图演示

GeoGebra 命令及参数

1. Segment(B, A) → g
2. Rotate(A, ((-a) * pi / 180), B) → A'
3. Ray(B, A') → l
4. Rotate(B, (a * pi / 180), A) → B'
5. Ray(A, B') → f
6. Point(f) → C
7. Ray(A, C) → k
8. Intersect(k, l) → F
9. Segment(F, B) → q
10. Segment(F, A) → h
11. Segment(C, B) → i
12. Circle(A, (0.25 * Min[{q, h, g}])) → c
13. Intersect(c, g, 1) → D
14. Intersect(c, h, 1) → E
15. Polygon(A, B, F) → t1, m, n, p
16. CircleSector(A, D, E) → d
17. Ray(B, A') → j
18. Angle(B, A, C) → β
19. Dilate(A, If[0 < b ≤ 1, 1 - b, 0], B) → A'_{1}
20. Vector(A, A'_{1}) → u
21. Translate(d, u) → d'
22. Rotate(d', If[0 < b ≤ 1, (b * (pi - (a * pi / 180))), pi - (a * pi / 180)], A'_{1}) → d''
23. Ray(A, F) → r
24. Dilate(A, If[1.75 < b ≤ 2.75, 2.75 - b, 0], F) → A'_{2}
25. Dilate(B, If[1.75 < b ≤ 2.75, 2.75 - b, 0], F) → B'_{1}
26. Dilate(B, If[1.75 < b ≤ 2.75, 2.75 - b, 0], F) → B'_{2}
27. Vector(B, B'_{2}) → v
28. Translate(d'', v) → d'''
29. Rotate(d''', If[1.75 < b ≤ 2.75, (((b - 1.75) * 2) * pi / 3), (2 * pi / 3)], B'_{2}) → e
30. Ray(B, F) → s
31. Dilate(A, If[3 < b ≤ 4, 4 - b, 0], F) → A'_{3}
32. Dilate(B, If[3 < b ≤ 4, 4 - b, 0], F) → B'_{3}
33. Segment(A, A'_{3}) → t
34. Segment(B, B'_{3}) → f_1