两个椭圆

GeoGebra 命令及参数

1. Line(F', xAxis) → p
2. Point(p) → F
3. Mirror(F', F) → A'_{1}
4. Ellipse(F', F, C) → d
5. Midpoint(F', F) → E
6. Line(F', F) → l
7. Intersect(d, l) → H, I
8. Distance(E, I) → R
9. OrthogonalLine(E, l) → m
10. Intersect(d, m) → J, K
11. Distance(E, K) → r
12. Tangent(D, d) → h, n
13. Mirror(F', h) → A'
14. Segment(F', F) → f
15. Ellipse(F', F, C) → c
16. Line(F', F) → g
17. Polygon(F, D, F') → t1, a_1, b, d_1
18. Mirror(F, h) → B'
19. Mirror(D, h) → D'
20. Polygon(B', D', A') → t1', a', b', d'
21. Ellipse(B', A', D) → e
22. Point(e) → F_{1}
23. Angle(F, F', B') → α
24. Angle(A'_{1}, F, A') → β
25. CurveCartesian(x(F') + (Distance[F, A'] * cos(i)), y(F') + (Distance[F, A'] * sin(i)), i, 0, α) → a
26. CurveCartesian(x(F) + (Distance[F, A'] * cos(i)), y(F) + (Distance[F, A'] * sin(i)), i, 0, β) → i
27. Midpoint(F', A) → B
28. CurveCartesian(x(F') + (Distance[F, B] * cos(i)), y(F') + (Distance[F, B] * sin(i)), i, 0, α) → k