číslo kroku

S = (3.7798451375782083, 0.34238847914241255)
B = (6.764275630445132, 6.383778915043852)
k = Circle(S, B)
C = (-7.82185507005823, -3.238485316701827)
p_2, p_1 = Tangent(C, k)
h = OrthogonalLine(S, p_1)
i = OrthogonalLine(S, p_2)
D = Intersect(p_2, i)
E = Intersect(p_1, h)
j, k_{5} = AngularBisector(p_1, p_2)
S_3 = Intersect(h, k_{5})
S_4 = Intersect(i, k_{5})
k_4 = Circle(S_4, D)
k_3 = Circle(S_3, E)
H = Intersect(k, j, 1)
l = OrthogonalLine(H, j)
I = Intersect(k, j, 2)
m = OrthogonalLine(I, j)
n_{1}, p = AngularBisector(l, p_1)
q, r = AngularBisector(p_1, m)
S_2 = Intersect(j, r)
S_1 = Intersect(j, n_{1})
k_1 = Circle(S_1, H)
k_2 = Circle(S_2, I)
n = 0 (slider from 0 to 17, step 1)