a = 0 (slider from 0 to 5, step 1)
S_1 = (7.88, -3.6)
B = (1.12, 2.08)
k_1 = Circle(S_1, B)
f = Line(S_1, B)
S_2 = Point(f)
k_2 = Circle(S_2, B)
e = Ellipse(S_2, S_1, B)
S_3 = Point(e)
g = Line(S_1, S_3)
E = Intersect(k_1, g, 2)
k_3 = Circle(S_3, E)
A = Intersect(k_2, k_3, 1)
C = (8.76, 0.04)
c = Circle(A, C)
d = Mirror(k_2, c)
h = Mirror(k_3, c)
i = Line(A, S_2)
D = Intersect(d, i, 1)
j = OrthogonalLine(D, i)
F = Intersect(h, i, 1)
k = OrthogonalLine(F, i)
p = Mirror(k_1, c)
G = Center(p)
l = Line(G, j)
H = Intersect(p, l, 1)
q = Circle(H, Radius[p])
I = Intersect(p, l, 2)
r = Circle(I, Radius[p])
J = Intersect(r, l, 2)
s = Circle(J, Radius[p])
K = Intersect(q, l, 1)
t = Circle(K, Radius[p])
k_4 = Mirror(s, c)
k_5 = Mirror(t, c)
S_4 = Center(k_4)
S_5 = Center(k_5)