ángulo = 152 (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 3.141592653589793 / 180, O)
b = Segment(P, O)
sen = Segment(P, (x(P), 0))
cos = Segment((x(P), 0), O)
T1: "sen " + ángulo + "º = " + (y(P)) + " =  cos " + (ángulo - 90) + "º"
T2: "cos " + ángulo + "º = " + (x(P)) + "= -sen " + (ángulo - 90) + "º "
Q, a, d, e = Polygon(P, O, (x(P), 0))
β = Angle(P, O, A)
P': (y(P), -x(P))
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, (y(P), 0))
C = (-0.2527777777777776, 0.2986111111111111)
T3: "α+90º=" + ángulo + "º"
T4: "α=" + (ángulo - 90) + "º"
T5: "tg " + ángulo + "º = " + (y(P) / x(P)) + " = - cotg " + (ángulo - 90) + "º"