Parabel Leitgeraden-Definition
Author: Prof. Dr. Dörte Haftendorn

Ha Dez 07

a

F = Point(yAxis)
F': (0, -y(F))
leit = OrthogonalLine(F', yAxis)
A = Point(leit)
B = Point(leit)
a = LineBisector(F, A)
b = LineBisector(F, B)
d = OrthogonalLine(A, leit)
e = OrthogonalLine(B, leit)
P_B = Intersect(e, b)
P_A = Intersect(a, d)
C = Intersect(b, a)
loc1 = Locus(P_A, A)
c = Segment(F, P_A)
f = Segment(P_A, A)