分数化简 by Eduardo Neto

GeoGebra 命令及参数

1. Segment(A, B) → a_1
2. Segment(B, C) → b_1
3. Segment(C, D) → c_1
4. Segment(D, A) → d_1
5. Ray(D, C) → e
6. Point(e) → E
7. Segment(E, F) → e_1
8. Segment(F, G) → f_1
9. Segment(G, H) → g_1
10. Segment(H, E) → h_1
11. Sequence(A + t * (B - A), t, 0, 1, 1 / b) → L1
12. Sequence(D + t * (C - D), t, 0, 1, 1 / b) → L2
13. Sequence(H + t * (G - H), t, 0, 1, 1 / d) → L3
14. Sequence(E + t * (F - E), t, 0, 1, 1 / d) → L4
15. Sequence(Segment[Element[L1, k], Element[L2, k]], k, 2, b) → L5
16. Sequence(Segment[Element[L3, k], Element[L4, k]], k, 2, d) → L6
17. Element(L1, a + 1) → T1
18. Element(L2, a + 1) → T2
19. Polygon(A, T1, T2, D) → poly1, a_2, t1, t2, d_2
20. Element(L3, c + 1) → T3
21. Element(L4, c + 1) → T4
22. Polygon(E, T4, T3, H) → poly2, e_2, t4, t3, h_2