A = (7.269533759245, -9.71804012571046)
S = (17.54, -3.08)
p_1 = Line(A, S)
C = (15.972612840743826, 2.264834336649927)
p_2 = Line(S, C)
D = Point(p_2)
k = Circle(S, D)
a = 0 (slider from 0 to 6, step 1)
f, g = AngularBisector(p_2, p_1)
T_3, T_1 = Intersect(k, g)
T_4, T_2 = Intersect(k, f)
h = Tangent(T_4, k)
i = Tangent(T_1, k)
j = Tangent(T_2, k)
l = Tangent(T_3, k)
m, n = AngularBisector(p_1, i)
S_1 = Intersect(g, m)
S_2 = Intersect(g, n)
k_1 = Circle(S_1, T_1)
k_2 = Circle(S_2, T_1)
B = Intersect(p_2, j)
p, q = AngularBisector(p_2, j)
S_3 = Intersect(f, q)
S_4 = Intersect(f, p)
k_3 = Circle(S_3, T_2)
k_4 = Circle(S_4, T_2)
S_5 = Mirror(S_1, S)
k_5 = Mirror(k_1, S)
k_7 = Mirror(k_3, S)
S_7 = Mirror(S_3, S)
S_8 = Mirror(S_4, S)
k_8 = Mirror(k_4, S)
k_6 = Mirror(k_2, S)
S_6 = Mirror(S_2, S)