A:

B:

A = Point(xAxis)
C = Point(xAxis)
B = Point(yAxis)
a = OrthogonalLine(A, xAxis)
f(x) = 1.0 / (x - x(A)) + 1.0 / (x - x(C)) + y(B)
b = OrthogonalLine(B, yAxis)
Text1: "f(x) = " + (Simplify[f(x)])
c = OrthogonalLine(C, xAxis)
g(x) = 1.0 / (x - x(A)) - 1.0 / (x - x(C)) + y(B)
d = true
e = false
Text2: "f(x) = " + (Simplify[g(x)])