球面上的七种带状图案

GeoGebra 命令及参数

1. Sphere((0, 0, 0), 1) → a
2. PointIn(a) → A
3. Sequence(Rotate[A, ((w * 2) * π / 8)], w, 1, 8) → L_1
4. Mirror(A, z = 0) → A'
5. Sequence(Rotate[A, ((w * 2) * π / 8)], w, 1, 8) → L_2
6. Sequence(Rotate[A', ((w * 2) * π / 8)], w, 1, 8) → L_3
7. Mirror(A, y = 0) → B
8. Sequence(Rotate[A, ((w * 2) * π / 8)], w, 1, 8) → L_4
9. Sequence(Rotate[B, ((w * 2) * π / 8)], w, 1, 8) → L_5
10. Mirror(A, z = 0) → C
11. Mirror(A, y = 0) → D
12. Mirror(C, y = 0) → E
13. Sequence(Rotate[A, ((w * 2) * π / 8)], w, 1, 8) → L_6
14. Sequence(Rotate[C, ((w * 2) * π / 8)], w, 1, 8) → L_7
15. Sequence(Rotate[D, ((w * 2) * π / 8)], w, 1, 8) → L_8
16. Sequence(Rotate[E, ((w * 2) * π / 8)], w, 1, 8) → L_9
17. Rotate(A, π, xAxis) → F
18. Sequence(Rotate[A, ((w * 2) * π / 8)], w, 1, 8) → L_{10}
19. Sequence(Rotate[F, ((w * 2) * π / 8)], w, 1, 8) → L_{11}
20. Mirror(Rotate[A, (2 * π / 16)], z = 0) → G
21. Sequence(Rotate[A, ((w * 2) * π / 8)], w, 1, 8) → L_{12}
22. Sequence(Rotate[G, ((w * 2) * π / 8)], w, 1, 8) → L_{13}
23. Mirror(A, y = 0) → H
24. Mirror(Rotate[A, (2 * π / 16)], z = 0) → I
25. Mirror(Rotate[H, (2 * π / 16)], z = 0) → J
26. Sequence(Rotate[A, ((w * 2) * π / 8)], w, 1, 8) → L_{14}
27. Sequence(Rotate[H, ((w * 2) * π / 8)], w, 1, 8) → L_{15}
28. Sequence(Rotate[I, ((w * 2) * π / 8)], w, 1, 8) → L_{16}
29. Sequence(Rotate[J, ((w * 2) * π / 8)], w, 1, 8) → L_{17}