Číslo kroku

S_1 = (7.032753192729948, -4.666007959012386)
S_2 = (18.24, -3.26)
p_1 = Line(S_1, S_2)
T = Point(p_1)
k_1 = Circle(S_1, T)
k_2 = Circle(S_2, T)
S_3 = (2.155572290911731, -15.712802797592794)
E = (3.53274990078376, -11.787846609457517)
k_3 = Circle(S_3, E)
a = 0 (slider from 0 to 5, step 1)
A = Point(p_1)
c = Circle(T, A)
f = Mirror(k_3, c)
B = Center(f)
C = Intersect(k_1, c, 2)
D = Intersect(k_1, c, 1)
g = Line(C, D)
F = Intersect(k_2, c, 1)
G = Intersect(k_2, c, 2)
h = Line(F, G)
i = AngularBisector(g, h)
j = OrthogonalLine(B, g)
H = Intersect(i, j)
I = Intersect(g, j)
J, M = Intersect(f, g)
K, L = Intersect(f, j)
d = Circle(K, Segment[H, I])
N = Intersect(d, j, 1)
e = Circle(B, N)
O = Intersect(d, j, 2)
k = Circle(B, O)
P = Intersect(k, i, 2)
p = Circle(P, Segment[H, I])
Q = Intersect(e, i, 2)
q = Circle(Q, Segment[H, I])
R = Intersect(k, i, 1)
r = Circle(R, Segment[H, I])
S = Intersect(e, i, 1)
s = Circle(S, Segment[H, I])
l = Line(L, g)
m = Line(K, g)
k_8 = Mirror(q, c)
k_5 = Mirror(p, c)
k_9 = Mirror(r, c)
k_7 = Mirror(s, c)
k_6 = Mirror(l, c)
k_4 = Mirror(m, c)
S_4 = Center(k_4)
S_6 = Center(k_6)
S_5 = Center(k_5)
S_8 = Center(k_8)
S_7 = Center(k_7)
S_9 = Center(k_9)