用圆规如何找到一个平方根？

GeoGebra 命令及参数

1. Point(xAxis) → B
2. Segment(A, O) → f
3. Point(yAxis) → C
4. Ray(O, C) → g
5. Midpoint(A, B) → D
6. Circle(D, A) → c
7. Intersect(c, g) → E,
8. Sequence((i, 0), i, 0, 100) → l1
9. Segment(E - (0.2, 0), E + (0.2, 0)) → h
10. Semicircle(A, B) → d
11. Sequence((0, sqrt(i)), i, 0, 100) → l3
12. Sequence(Semicircle[A, Element[l1, i]], i, 1, 100) → l2
13. Vector(G, F) → u
14. Polygon(A, E, B) → t1, b, a, e
15. Circle(H, 1) → k
16. Point(k) → I
17. Tangent(I, k) → i,
18. Circle(H, sqrt(x(B))) → p
19. Intersect(p, i) → J, K
20. Line(H, i) → j
21. OrthogonalLine(J, j) → l
22. Intersect(j, l) → L
23. Intersect(p, j) → M, N
24. Line(L, l) → m
25. Line(M, m) → n
26. Intersect(n, i) → P
27. Polygon(H, I, J, L) → q1, h_1, i_1, j_1, l_1
28. Polygon(L, J, P, M) → q2, l_2, j_2, p_1, m_1
29. Midpoint(H, I) → Q
30. Segment(P, I) → s
31. Segment(I, P) → t
32. Segment((0, 0), E) → f_1
33. Segment(H, J) → q
34. CircleArc(H, J, M) → r