曲面折射数值示例：光线通过球面折射的几何作图

GeoGebra 命令及参数

1. Intersect(xAxis, yAxis) → A
2. Circle(A, R) → c
3. OrthogonalLine(B, xAxis) → f
4. CircleArc(A, B, T) → d
5. Intersect(d, xAxis) → C,
6. Polygon(T_2, T_1, B_1, B_2) → poly1, t_2, t_1, b_1, b_2
7. Segment(T, T_2) → g
8. Segment(B, B_2) → i_1
9. CircleArc(C, T_2, T) → e
10. Point(d) → P
11. Point(xAxis) → E
12. Ray(E, P) → j
13. Ray(A, P) → k
14. Angle(E, P, A) → i
15. Point(k) → F
16. Point(j) → G
17. Rotate(G, i - r_1, P) → G'
18. Angle(G, P, G') → α
19. Ray(P, G') → l
20. Vector(P, G') → v
21. Angle(G', P, F) → r
22. Point(l) → D
23. Ray(D, P) → m
24. Intersect(xAxis, m) → Im
25. Vector(E, P) → w
26. Point(w) → H
27. Point(w) → I
28. Vector(E, I) → a
29. Distance(Im, C) → distanceImC
30. Point(xAxis) → J
31. Point(xAxis) → K
32. Segment(J, K) → n
33. Ray(E, P) → p
34. Point(p) → M
35. Segment(P, M) → q
36. Segment(P, Im) → s
37. Point(k) → N
38. Segment(A, N) → t