A = (-10, -11)
F = Point(Segment[A, (x(A) + 5, y(A))])
A_1 = Point(Segment[(x(F) + Distance[A, F], y(A)), (x(F) + Distance[A, F] + 5, y(A))])
c_1 = Circle(A_1, Distance[A, F])
B_1 = Point(c_1)
c = Circle(A, F)
B = Point(c)
B' = Point(c)
ε = Angle(B, A, B')
E = Rotate(B_1, ε, A_1)
q = CircleArc(A_1, E, B_1)
p = CircleArc(A, B', B)
C = Point(p)
f = Segment(B, C)
C_1 = Point(q)
f_1 = Segment(B_1, C_1)
γ = Angle(B_1, A_1, E)
g_1 = Segment(E, C_1)
e = CircleArc(A_1, B_1, E)
α_1 = Angle(E, C_1, B_1)
h = CircleArc(A, B, B')
g = Segment(B', C)
α = Angle(B', C, B)
k = CircleArc(A_1, B_1, E)
i = Segment(A_1, B_1)
j = Segment(A_1, E)
r = Segment(E, B_1)
l = Segment(A, B)
m = Segment(B, B')
n = Segment(A, B')
d = CircleArc(A, B, B')
D = (-14.295755813713924, -16.54761409104922)