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

F_1 = (-3.6266666666666727, 1.2333333333333305)
F_2 = (2.9733333333333287, 1.2333333333333305)
M = (4.693333333333332, -1.7266666666666701)
c = Hyperbola(F_1, F_2, M)
o = Line(F_1, F_2)
A, B = Intersect(c, o)
S = Midpoint(F_1, F_2)
f = Circle(S, F_1)
h = OrthogonalLine(A, o)
L, K = Intersect(f, h)
a_1 = Line(S, K)
a_2 = Line(S, L)
R = (7.973333333333332, 1.6033333333333306)
C = (2.713333333333331, 7.623333333333331)
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)
t_2 = OrthogonalLine(P_2, k)
Q_2 = Mirror(F_1, t_2)
g = Circle(F_2, Segment[A, B])
T_1 = Intersect(c, t_1, 1.0)
b = Segment(Q_1, F_2)
d = Segment(Q_1, T_1)
T_2 = Intersect(c, t_2, 1.0)
a = Segment(Q_2, F_2)
e = Segment(F_2, T_2)