Sinus, Cosinus \  und \ Tangens

Bewege \ den \ Punkt \ A  \ im \ Kreis \ ...

Beachte die Orientierungen:
Cosinus → +
Sinus ↑ +
Tangens ↑ +

O = Intersect(xAxis, yAxis)
Einheitskreis = Circle(O, 1)
A = (0.5817560806094093, 1.2531136701765329)
f = Ray(O, A)
P = Intersect(Einheitskreis, f)
B = Point(Einheitskreis)
φ = Angle(B, O, P)
r: sin(φ)
s: cos(φ)
g = OrthogonalLine(B, xAxis)
C = Intersect(f, g)
tanφ = Vector(B, C)
h = Line(P, yAxis)
i = Line(P, xAxis)
D_1 = Intersect(h, xAxis)
E = Intersect(i, yAxis)
cosφ = Vector(O, D_1)
sinφ = Vector(O, E)
F = Intersect(Einheitskreis, xAxis, 1)
j = OrthogonalLine(F, xAxis)
D = Intersect(j, f)
Text2: "Argument φ = " + φ + "
Punkt P = (sin " + φ + " / cos" + φ + " ) = (" + (cos(φ)) + " / " + (sin(φ)) + " )
tan " + φ + " = " + (y(C)) + "
tan " + φ + " = " + ((-y(D))) + ""
Tangens = Vector(D, F)