cos (α)

sin (α)

tan (α)

A = (1, 1)
B = Point(Circle[A, 3.0])
cos = Segment(A, B)
C_1 = (1, 4)
b = Segment(C_1, A)
c = CircleArc(A, B, C_1)
D = Intersect(c, b)
P = Point(c)
d = Segment(A, P)
α = Angle(B, A, P)
e: sin(α)
text1: "sin(α) = " + e
f: tan(α)
g: cos(α)
text2: "cos(α) = " + g
text3: "tan(α) = " + f
h = OrthogonalLine(P, cos)
i = OrthogonalLine(A, cos)
j = OrthogonalLine(P, i)
E = Intersect(h, cos)
F = Intersect(i, j)
k = Segment(F, P)
l = Segment(P, E)
G = Point(i)
u = Vector(A, G)
m = Line(A, B)
H = Point(m)
v = Vector(A, H)
a = OrthogonalLine(B, v)
n = Ray(A, P)
I = Intersect(a, n)
p = Segment(A, E)
q = Segment(A, F)
r = Segment(B, I)
s = Segment(B, I)
Text4: "α = " + α