y = cotg x

A = Intersect(xAxis, yAxis)
c = Circle(A, 1)
B = (0.9550983027350746, 1.2995284808985963)
a = Ray(A, B)
C = Intersect(c, a, 1)
b = OrthogonalLine(C, xAxis)
α = Angle(xAxis, a)
f = OrthogonalLine(C, yAxis)
k = Line(B, A)
K = (-3.356516688268773, 0.9974023027088758)
m = Line(K, xAxis)
L = Intersect(k, m)
M = Point(yAxis)
N = Point(yAxis)
n = Line(M, N)
O = Intersect(m, n)
p = Segment(O, L)