Číslo kroku

S_1 = (7, -6.9)
A = (14.48, -4.02)
k_1 = Circle(S_1, A)
f = Line(S_1, A)
S_2 = Point(f)
k_2 = Circle(S_2, A)
a = 0 (slider from 0 to 5, step 1)
T = Point(k_1)
g = Line(S_1, T)
p = OrthogonalLine(T, g)
B = (8.78301487209994, -2.670032123735878)
ω = Circle(T, B)
C = Intersect(k_1, ω, 1)
D = Intersect(k_1, ω, 2)
k_1' = Line(C, D)
k_2' = Mirror(k_2, ω)
E = Intersect(k_2', k_1', 1)
h = OrthogonalLine(E, p)
F = Intersect(p, h)
G = Midpoint(F, E)
k_4' = Circle(G, E)
H = Intersect(k_2', h, 2)
k_3' = OrthogonalLine(H, h)
S = Center(k_2')
k_{5} = Mirror(k_4', ω)
k_3 = Mirror(k_3', ω)
S_3 = Center(k_3)
S_{5} = Center(k_{5})
i = Line(G, p)
I = Point(k_2')
j = Line(S, I)
c = Circle(I, Segment[F, G])
J = Intersect(c, j, 2)
d = Circle(S, J)
K = Intersect(d, i, 2)
L = Intersect(d, i, 1)
e = Circle(L, Radius[c])
k = Circle(K, Radius[c])
k_4 = Mirror(e, ω)
k_6 = Mirror(k, ω)
S_4 = Center(k_4)
S_6 = Center(k_6)