A: (3.40705, 4)
M: (x(A) + 3.5, y(A))
a = Segment(A, M)
b = Line(M, A)
C_{1} = Point(b)
c = CircleArc(A, M, C_{1})
D = Point(c)
d = Segment(A, D)
α = Angle(M, A, D)
A' = (6.804611549451674, -0.5264540998713033)
u = Vector(A, A')
p = Circle(A', Segment[A, M])
M' = Point(p)
a' = Segment(A', M')
B = Point(a)
e = Circle(A, B)
r2 = 0.5
F = Intersect(e, d, 1)
g = Circle(F, r2)
H = Intersect(e, g, 1)
h = CircleArc(A, B, H)
C = Intersect(h, d, 1)
q = Circle(A', Segment[A, B])
B' = Intersect(q, a', 1)
angarco1 = Angle(B, A, H)
B'' = Rotate(B', angarco1, A')
r = CircleArc(A', B', B'')
i = Segment(B, F)
f = Circle(B, C)
J = Intersect(g, f, 2)
K = Intersect(g, f, 1)
k = CircleArc(B, K, J)
s = Circle(B', Segment[B, C])
C' = Intersect(r, s, 1)
t = Circle(C', B'')
E = Intersect(s, t, 1)
G = Intersect(s, t, 2)
c_1 = CircleArc(B', G, E)
j = Segment(C', B')
d_1 = Circle(A', Segment[A, D])
l = Line(A', C')
I = Intersect(d_1, l, 2)
m = Segment(I, A')
β = Angle(M', A', C')