I-E=A-H
E-J=A-H
K-E=A-H
F-L=A-H

M=punto medio di A-I
N=punto medio di J-B
O=puntomedio di L-B
P=punto medio di A-K

A = (0.7542713050843597, -0.5327739268035323)
B = (23.285947873347652, -0.5327739268035323)
a = Segment(A, B)
C = Midpoint(A, B)
D = (12.37664222689455, 6.5845085920900335)
c = Circle(C, D)
b = OrthogonalLine(C, a)
E = Intersect(c, b, 2)
F = Intersect(c, b, 1)
G = (5.827227994082945, -1.8956578134001725)
d = CircleArc(C, E, G)
H = Intersect(d, a, 1)
e = Segment(A, E)
f = Segment(A, F)
g = Segment(F, B)
h = Segment(E, B)
k = Circle(E, Segment[A, H])
I = Intersect(k, e, 1)
J = Intersect(k, h, 1)
p = Circle(F, Segment[A, H])
K = Intersect(p, f, 1)
L = Intersect(p, g, 1)
M = Midpoint(A, I)
N = Midpoint(J, B)
O = Midpoint(B, L)
P = Midpoint(K, A)
i = OrthogonalLine(M, e)
α = Angle(e, i)
j = OrthogonalLine(P, f)
β = Angle(f, j)
l = OrthogonalLine(N, h)
γ = Angle(h, l)
m = OrthogonalLine(O, g)
δ = Angle(g, m)
Q = Intersect(i, j)
R = Intersect(l, m)
S = Intersect(b, j)
T = Intersect(b, i)
U = Point(l)
q = Circle(S, F)
r = Circle(T, E)
V = Intersect(r, l, 2)
W = Intersect(r, i, 2)
Z = Intersect(q, j, 1)
A_1 = Intersect(q, m, 1)
s = CircleArc(S, Z, A_1)
t = CircleArc(R, A_1, V)
c_1 = CircleArc(T, V, W)
d_1 = CircleArc(Q, W, Z)