X

directriz

p = 0.5
c: x^(2) = (2 * (p * y))
A = Point(c)
a = Tangent(A, c)
F: (0, p / 2)
b = Line(F, A)
d = OrthogonalLine(A, xAxis)
C = Point(d)
f = OrthogonalLine(A, a)
B = Point(f)
α = Angle(C, A, B)
β = Angle(B, A, F)
u: (x(A), (-p))
A' = Translate(A, u)
v = Vector(A, A')
e: (180 / π * acos(p / sqrt(x(A)^(2) + p^(2))))
g: y = ((-p)) / 2
h = Segment(F, A)
D = Point(g)
E = Intersect(c, xAxis, 1)
j = Line(E, F)
G = Point(xAxis)
k = Line(E, G)
i = OrthogonalLine(A, g)
H = Intersect(g, i)
l = Segment(A, H)
distanciaFA = Distance(F, A)
TextoFA: Name[F] + (Name[A]) + " = " + distanciaFA
distanciaAH = Distance(A, H)
TextoAH: Name[A] + (Name[H]) + " = " + distanciaAH