M_K = Point(xAxis)
Kreis = Circle(M_K, 1)
K_B = Point(Kreis)
K_0 = Intersect(Kreis, xAxis, 2)
Radius = Segment(M_K, K_B)
Sinusgerade = OrthogonalLine(K_B, xAxis)
FußSinus = Intersect(Sinusgerade, xAxis)
Sinus = Segment(K_B, FußSinus)
x_k = Line(M_K, K_0)
Kreisrechts = Intersect(Kreis, x_k, 2)
xs_K = Segment(K_0, Kreisrechts)
y_k = OrthogonalLine(M_K, xs_K)
Kreisoben = Intersect(Kreis, y_k, 1)
Kreisunten = Intersect(Kreis, y_k, 2)
ys_k = Segment(Kreisoben, Kreisunten)
α = Angle(K_0, M_K, K_B)
Bogenmaß = CircleArc(M_K, K_0, K_B)
Kosinusgerade = OrthogonalLine(K_B, ys_k)
FußKosinus = Intersect(Kosinusgerade, ys_k)
Kosinus = Segment(FußKosinus, K_B)
B_P: Bogenmaß / π
Tangensgerade_s = OrthogonalLine(K_0, xs_K)
Tangensgerade_W = Line(M_K, K_B)
FußTangens = Intersect(Tangensgerade_s, Tangensgerade_W)
TanStrecke = Segment(M_K, FußTangens)
Tangens = Segment(FußTangens, K_0)
Text1: "Bogenmaß: " + B_P + "π

Sinus: " + Sinus + "
Kosinus: " + Kosinus + "
Tangens: " + Tangens + ""
Sinuspunkt: (Bogenmaß, y(K_B))
Kosinuspunkt: (Bogenmaß, x(K_B) - x(M_K))
Tangenspunkt: (Bogenmaß, y(FußTangens))