A = Point(xAxis)
a: 1 / x(A)
P: (x(A), a)
b = OrthogonalLine(A, xAxis)
c = OrthogonalLine(P, yAxis)
B = Intersect(c, yAxis)
d = Segment(A, P)
e = Segment(P, B)