H = Intersect(xAxis, yAxis)
P = Point(yAxis)
A = Point(xAxis)
M = Point(xAxis)
a = OrthogonalLine(A, xAxis)
b = Line(P, M)
B = Intersect(a, b)
c = Segment(A, B)