双曲线的切线与光线反射

GeoGebra 命令及参数

1. Hyperbola(F_1, F_2, F) → d
2. Point(d) → B
3. Vector(F_1, B) → v
4. Intersect(d, xAxis, 1) → A
5. Vector(F_2, B) → u
6. If(t ≤ 1, ((t * x(u)) + x(F_2), (t * y(u)) + y(F_2))) → D
7. If(t ≟ 2, Tangent[B, d]) → f
8. Point(f) → G
9. If(t ≥ 1, (((t - 1) * x(v)) + x(B), ((t - 1) * y(v)) + y(B))) → C
10. Line(F_1, B) → h
11. If(t ≤ 1, Vector[F_2, D]) → u_{53}
12. Vector(B, C) → v_{53}
13. If(t ≥ 1, Segment[F_2, B]) → g
14. If(t ≥ 2, Line[F_1, B]) → p_{53}