Dotyčnica elipsy v danom smere
Author: Daniela Velichová

F_1 = (-1.48, 1.26)
F_2 = (5.08, 1.28)
M = (2.58, -1.16)
c = Ellipse(F_1, F_2, M)
o = Line(F_1, F_2)
A, B = Intersect(c, o)
S = Midpoint(F_1, F_2)
R = (6.62, 4.74)
C = (-1.5666666666666722, 7.693333333333332)
s = Line(R, C)
k = OrthogonalLine(F_1, s)
v = Circle(S, Segment[S, A])
P_2, P_1 = Intersect(v, k)
t_1 = OrthogonalLine(P_1, k)
Q_1 = Mirror(F_1, t_1)
b = Segment(Q_1, F_2)
T_1 = Intersect(t_1, b)
t_2 = OrthogonalLine(P_2, k)
Q_2 = Mirror(F_1, t_2)
a = Segment(Q_2, F_2)
T_2 = Intersect(t_2, a)