β=-α

U = Point(xAxis)
O = Intersect(xAxis, yAxis)
c = Circle(O, U)
A = Point(c)
α = Angle(U, O, A)
a = Segment(O, A)
t = OrthogonalLine(U, xAxis)
T1: "α=" + α
A_x: (x(A), 0)
A_y: (0, y(A))
b = Segment(A_y, A)
d = Segment(A, A_x)
e = Segment(A_y, O)
f = Segment(O, A_x)
A': (x(A), -y(A))
g = Segment(O, A')
h = Segment(A', A_x)
A'_y: (0, y(A'))
i = Segment(A', A'_y)
j = Segment(O, A'_y)
β = Angle(A', O, U)
k = Line(O, A)
l = Line(O, A')
B = Intersect(t, k)
C = Intersect(t, l)
m = Segment(O, B)
n = Segment(O, C)
q = Segment(U, C)
r = Segment(B, U)
text1: "sen(α) =" + (y(A))
text2: "cos(α) =" + (x(A))
text3: "tg(α) =  \frac{ " + (y(A)) + " }{" + (x(A)) + " } =" + (y(B))
text4: "sen(β) =" + (y(A'))
text5: "cos(β) =" + (x(A'))
text6: "tg(β) =" + (y(C))