Die Bogenlänge x_o liefert den x-Wert

Tangens

A = (0, 0)
M = (-1, 0)
x_o = 0 (slider from -5 to 9.4, step 0.01)
P = Rotate(A, 180 ° x_o / 3.141592653589793, M)
l = Line(M, P)
c = Circle(M, A)
μ = Angle(A, M, P)
d = CircleArc(M, A, P)
P_o: (x(P), 0)
a = Segment(M, P_o)
r = Segment(M, P)
X_o: (x_o, 0)
e = Segment(A, X_o)
f = Function(tan(x), 0, x_o)
Q: (x_o, f(x_o))
g = Segment(X_o, Q)
f1 = Function(tan(x), x_o, 0)
h = CircleArc(M, P, A)
Y_o = Intersect(l, yAxis)
i = Segment(Q, Y_o)
b = Segment(A, Y_o)
k = Segment(M, Y_o)
f2(x) = tan(x)