A = (-2.3487603305785125, 1.7910743801652889)
B = (4.990082644628107, 1.8406611570247935)
a = Segment(A, B)
k = 1.618033988749895
c: a / k
d = Circle(A, c)
I = Intersect(d, a, 1.0)
b = OrthogonalLine(B, a)
C_1 = Midpoint(a)
e = Circle(B, C_1)
C = Intersect(e, b, 2.0)
f = Segment(C, B)
g = Segment(C, A)
h = Circle(C, B)
E = Intersect(h, g, 1.0)
p = CircleArc(C, E, B)
q = CircleArc(A, I, E)
r = Circle(I, A)
i = LineBisector(I, B)
F = Intersect(r, i, 1.0)
j = Line(A, B)
A' = Intersect(r, j, 2.0)
G = Intersect(i, j)
l = Segment(B, A')
m = Segment(G, F)
n = Segment(A', F)
s = Circle(A', F)
H = Intersect(r, s, 2.0)
t = Circle(H, A')
J = Intersect(r, t, 2.0)
c_1 = Circle(F, A')
K = Intersect(r, c_1, 2.0)
a_1 = Segment(H, A')
b_1 = Segment(H, J)
d_1 = Segment(J, K)
e_1 = Segment(K, F)
f_1 = Segment(I, F)
g_1 = Segment(F, A)
α = Angle(F, A, I)
β = Angle(F, I, B)