Kante c 

Kante b

Kante a

A = (-2, 2)
B = (-2, -1)
a_2 = Segment(A, B)
C = (3, -1)
b_3 = Segment(B, C)
D = (3, 2)
c = Segment(C, D)
d = Segment(D, A)
E = (5, 1)
e = Segment(C, E)
F = (5, 4)
f = Segment(E, F)
g = Segment(F, D)
G = (0, 4)
h = Segment(F, G)
i = Segment(G, A)
Volumen = 3 (slider from 1 to 3, step 1)
H = Point(b_3)
I = Point(Circle[H, Volumen])
j = Segment(H, I)
J = Point(b_3)
K = Point(Circle[J, Volumen])
k = Segment(J, K)
l = Segment(I, K)
L = Point(l)
M = Point(b_3)
m = Segment(L, M)
N = Point(l)
O = Point(b_3)
n = Segment(N, O)
P = Point(l)
Q = Point(b_3)
p = Segment(P, Q)
R = Point(l)
S = Point(b_3)
q = Segment(R, S)
T = Point(a_2)
U = Point(c)
r = Segment(T, U)
V = Point(a_2)
W = Point(c)
s = Segment(V, W)
poly1, b_1, i_1, k_1, c_1 = Polygon(B, I, K, C)
Z = Point(Circle[E, Volumen])
t = Segment(E, Z)
A_1 = Point(f)
a_1 = Segment(U, A_1)
B_1 = Point(f)
d_1 = Segment(W, B_1)
e_1 = Segment(K, Z)
poly2, c_2, k_2, z, e_2 = Polygon(C, K, Z, E)
C_1 = Point(e)
D_1 = Point(e_1)
f_1 = Segment(C_1, D_1)
E_1 = Point(e)
F_1 = Point(e_1)
g_1 = Segment(E_1, F_1)
G_1 = Point(e)
H_1 = Point(e_1)
h_1 = Segment(G_1, H_1)
I_1 = Point(s)
J_1 = Point(Circle[I_1, Volumen])
j_1 = Segment(I_1, J_1)
poly3, i_2, j_2, z_1, k_3 = Polygon(I, J_1, Z, K)
K_1 = Point(j_2)
l_1 = Segment(L, K_1)
L_1 = Point(j_2)
m_1 = Segment(N, L_1)
M_1 = Point(j_2)
n_1 = Segment(P, M_1)
N_1 = Point(j_2)
p_1 = Segment(R, N_1)
O_1 = Point(i_2)
q_1 = Segment(O_1, F_1)
P_1 = Point(i_2)
r_1 = Segment(P_1, D_1)
Q_1 = Point(i_2)
s_1 = Segment(Q_1, H_1)
t_1 = Segment(A, D)
R_1 = Intersect(h, i)
S_1 = Point(d)
b_2 = Segment(R_1, J_1)