Muovere il punto P per visualizzare e calcolare le funzioni goniometriche

B = (0, 1)
O = (0, 0)
c = Circle(O, 1)
d = Tangent(B, c)
P = Point(c)
e = Line(P, O)
E = Intersect(d, e)
A = (1, 0)
a = Segment(P, O)
α = Angle(A, O, P)
H: (x(P), 0)
senα = Segment(P, H)
cosα = Segment(O, H)
b = Tangent(A, c)
D = Intersect(e, b)
tgα = Segment(D, A)
cotgα = Segment(B, E)
T1: "senα=" + (sin(α))
T2: "cosα=" + (cos(α))
T3: "tgα=" + (tan(α))
T4: "cotgα=" + (x(E))
f = Segment(E, O)
g = Segment(D, O)