p(x) = 1 / 4 x²
A = Point(p)
B = Point(p)
a = Segment(A, B)
b = LineBisector(A, B)
M = Intersect(a, b)
c = OrthogonalLine(M, xAxis)
C = Intersect(p, c)
d = Tangent(C, p)
e = OrthogonalLine(A, xAxis)
f = OrthogonalLine(B, xAxis)
D = Intersect(e, d)
E = Intersect(f, d)