solide

plan1

plan2

A = (-1, -1)
B = (1, -1)
poly1, a, b, c, d, C, D = Polygon(A, B, 4)
E = Point(Circle[B, Distance[A, B], Segment[A, B]])
e, F, G, H, I, J, faceABEF, faceAFJG, faceABHG, faceBEIH, faceEFJI, faceGHIJ, arêteAF, arêteAB, arêteBE, arêteEF, arêteAG, arêteFJ, arêteGJ, arêteGH, arêteBH, arêteHI, arêteEI, arêteIJ = Cube(A, B, E)
K = Midpoint(arêteHI)
L = Midpoint(arêteBH)
M = Midpoint(arêteEI)
N = Midpoint(b)
O = Midpoint(arêteAG)
P = Intersect(zAxis, faceGHIJ)
f = Sphere(P, K)
Q = Intersect(yAxis, zAxis)
g = Sphere(Q, N)
h = Segment(I, B)
i = Segment(H, E)
j = Segment(G, B)
k = Segment(H, A)
R = Intersect(k, j)
S = Intersect(i, h)
l = Sphere(S, L)
m = Sphere(R, O)
n = Segment(G, D)
p = Segment(J, A)
T = Intersect(p, n)
o = Sphere(T, O)
q = Segment(I, D)
r = Segment(J, E)
U = Intersect(q, r)
s = Sphere(U, M)
t = OrthogonalPlane(S, yAxis)
v = Plane(J, H, B)
c_1 = IntersectPath(v, f)
poly2, V, W, Z, A_1, a_1, b_1, d_1, e_1 = IntersectPath(v, e)
f_1 = IntersectPath(v, g)
h_1 = IntersectPath(t, f)
k_1 = IntersectPath(t, o)
p_1 = IntersectPath(t, g)
q_1 = IntersectPath(t, l)
poly3, B_1, C_1, D_1, E_1, i_1, j_1, l_1, m_1 = IntersectPath(t, e)
u = true
w = false
g_1 = false