Číslo kroku

A = (2.62, 0.5)
B = Point(Circle[A, 4])
f = Segment(A, B)
b = Circle(A, 2)
a = Circle(B, 2)
g = Line(A, B)
C = Midpoint(A, B)
D = Point(g)
E, F = Intersect(a, g)
i = LineBisector(F, D)
G = Intersect(i, g)
e = Hyperbola(B, D, G)
j = LineBisector(C, D)
H = Intersect(e, j, 1)
k = Hyperbola(A, D, H)
I, J, K = Intersect(e, k)
k_1 = Circle(K, D)
k_2 = Circle(J, D)
k_3 = Circle(H, C)
Krok = 0 (slider from 0 to 5, step 1)