O = Point(yAxis)
B = (1, 0)
c = Circle(O, B)
hoek = 40 (slider from 0 to 360, step 1)
P = Rotate(B, (hoek * 3.141592653589793 / 180), O)
α = Angle(B, O, P)
b = OrthogonalLine(P, xAxis)
Q = Intersect(b, xAxis)
d = Segment(O, P)
g = CircleArc(O, B, P)
f = Vector(O, Q)
e = Vector(Q, P)
tekst1: "boog = " + ((hoek * 3.141592653589793 / 180)) + " rad"
tekst2: "sin(" + ((hoek * 3.141592653589793 / 180)) + ") = " + (sin(α))
tekst3: "cos(" + ((hoek * 3.141592653589793 / 180)) + ") = " + (cos(α))