gedreht

A = Intersect(xAxis, yAxis)
B = Point(xAxis)
c = Circle(A, B)
t = 7.148 (slider from 0 to 12.54, step 0.001)
Z: (cos(t), sin(t))
u = Vector(A, Z)
C: (x(Z), 0)
f = Segment(Z, C)
E: (t, y(Z))
g(x) = If[0 ≤ x ≤ t, sin(x), 0]
h(x) = If[0 ≤ x ≤ t, cos(x), 0]
D = 0
a = Rotate(h(x), (((-π)) / 2 * D), A)
F = Rotate((t, x(Z)), (((-π)) / 2 * D), A)
J = (10.568873368054927, 0.14128462208637832)
Text1 = Text("Winkel im Bogenmaß", J)