R

S

M

N

F

G

k

A = (-0.02, -2.68)
B = (6.1, -2.72)
a = Line(A, B)
b = OrthogonalLine(A, a)
c = OrthogonalLine(B, a)
D = Point(c)
C = Point(b)
d = Circle(C, A)
e = Circle(D, B)
E, F = Intersect(d, e)
f = Parabola(F, a)
g = Parabola(E, a)
h = Segment(C, A)
i = Segment(D, B)