Area Model for Fraction Multiplication

GeoGebra Commands & Parameters

1. Max(Sequence[If[Mod[(a * c), i] + Mod[(b * d), i] ≟ 0, i, -1], i, 1, Min[{(a * c), (b * d)}]]) → Simplified_{GCF}
2. Sequence(A + (t * (B - A)), t, 0, 1, 1 / b) → L1
3. Sequence(C + (t * (D - C)), t, 0, 1, 1 / b) → L2
4. Segment(A, B) → c_1
5. Segment(C, D) → d_1
6. Sequence(Segment[Element[L1, k], Element[L2, k]], k, 2, b) → L5
7. Segment((0, 3), (4.8, 3)) → e
8. Point(e) → H
9. Segment(H, E) → f
10. Segment(E, F) → g
11. Segment(F, G) → h
12. Segment(G, H) → i
13. Segment(D, B) → j
14. Segment(C, A) → k
15. Element(L1, a + 1) → T1
16. Element(L2, a + 1) → T2
17. Polygon(A, T1, T2, C) → poly1, a_1, t1, t2, c_2
18. Sequence(E + (t * (H - E)), t, 0, 1, 1 / d) → L3
19. Sequence(F + (t * (G - F)), t, 0, 1, 1 / d) → L4
20. Sequence(Segment[Element[L3, k], Element[L4, k]], k, 2, d) → L6
21. Element(L3, c + 1) → T3
22. Element(L4, c + 1) → T4
23. Polygon(E, F, T4, T3) → poly2, e_1, f_1, t4, t3