C_1 = (1, 4)
A = (1, 1)
B = Point(Circle[A, 3])
c = CircleArc(A, B, C_1)
C_2 = Point(c)
h = Circle(A, C_2)
C = Point(h)
α = Angle(B, A, C)
a = Segment(A, B)
b = Segment(C_1, A)
D = Intersect(c, b)
d = Segment(A, C_2)
α_1 = Angle(B, A, C_2)
e: sin(α)
text1: "sin(α) = " + e
f: tan(α)
g: cos(α)
text2: "cos(α) = " + g
text3: "tan(α) = " + f
i = Segment(A, C)