A = Intersect(xAxis, yAxis)
c = Circle(A, 1)
a = 0.25 (slider from 0 to 2, step 0.001)
B = Intersect(c, xAxis, 2)
h: sin((a * π))
i: cos((a * π))
texte2: "sin(a*π)=" + h + ""
texte4: "cos(a*π)=" + i + ""
D = Intersect(c, xAxis, 2)
D'_1 = Rotate(D, (a * π), A)
α = Angle(D, A, D'_1)
j = Segment(A, D'_1)
m = OrthogonalLine(D'_1, xAxis)
C = Intersect(m, xAxis)
n = Segment(C, A)
p = Segment(C, A)
s = Segment(D'_1, C)
f: cos((a * π))
g: sin((a * π))