a = 0 (slider from 0 to 4, step 1)
S_1 = (2.35204, 1.92322)
B = (6.0256, 3.78662)
k_1 = Circle(S_1, B)
S_2 = (11.67471194083346, -0.3864070003891891)
D = (8.66, 0.9)
k_2 = Circle(S_2, D)
E = (2.44, -0.8)
F = (12.72, 0.9)
p = Line(E, F)
g = OrthogonalLine(S_1, p)
h = OrthogonalLine(S_2, p)
A = Intersect(p, g)
c = Circle(A, Radius[k_1])
C = Intersect(p, h)
d = Circle(C, Radius[k_2])
G = Intersect(c, g, 1)
i = OrthogonalLine(G, g)
H = Intersect(c, g, 2)
j = OrthogonalLine(H, g)
I = Intersect(d, h, 2)
k = OrthogonalLine(I, h)
J = Intersect(d, h, 1)
l = OrthogonalLine(J, h)
e = Parabola(S_1, j)
p_{1} = Parabola(S_1, i)
q = Parabola(S_2, l)
r = Parabola(S_2, k)
S_3, S_{4} = Intersect(q, p_{1})
S_5, S_6 = Intersect(e, r)
m = OrthogonalLine(S_3, p)
n = OrthogonalLine(S_{4}, p)
s = OrthogonalLine(S_5, p)
t = OrthogonalLine(S_6, p)
O = Intersect(t, p)
P = Intersect(n, p)
Q = Intersect(p, s)
R = Intersect(p, m)
k_5 = Circle(S_5, Q)
k_3 = Circle(S_3, R)
k_4 = Circle(S_{4}, P)
k_6 = Circle(S_6, O)