\overline{GF}=p

https://www.geogebra.org/haftendorn
Haftendorn, Buch (Springer):
Kurven erkunden und verstehen
Kap 7.2.1: S.184
www.kurven-erkunden-und-verstehen.de

Ha 2016

c: y^(2) = (4 * x)
p = 2
g: x = ((-p)) / 2
F: (p / 2, 0)
g_1: y = 0
Q = Point(g_1)
A = Intersect(g_1, xAxis)
G = Intersect(g, g_1)
f = Segment(G, Q)
e = Circle(F, f)
P', P = Intersect(c, e)
D = Point(e)
E = Point(e)
d = CircleArc(F, E, D)
h = OrthogonalLine(P, g)
L = Intersect(h, g)
i = Segment(L, P)
j = Segment(P, F)
k = Segment(L, F)
l = LineBisector(k)
m: x = 0
H = Midpoint(k)
q = OrthogonalLine(Q, g_1)
S: (0, 0)
a = false