Angle des arêtes fuyantes:

Profondeur:

Nombre de sommets de la base:

Développement

n = 4 (slider from 3 to 8, step 1)
A = (16, 2)
B = (8, 2)
C = (10, 5)
D = (14, 5)
E = (12, 4)
F = (15, 4)
G = (16, 6)
H = (17, 4)
poly2 = If(n ≟ 3, Polygon[A, B, C], If[n ≟ 4, Polygon[A, B, C, D], If[n ≟ 5, Polygon[A, B, C, D, E], If[n ≟ 6, Polygon[A, B, C, D, E, F], If[n ≟ 7, Polygon[A, B, C, D, E, F, G], If[n ≟ 8, Polygon[A, B, C, D, E, F, G, H]]]]]])
p = 5 (slider from 0 to 20, step 0.1)
c = Circle(A, p / 2)
a = Line(A, xAxis)
I = Intersect(c, a, 2)
α = 0.7853981633974483 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
A' = Rotate(I, α, A)
β = Angle(I, A, A')
u = Vector(A, A')
B' = Translate(B, u)
C' = Translate(C, u)
D' = Translate(D, u)
E' = Translate(E, u)
F' = Translate(F, u)
G' = Translate(G, u)
poly2' = Translate(poly2, u)
H' = Translate(H, u)
poly1, b_1, c_1, c', b' = Polygon(B, C, C', B')
poly3, c_2, d_1, d', c'_1 = Polygon(C, D, D', C')
poly4, d_2, e_1, e', d'_1 = Polygon(D, E, E', D')
poly6, h_1, g, g', h'_1 = Polygon(H, G, G', H')
poly7, g_1, f_1, f', g'_1 = Polygon(G, F, F', G')
poly8, f_2, f'_1, e'_1, e_2 = Polygon(F, F', E', E)
poly9, a_2, c_3, c'_2, i'_1 = Polygon(A, C, C', A')
poly5, a_1, i', d'_2, d = Polygon(A, A', D', D)
poly10, a_3, e, e'_2, i'_2 = Polygon(A, E, E', A')
poly11, a_4, f, f'_2, i'_3 = Polygon(A, F, F', A')
poly12, a_5, g_2, g'_2, i'_4 = Polygon(A, G, G', A')
b = false
J = (18.373497293409788, -3.530199511802457)
v = Vector(A, J)
poly2'_1 = Translate(poly2, v)
o: abs(c_2)
r_1: abs(b_1)
s = Segment(A, B)
p_1 = Circle(J, s)
B'_1 = Translate(B, v)
C'_1 = Translate(C, v)
w = true
C'_2 = Translate(C, v)
B'_2 = Translate(B, v)
D'_1 = Translate(D, v)
E'_1 = Translate(E, v)
F'_1 = Translate(F, v)
G'_1 = Translate(G, v)
H'_1 = Translate(H, v)
h = Circle(J, p)
i = Segment(B'_2, J)
j = Segment(B'_2, C'_2)
k = Segment(C'_2, D'_1)
l = Segment(D'_1, E'_1)
m = Segment(E'_1, F'_1)
q = Segment(F'_1, G'_1)
r = Segment(G'_1, H'_1)
t = Segment(H'_1, J)
i_1 = OrthogonalLine(J, i)
K = Intersect(h, i_1, 1)
j_1 = Line(K, i)
k_1 = Line(B'_2, i_1)
L = Intersect(j_1, k_1)
l_1 = LineBisector(J, K)
poly13 = Mirror(poly2'_1, l_1)
m_1 = Line(B'_2, J)
q_1 = Circle(B'_2, j)
M = Intersect(q_1, m_1, 1)
n_1 = OrthogonalLine(M, m_1)
N = Intersect(j_1, n_1)
s_1 = Circle(M, k)
O = Intersect(s_1, m_1, 1)
t_1 = OrthogonalLine(O, m_1)
P = Intersect(j_1, t_1)
h_2 = Circle(O, l)
Q = Intersect(h_2, m_1, 1)
b_2 = OrthogonalLine(Q, m_1)
R = Intersect(j_1, b_2)
k_2 = Circle(Q, m)
S = Intersect(k_2, m_1, 1)
i_2 = OrthogonalLine(S, b_2)
j_2 = OrthogonalLine(S, i_2)
T = Intersect(j_1, j_2)
p_2 = Circle(S, q)
U = Intersect(p_2, m_1, 1)
l_2 = OrthogonalLine(U, i_2)
q_2 = Circle(U, r)
V = Intersect(q_2, m_1, 1)
m_2 = OrthogonalLine(V, i_2)
W = Intersect(j_1, m_2)
r_2 = Circle(J, t)
Z = Intersect(r_2, m_1, 2)
n_2 = OrthogonalLine(Z, i_2)
A_1 = Intersect(j_1, n_2)
s_2 = Segment(A_1, Z)
t_2 = Segment(V, W)
B_1 = Intersect(j_1, l_2)
b_3 = Segment(J, G'_1)
d_3 = Circle(J, b_3)
C_1 = Intersect(d_3, i_2, 1)
e_3 = OrthogonalLine(C_1, i_2)
D_1 = Intersect(j_1, e_3)
f_3 = Segment(C_1, D_1)
g_3 = Segment(B_1, U)
h_3 = Segment(J, F'_1)
k_3 = Circle(J, h_3)
E_1 = Intersect(k_3, i_2, 1)
i_3 = OrthogonalLine(E_1, i_2)
F_1 = Intersect(j_1, i_3)
j_3 = Segment(E_1, F_1)
l_3 = Segment(S, T)
m_3 = Segment(E'_1, J)
p_3 = Circle(J, m_3)
G_1 = Intersect(p_3, i_2, 1)
n_3 = OrthogonalLine(G_1, i_2)
H_1 = Intersect(j_1, n_3)
q_3 = Segment(H_1, G_1)
r_3 = Segment(Q, R)
s_3 = Segment(D'_1, J)
t_3 = Circle(J, s_3)
I_1 = Intersect(t_3, i_2, 1)
b_4 = OrthogonalLine(I_1, i_2)
J_1 = Intersect(j_1, b_4)
c_4 = Segment(I_1, J_1)
d_4 = Segment(P, O)
e_4 = Segment(C'_2, J)
f_4 = Circle(J, e_4)
K_1 = Intersect(f_4, i_2, 1)
g_4 = OrthogonalLine(K_1, i_2)
L_1 = Intersect(j_1, g_4)
h_4 = Segment(L_1, K_1)
i_4 = Segment(M, N)
j_4 = Segment(B'_2, L)
k_4 = Segment(K, J)
poly14 = If(n ≟ 3, Polygon[L_1, N, M, K_1], If[n ≟ 4, Polygon[J_1, P, O, I_1], If[n ≟ 5, Polygon[H_1, R, Q, G_1], If[n ≟ 6, Polygon[F_1, T, S, E_1], If[n ≟ 7, Polygon[D_1, B_1, U, C_1], If[n ≟ 8, Polygon[A_1, W, V, Z]]]]]])
p_4 = CircleArc(B'_2, C'_2, M)
q_4 = CircleArc(J, I_1, D'_1)
r_4 = CircleArc(J, K_1, C'_2)
poly15, a_6, h_5, h', a' = Polygon(A, H, H', A')