分数除法模型

GeoGebra 命令及参数

1. Point(Line[A, xAxis]) → B
2. Vector(A, B) → u_1
3. Polygon(A, B, 4) → poly1, f, g, h, i, C, D
4. Translate(Midpoint[A, D], Vector[(n_1 / d_1 * u_1)]) → A'_1
5. Translate(Midpoint[A, D], Vector[(1 / d_1 * u_1)]) → A'
6. Sequence(Segment[Translate[D, Vector[(k / d_1 * u_1)]], Translate[A, Vector[(k / d_1 * u_1)]]], k, 0, (d_1 * ceil(n_1 / d_1))) → list1
7. Translate(E, u_1) → F
8. Vector(E, F) → u_2
9. Polygon(F, E, 4) → poly2, j, k, l, m, G, H
10. Translate(Midpoint[E, G], Vector[(1 / d_2 * u_2)]) → I
11. Translate(Midpoint[E, G], Vector[(n_2 / d_2 * u_2)]) → J
12. Midpoint(A, E) → K
13. Translate(K, Vector[(n_1 / d_1 * u_1)]) → K'_1
14. Translate(K, Vector[(n_2 / d_2 * u_2)]) → K'
15. Vector(J, K') → u
16. Vector(A'_1, K'_1) → v
17. DynamicCoordinates(B, x(F), y(F)) → L
18. Sequence(Segment[Translate[E, Vector[(k / d_2 * u_2)]], Translate[G, Vector[(k / d_2 * u_2)]]], k, 0, (d_2 * ceil(n_2 / d_2))) → list2