A = Intersect(yAxis, zAxis)
B = Point(yAxis)
poly1, f, g, h, i, j, C, D, E = Polygon(A, B, 5, xOyPlane)
α: 180° - atand(2)
poly1' = Rotate(poly1, α, h)
poly1'_{1} = Rotate(poly1, α, g)
poly1'_{2} = Rotate(poly1, α, f)
poly1'_{3} = Rotate(poly1, α, j)
poly1'_{4} = Rotate(poly1, α, i)
E' = Rotate(E, α, h)
A' = Rotate(A, α, h)
B' = Rotate(B, α, h)
E'_{1} = Rotate(E, α, g)
C' = Rotate(C, α, f)
D' = Rotate(D, α, f)
E'_{2} = Rotate(E, α, f)
A'_{1} = Rotate(A, α, i)
B'_{1} = Rotate(B, α, i)
C'_{1} = Rotate(C, α, j)
k = Segment(E'_{1}, B')
l = Segment(B', A')
m = Segment(A', E')
n = Segment(E', B'_{1})
p = Segment(B'_{1}, A'_{1})
q = Segment(A'_{1}, C'_{1})
r = Segment(C'_{1}, E'_{2})
s = Segment(E'_{2}, D')
t = Segment(D', C')
a = Segment(C', E'_{1})
poly1'' = Rotate(poly1', α, l)
poly2 = Rotate(poly1'_{4}, α, n)
poly3 = Rotate(poly1'_{3}, α, q)
poly4 = Rotate(poly1'_{2}, α, s)
poly5 = Rotate(poly1'_{1}, α, a)
F = Rotate(E'_{2}, α, t)
G = Rotate(A'_{1}, α, r)
b = Segment(G, F)
poly4' = Rotate(poly4, α, b)
C'' = Rotate(C', α, k)
B'' = Rotate(B', α, m)
E'' = Rotate(E', α, p)
q1, e'', f_1, e'_{1}, a' = Polygon(E'', F, E'_{1}, A')
q2, f_2, e'_{2}, b_1, c = Polygon(F, E'_{2}, B, E'_{1})
q3, d, e, d_1, b_2 = Polygon(E'_{1}, A', D, B)
q4, g_1, h_1, a'_{1}, d_2 = Polygon(A', E'', A'_{1}, D)
q5, i_1, f_3, j_1, k_1 = Polygon(E'', F, E'_{2}, A'_{1})
q6, l_1, m_1, b_3, d_3 = Polygon(A'_{1}, E'_{2}, B, D)