C = (10.2, -6.2)
A = (17.08600353622507, -8.423691031595396)
p_2 = Line(A, C)
r = OrthogonalLine(C, p_2)
a = 0 (slider from 0 to 8, step 1)
C_{1} = (6.642455417379652, -10.25069472141705)
p_1 = Line(C_{1}, C)
S = Point(r)
k = Circle(S, C)
f, g = AngularBisector(p_2, p_1)
D = Mirror(S, C)
c = Circle(C, Radius[k])
i = OrthogonalLine(C, p_1)
F = Intersect(c, i, 2)
G = Intersect(c, i, 1)
j = Line(F, p_1)
l = Line(G, p_1)
h = Line(D, p_2)
B = Point(g)
m = OrthogonalLine(B, j)
E = Intersect(j, m)
d = Circle(B, E)
H = Intersect(g, j)
n = Line(H, S)
I = Intersect(d, n, 1)
J = Intersect(d, n, 2)
p = Line(J, B)
q = Line(I, B)
s = Line(S, q)
S_1 = Intersect(g, s)
e = Circle(S_1, S)
t = Line(S, p)
L = Intersect(k, p_1, 1)
c_1 = Circle(L, S)
b = OrthogonalLine(S_1, p_2)
K = Intersect(p_2, b)
k_1 = Circle(S_1, K)
M = Point(f)
f_1 = OrthogonalLine(M, l)
N = Intersect(l, f_1)
d_1 = Circle(M, N)
O = Intersect(f, l)
g_1 = Line(S, O)
P = Intersect(d_1, g_1, 2)
h_1 = Line(P, M)
Q = Intersect(d_1, g_1, 1)
i_1 = Line(Q, M)
j_1 = Line(S, i_1)
l_1 = Line(S, h_1)
S_2 = Intersect(f, l_1)
e_1 = Circle(S_2, S)
T = Intersect(k, p_2, 1)
q_1 = Circle(T, S)
U = Intersect(k, l_1, 2)
k_2 = Circle(S_2, U)