D-G = F-B
E-H = F-B

I= punto medio di G-B
J= punto medio di H-B

A = (-1.1386229818554108, -0.4192002695871456)
B = (22.750452865669494, -0.4192002695871456)
a = Segment(A, B)
C = Point(a)
c = Circle(C, A)
b = OrthogonalLine(C, a)
D = Intersect(c, b, 2)
E = Intersect(c, b, 1)
F = Intersect(c, a, 2)
d = Segment(E, D)
e = Segment(D, B)
f = Segment(E, B)
g = Circle(D, Segment[B, F])
h = Circle(E, Segment[B, F])
G = Intersect(g, e, 1)
H = Intersect(h, f, 1)
I = Midpoint(G, B)
J = Midpoint(H, B)
i = OrthogonalLine(I, e)
α = Angle(e, i)
j = OrthogonalLine(J, f)
β = Angle(f, j)
K = Intersect(b, j)
L = Intersect(b, i)
k = Circle(K, E)
M = Intersect(k, j, 1)
p = CircleArc(K, E, M)
N = Intersect(i, j)
q = Circle(N, M)
O = Intersect(q, i, 2)
r = CircleArc(N, M, O)
s = CircleArc(L, O, D)
t = CircleArc(C, D, E)