构造四分之三角的 GeoGebra 示例

GeoGebra 命令及参数

1. Polygon((22, y(Corner[1])), Corner[2], Corner[3], (22, y(Corner[4]))) → mask, a, b, c, d
2. Segment(S, U) → FirstArcDistance
3. Ray(S, U) → FirstAngleRay1
4. Ray(S, FirstAngleRaypt) → FirstAngleRay2
5. Circle(S, Segment[S, U]) → CircRad1
6. Circle(S, (2 * Segment[S, U])) → CircRad2
7. Intersect(CircRad2, FirstAngleRay1) → Udouble,
8. Intersect(CircRad2, FirstAngleRay2) → Tdouble,
9. Intersect(CircRad1, FirstAngleRay2) → T,
10. Circle(U, Udouble) → CircCenU
11. Circle(T, Tdouble) → CircCenT
12. Midpoint(U, T) → F
13. Ray(S, F) → MidRay
14. Vector(S, S + (2 * (F - S))) → ShiftVec
15. Translate(F, ShiftVec) → Ftranslated
16. Intersect(CircCenT, Segment[F, Ftranslated]) → W,
17. CircumcircleArc(Tdouble, W, S) → ArcT
18. CircumcircleArc(Udouble, W, S) → ArcU
19. Intersect(CircRad2, MidRay) → A,
20. Intersect(CircRad1, MidRay) → X,
21. Midpoint(X, U) → G
22. Ray(S, G) → ThreeQuarterRay
23. Translate(G, Vector[(2 * Vector[S, G])]) → Gtranslated
24. Intersect(ArcU, Segment[G, Gtranslated]) → Z,
25. CircumcircleArc(A, Z, S) → ArcX
26. Mirror(X, FirstAngleRay1) → FirstArcA
27. Mirror(X, FirstAngleRay2) → FirstArcB
28. CircumcircleArc(FirstArcB, X, FirstArcA) → FirstArc
29. Intersect(ArcX, Segment[U, Udouble]) → B,
30. CircumcircleArc(A, Z, B) → ArcXShort
31. Midpoint(T, X) → C
32. Ray(S, C) → QuarterRay
33. Intersect(ArcT, Segment[G, Gtranslated]) → I,
34. CircumcircleArc(Tdouble, W, I) → ArcTShort
35. Translate(C, Vector[(2 * Vector[S, C])]) → Ctranslated
36. Intersect(ArcU, Segment[C, Ctranslated]) → E,
37. CircumcircleArc(Udouble, W, E) → ArcUShort
38. Ray(S, G) → EndRay1
39. Ray(S, FirstAngleRaypt) → EndRay2