sin α , cos α

JM Delley
http://math.bibop.ch

Bouger le point P autour du cercle trigonométrique

O = Intersect(yAxis, xAxis)
c = Circle(O, 1)
A = (1, 0)
B = (0, 1)
P = Point(c)
a = Ray(O, A)
b = Ray(O, P)
α = Angle(A, O, P)
C: (x(P), 0)
S: (0, y(P))
d = Segment(P, C)
e = Segment(P, S)
cosinus = Segment(O, C)
sinus = Segment(O, S)
O' = Mirror(O, O)
P' = Mirror(P, O)
been1 = Ray(O', P')
O'_1 = Mirror(O, O)
P'_1 = Mirror(P, O)
been2 = Ray(O'_1, P'_1)
j: sin(α)
f = OrthogonalLine(A, xAxis)
D = Intersect(f, b)
tangente = Segment(D, A)
t = Segment(A, D)
texte1: "tan(" + (LaTeX[α]) + ")=" + (LaTeX[t]) + ""
T3: "cos(" + α + ") =" + (cos(α)) + ""
T2: "sin(" + α + ") =" + (sin(α)) + ""
T6: " α=" + α + ""