ángulo = 150 (slider from 90 to 180, step 1)
c = Circle((0, 0), 1)
A = Intersect(c, xAxis, 2)
O = Intersect(xAxis, yAxis)
P = Rotate(A, ángulo π / 180, O)
b = Segment(P, O)
sen = Segment(P, (x(P), 0))
cos = Segment((x(P), 0), O)
T1: "sen " + ángulo + "º = " + (y(P)) + " =  sen " + (180 - ángulo) + "º"
T2: "cos " + ángulo + "º = " + (x(P)) + "= -cos " + (180 - ángulo) + "º "
Q, a, d, e = Polygon(P, O, (x(P), 0))
β = Angle(P, O, A)
P' = Mirror(P, yAxis)
f = Segment(P', O)
α = Angle(A, O, P')
P'_1 = Mirror(P, xAxis)
B = Mirror((x(P), 0), xAxis)
Q', g, h, i = Polygon(P', O, (-x(B), 0))
C = (-0.2527777777777776, 0.2986111111111111)
T3: "180º-α=" + ángulo + "º"
T4: "α=" + (180 - ángulo) + "º"
T5: "tg " + ángulo + "º = " + (y(P) / x(P)) + "= - tg " + (180 - ángulo) + "º "