φ = 0.6981317007977318 rad (slider from 0 to 90°, step 1°)
A_n: ((2 * sin(φ)) - 4, (3 * sin(φ)) - 1)
B = (-1.9239391729465467, -3)
D = (2.0760608270534533, 3)
u = Vector(A_n, B)
C_n = Translate(D, u)
v = Vector(D, C_n)
v1, a_n, b, d', d = Polygon(A_n, B, C_n, D)
A_1: (-4, -1)
C_1: (4, 1)
A_2: (-3, 0.5)
C_2: (3, -0.5)
v2, a_1, b_1, c_1, d_1 = Polygon(A_1, B, C_1, D)
v3, a_2, b_2, c_2, d_2 = Polygon(A_2, B, C_2, D)
A_3: (-2, 2)
C_3: (2, -2)
v4, b_3, c_3, d_3, a_3 = Polygon(B, C_3, D, A_3)
t = Line(A_1, A_3)