a = 0 (slider from 0 to 4, step 1)
A = (7.033384493866452, -7.75463868295214)
B = (13.78, -4.58)
p_2 = Line(A, B)
C = (8.302926263367768, -1.3757662539867765)
p_1 = Line(C, B)
S = (46.16451701284195, -2.537154347088732)
E = (43.41347981756852, -9.983927444639233)
k = Circle(S, E)
f, g = AngularBisector(p_1, p_2)
h = OrthogonalLine(S, p_2)
D = Intersect(p_2, h)
c = Circle(D, Radius[k])
F = Intersect(c, h, 2)
i = OrthogonalLine(F, h)
G = Intersect(c, h, 1)
j = OrthogonalLine(G, h)
d = Parabola(S, i)
e = Parabola(S, j)
S_2, S_3 = Intersect(e, f)
S_1, S_4 = Intersect(d, f)
S_5, S_7 = Intersect(d, g)
S_{8}, S_{9} = Intersect(e, g)
l = OrthogonalLine(S_2, p_2)
m = OrthogonalLine(S_{8}, p_2)
n = OrthogonalLine(S_3, p_2)
p = OrthogonalLine(S_{9}, p_2)
q = OrthogonalLine(S_5, p_2)
r = OrthogonalLine(S_1, p_2)
s = OrthogonalLine(S_7, p_2)
t = OrthogonalLine(S_4, p_2)
H = Intersect(l, p_2)
I = Intersect(p_2, m)
J = Intersect(p_2, r)
K = Intersect(p_2, n)
L = Intersect(q, p_2)
M = Intersect(s, p_2)
N = Intersect(p, p_2)
O = Intersect(t, p_2)
k_2 = Circle(S_2, H)
k_{8} = Circle(S_{8}, I)
k_3 = Circle(S_3, K)
k_{9} = Circle(S_{9}, N)
k_5 = Circle(S_5, L)
k_1 = Circle(S_1, J)
k_{7} = Circle(S_7, M)
k_4 = Circle(S_4, O)