A = Intersect(xAxis, yAxis)
B = Point(xAxis)
poly1, a, b, c, d, C, D = Polygon(A, B, 4.0)
E = Midpoint(a)
F = Midpoint(c)
e = Ray(E, F)
G = Point(e)
f = Circle(E, G)
p = Circle(E, F)
R = Intersect(p, b)
P, Q = Intersect(p, yAxis)
H, I = Intersect(f, a)
K = Intersect(f, Segment[R, B])
g = CircleSector(E, I, H)
J = Intersect(f, Segment[P, A])
h = CircleSector(E, K, J)
poly2, e_1, j, a_1 = Polygon(J, A, E)
poly3, k, e_2, b_1 = Polygon(E, B, K)
N, O = Intersect(f, c)
L = Intersect(f, d)
M = Intersect(f, b, 1.0)
q = CircleSector(E, M, N)
r = CircleSector(E, O, L)
poly4, e_3, o, n = Polygon(O, N, E)
poly5, a_2, l, e_4 = Polygon(L, E, A)
poly6, m, e_5, b_2 = Polygon(E, B, M)
i = Segment(E, G)
P2, s, t, c_1, d_1, S, T = Polygon(A, B, 4.0)