不同单表面折射现象的几何作图

GeoGebra 命令及参数

1. Line(P, C1) → f
2. CircleArc(C1, B, A) → c
3. Segment(A, B) → g
4. CircleArc(C2, A, B) → d
5. Intersect(f, xAxis) → C
6. Intersect(f, xAxis) → D
7. Intersect(f, xAxis) → E
8. Intersect(f, xAxis) → F
9. Intersect(d, f) → G,
10. Line(A, f) → i
11. Line(B, f) → j
12. OrthogonalLine(G, f) → k
13. Intersect(i, k) → H
14. Intersect(k, j) → I
15. Segment(H, I) → l
16. Segment(H, A) → m
17. Segment(I, B) → n
18. Vector(O, O') → v
19. Line(O', f) → p
20. Intersect(c, g, 2) → M
21. CircleArc(C2, A, B) → e
22. CircleArc(C3, A, B) → q
23. CircleArc(C2, A, B) → r
24. CircleArc(C1, B, A) → s
25. CircleArc(C2, A1, B1) → t
26. CircleArc(C1, B2, A2) → c_1
27. Segment(A2, A1) → a
28. Segment(B2, B1) → b