A = (2.88, -8.18)
B = (8.42, -1.86)
p_1 = Line(A, B)
C_{1} = (21.312685714285692, -6.545180952380968)
p_2 = Line(A, C_{1})
D = Point(p_1)
h = OrthogonalLine(D, p_1)
S = Point(h)
k = Circle(S, D)
f = OrthogonalLine(D, p_1)
g, i = AngularBisector(p_1, p_2)
S_1 = Intersect(f, i)
k_1 = Circle(S_1, D)
S_2 = Intersect(f, g)
k_2 = Circle(S_2, D)
G = Mirror(S, p_1)
a = 0 (slider from 0 to 10, step 1)
j = OrthogonalLine(A, p_2)
l = OrthogonalLine(A, p_1)
c = Circle(A, Radius[k])
E = Intersect(c, l, 2)
m = OrthogonalLine(E, l)
F = Intersect(c, j, 1)
n = OrthogonalLine(F, j)
C = Point(g)
p = OrthogonalLine(C, m)
I = Intersect(m, p)
d = Circle(C, I)
J = Intersect(g, m)
q = Line(J, S)
S'' = Intersect(d, q, 1)
S' = Intersect(d, q, 2)
r = Line(C, S')
s = Line(S'', C)
t = Line(S, s)
b = Line(S, r)
S_3 = Intersect(g, b)
e = Circle(S_3, S)
S_4 = Intersect(g, t)
c_1 = Circle(S_4, S)
f_1 = Line(S_3, S)
g_1 = Line(S_4, S)
H = Intersect(k, f_1, 1)
k_3 = Circle(S_3, H)
K = Intersect(k, g_1, 1)
k_4 = Circle(S_4, K)
L = Intersect(c, j, 2)
h_1 = Line(L, n)
M = Point(i)
i_1 = OrthogonalLine(M, m)
N = Intersect(m, i_1)
d_1 = Circle(M, N)
O = Intersect(i, m)
j_1 = Line(O, S)
S''' = Intersect(d_1, j_1, 1)
l_1 = Line(M, S''')
S'''' = Intersect(d_1, j_1, 2)
m_1 = Line(M, S'''')
n_1 = Line(S, m_1)
q_1 = Line(S, l_1)
S_5 = Intersect(i, n_1)
T = Intersect(k, n_1, 1)
e_1 = Circle(S_5, T)
r_1 = OrthogonalLine(S_5, m)
U = Intersect(m, r_1)
s_1 = Circle(S_5, U)
S_6 = Intersect(i, q_1)
t_1 = OrthogonalLine(S_6, m)
W = Intersect(m, t_1)
c_2 = Circle(S_6, W)
Z = Intersect(p_1, t_1)
d_2 = Circle(S_6, Z)