S_2 = (0.8, 3.26)
T = (3.3, 1.36)
k_2 = Circle(S_2, T)
p = Tangent(T, k_2)
g = OrthogonalLine(T, p)
S_1 = Point(g)
D = Point(g)
k_1 = Circle(S_1, D)
a = 0 (slider from 0 to 3, step 1)
A = Intersect(k_1, g, 1)
B = Intersect(k_1, g, 2)
S_4 = Midpoint(B, T)
S_3 = Midpoint(A, T)
k_3 = Circle(S_3, T)
k_4 = Circle(S_4, T)