1349

a = -3 (slider from -100 to 100, step 0.001)
A: (a, 0)
b = 3 (slider from -100 to 100, step 0.001)
B: (b, 0)
körív = Semicircle(A, B)
átmérő = Segment(A, B)
C = Point(körív)
f = Tangent(C, körív)
g = OrthogonalLine(C, f)
M = Intersect(f, xAxis)
d = Circle(M, C)
D = Intersect(d, átmérő, 1)
h = OrthogonalLine(D, átmérő)
K = Intersect(g, h)
e = Circle(K, C)
i = Segment(K, C)
j = Segment(K, D)
E = Intersect(körív, yAxis, 1)
F = Point(yAxis)
k = Segment(E, F)
G = Midpoint(k)
c = Parabola(G, yAxis)
p = Parabola(F, yAxis)
vezéregyenes = OrthogonalLine(E, yAxis)
parabola = Parabola(F, vezéregyenes)