Multiplication of Decimals and Geometric Construction

GeoGebra Commands & Parameters

1. Segment(A, B) → f
2. Segment(C, B) → g
3. Segment(A, D) → h
4. Segment(D, C) → i
5. Segment(E, F) → j
6. Segment(F, G) → k
7. Segment(H, G) → l
8. Segment(E, H) → m
9. Sequence(Segment[((i / d1 * 2) - 4, -1), ((i / d1 * 2) - 4, 1)], i, 0, d1, 1) → l1
10. Sequence(Segment[(2, (i / d2 * 2) - 1), (4, (i / d2 * 2) - 1)], i, 0, d2, 1) → l2
11. Polygon(A, n1a, n1b, B) → q1, a, n, p, b
12. Polygon(E, n2a, n2b, H) → q2, e, q, r, h_1
13. Segment(I, J) → s
14. Point(s) → K
15. Vector(I, K) → u
16. Translate(l1, u) → l1'
17. Translate(l2, Vector[(-u)]) → l2'
18. Translate(A, u) → A'
19. Translate(n1a, u) → n1a'
20. Translate(n1b, u) → n1b'
21. Translate(B, u) → B'
22. Translate(E, u) → E'
23. Translate(H, u) → H'
24. Translate(E, Vector[(-u)]) → E'_{1}
25. Translate(n2a, Vector[(-u)]) → n2a'_{1}
26. Translate(n2b, Vector[(-u)]) → n2b'_{1}
27. Translate(H, Vector[(-u)]) → H'_{1}
28. Polygon(E'_{1}, n2a'_{1}, n2b'_{1}, H'_{1}) → q2'_{1}, e'_{1}, g_1, i_1, h'_{1}
29. Translate(A, u) → A'_{1}
30. Translate(n1a, u) → n1a'_{1}
31. Translate(n1b, u) → n1b'_{1}
32. Translate(B, u) → B'_{1}
33. Polygon(A'_{1}, n1a'_{1}, n1b'_{1}, B'_{1}) → q1', a'_{1}, t, c, b'_{1}
34. Translate(A, u) → A'_{2}
35. Translate(D, u) → D'
36. Segment(A'_{2}, D') → h'
37. Translate(C, u) → C'
38. Translate(B, u) → B'_{2}
39. Segment(C', B'_{2}) → g'
40. Translate(E, Vector[(-u)]) → E'_{2}
41. Translate(F, Vector[(-u)]) → F'
42. Segment(E'_{2}, F') → j'
43. Translate(H, Vector[(-u)]) → H'_{2}
44. Translate(G, Vector[(-u)]) → G'
45. Segment(H'_{2}, G') → l'
46. Intersect(g_1, t) → L
47. Polygon(A', n2a'_{1}, L, M) → q3, a', d, l_1, m_1
48. GCD(n1, d1) → gcd1
49. GCD(n2, d2) → gcd2