A = (-6, -13)
E = Point(Segment[A, (x(A) + 7, y(A))])
c = Circle(A, E)
B = Point(c)
f = Line(A, B)
C = Intersect(c, f, 2)
p = CircleArc(A, B, C)
g = OrthogonalLine(B, f)
h = Segment(C, B)
F = Point(g)
G = Point(g)
m = Segment(F, G)
α = Angle(C, B, F)
I = Point(p)
e = CircleArc(A, B, I)
J = Point(e)
l = Segment(J, B)
ε = Angle(B, J, I)
k = Segment(I, J)
j = Segment(C, I)
δ = Angle(I, C, B)
i = Segment(I, B)
γ = Angle(I, B, G)
β = Angle(C, B, I)
ζ = Angle(J, I, B)
η = Angle(B, I, C)
D = (-14.187101387587058, -17.561721928425886)