trascinare il punto H

A = (-6, -1)
B = (6, -1)
d = Line(A, B)
F = Point(yAxis)
H = Point(d)
b = Line(F, H)
M = Midpoint(F, H)
c = OrthogonalLine(M, b)
e = OrthogonalLine(H, d)
P = Intersect(c, e)
D = Intersect(d, yAxis)
V = Intersect(g, xAxis, 1)