číslo kroku

A = (1.2, -3.62)
B = (16.32, -3.5)
f = Line(A, B)
S = (5.18, -2.08)
c = Circle(S, A)
g = OrthogonalLine(S, f)
C = Intersect(g, f)
d = Circle(C, Radius[c])
D = Intersect(d, g, 2)
h = Line(D, f)
e = Parabola(S, h)
E = Intersect(d, g, 1)
i = Line(E, f)
k = Parabola(S, i)
n = 0 (slider from 0 to 4, step 1)