f(x) = If[x > 0, 1 / x]
M = Point(f)
O: (0, 0)
g = Segment(M, O)