A = (0, 0)
B = Point(xAxis)
C_1 = Point(xAxis)
c = Circle(A, C_1)
C = Point(c)
Vieleck1, c_1, a, b = Polygon(A, B, C)
d = Circle(B, A)
e = Ray(B, C)
C' = Intersect(d, e)
f = CircleArc(B, C', A)
g = Segment(C, C')
h = OrthogonalLine(C', c_1)
E, F = Intersect(h, Vieleck1)
i = Ray(B, A)
k = Circle(E, C')
A', D = Intersect(k, i)
p = CircleArc(E, C', A')
j = Segment(A', A)
l = Segment(C', E)
m = Ray(C, C')
q = Circle(B, A')
P = Intersect(q, m)
r = CircleArc(B, P, A')
n = Segment(C', P)
s = Segment(A, P)
α = Angle(A, P, C')