A = Point(yAxis)
O = Intersect(xAxis, yAxis)
O' = Rotate(O, (-(44.999°)), A)
O'_{1} = Rotate(O, (-(0.001°)), A)
c = CircleArc(A, O', O'_{1})
B = Point(c)
f = Segment(A, B)
C = Rotate(A, 90°, B)
D = Rotate(B, 90°, C)
B' = Mirror(B, yAxis)
C' = Mirror(C, yAxis)
D' = Mirror(D, yAxis)
g = Segment(A, D)
h = Segment(D, C)
i = Segment(C, B)
j = Segment(B', A)
k = Segment(A, D')
l = Segment(D', C')
m = Segment(C', B')
eq1: x = 0
u = Vector(C, B)
α = Angle(B, A, B')
texte1: "2\alpha = " + (LaTeX[α]) + ""
n = OrthogonalLine(A, eq1)
E = Intersect(n, h)
E' = Mirror(E, eq1)
F = Mirror(A, Line[B, yAxis])
F' = Mirror(F, eq1)
p = Segment(F, B)
q = Segment(F', B')
r = OrthogonalLine(E, p)
G = Intersect(r, g)
G' = Mirror(G, eq1)
s = Segment(G', E')
v = Vector(E, B')
D'_{1} = Translate(D, v)
G'_{1} = Translate(G, v)
t = Segment(D'_{1}, G'_{1})
w = Vector(E', B)
D'' = Translate(D', w)
G'' = Translate(G', w)
a = Segment(G'', D'')
b = Segment(E, G)
d = Segment(E, A)
e = Segment(A, E')
t1, a_1, e_1, g_1 = Polygon(E, G, A)
t2, e', a_2, g' = Polygon(A, G', E')
t3, d_1, e_2, g_2 = Polygon(E, G, D)
t4, g'_{1}, b', d'_{1} = Polygon(B', D'_{1}, G'_{1})
t5, b_1, g'', d'' = Polygon(G'', D'', B)
t6, f_1, h_1, d' = Polygon(G', D', E')
poly1, e_3, f_2, i_1, j_1, c_1 = Polygon(E, F, D'', G'', C)
poly2, f', k_1, c', l_1, m_1 = Polygon(F', E', C', G'_{1}, D'_{1})
t7, b_2, f_3, a_3 = Polygon(F, A, B)
t8, n_1, a_4, p_1 = Polygon(A, F', B')