气泡图案与变换

GeoGebra 命令及参数

1. Ray(A, Vector[(0, 1)]) → d
2. Point(d) → D
3. Circle(A, D) → c
4. Polygon(A, B, C) → poly1, c_1, a, b
5. Vector(A, B) → u
6. Vector(A, C) → v
7. Polygon(E, F, G) → poly2, g, e, f
8. Ray(E, Vector[(0, 1)]) → h
9. Point(h) → H
10. Circle(E, H) → k
11. Vector(E, F) → w
12. Vector(E, G) → z
13. Sequence(Sequence[If[(i ≠ 0) ∨ (j ≠ 0), Translate[c, Vector[(i * u) + (j * v)]]], i, (-m), m], j, (-m), m) → list1
14. Sequence(Sequence[If[(i ≠ 0) ∨ (j ≠ 0), Translate[k, Vector[(i * w) + (j * z)]]], i, (-n), n], j, (-n), n) → list2