E = (-5.7125215960785, 13.849766574893547)
C = (-104.12855388152975, 27.62129327695332)
l_1 = Line(C, E)
A = (-3.06, -0.9)
B = (7.12, -2.42)
f = Line(A, B)
D = Point(l_1)
c = Circle(C, D)
d = Circle(E, D)
g = OrthogonalLine(C, f)
h = OrthogonalLine(E, f)
G = Intersect(c, g, 1)
H = Intersect(d, h, 1)
I = Intersect(f, g)
e = Circle(I, Segment[C, G])
J = Intersect(f, h)
k = Circle(J, Segment[E, H])
K, L = Intersect(e, g)
M, N = Intersect(k, h)
j = Line(N, f)
l = Line(M, f)
m = Line(K, f)
O = Intersect(j, g)
P = Intersect(g, l)
i = Line(L, f)
p = Parabola(C, m)
q = Parabola(C, i)
r = Parabola(E, l)
s = Parabola(E, j)
Q, R = Intersect(s, q)
S, T = Intersect(p, r)
U, E_1 = Intersect(p, q)
V, G_1 = Intersect(p, s)
W, H_1 = Intersect(r, s)
Z, F_1 = Intersect(r, q)
n = OrthogonalLine(Q, f)
t = OrthogonalLine(T, f)
A_1 = Intersect(f, t)
c_1 = Circle(T, A_1)
B_1 = Intersect(f, n)
d_1 = Circle(Q, B_1)
a = OrthogonalLine(R, f)
C_1 = Intersect(f, a)
e_1 = Circle(R, C_1)
b = OrthogonalLine(S, f)
D_1 = Intersect(f, b)
f_1 = Circle(S, D_1)
krok = 0 (slider from 0 to 7, step 1)
g_1 = OrthogonalLine(F_1, f)
h_1 = OrthogonalLine(Z, f)
I_1 = Intersect(f, g_1)
J_1 = Intersect(f, h_1)
k_1 = Circle(F_1, I_1)
p_1 = Circle(Z, J_1)
i_1 = OrthogonalLine(G_1, f)
j_1 = OrthogonalLine(V, f)
K_1 = Intersect(f, i_1)
L_1 = Intersect(f, j_1)
q_1 = Circle(V, L_1)
r_1 = Circle(G_1, K_1)