A: (0, -2, 0)
B: (2, 0, 0)
C = Point(Circle[B, Distance[A, B], Segment[A, B]])
a, D, E, F, G, H, faceABCD, faceADHE, faceABFE, faceBCGF, faceCDHG, faceEFGH, arêteAD, arêteAB, arêteBC, arêteCD, arêteAE, arêteDH, arêteEH, arêteEF, arêteBF, arêteFG, arêteCG, arêteGH = Cube(A, B, C)
M = Midpoint(arêteBC)
EF = Distance(E, F)
c = Circle(E, Distance[E, F] / 3, faceABFE)
N = Intersect(arêteEF, c, 1)
p = Plane(A, N, M)
P = Intersect(arêteFG, p)
f = Line(A, N)
g = Line(B, F)
L = Intersect(f, g)
h = Line(L, M)
t1, m, a_1, b_1 = Polygon(A, B, M)
t2, p_1, n, f_1 = Polygon(N, F, P)
d, faceABL, faceBLM, faceALM, arêteAL, arêteBL, arêteLM = Pyramid(t1, L)
e, faceFLN, faceFLP, faceLNP, arêteLN, arêteFL, arêteLP = Pyramid(t2, L)
poly1, I, J, K, O, i, j, k, l = IntersectPath(p, a)
FN = Distance(F, N)
AB = Distance(A, B)
FP = Distance(F, P)
BM = Distance(B, M)
Aire_{ABM} = Area(A, B, M)
Aire_{NFP} = Area(N, F, P)
quotient_{longueur}: FN / AB
quotient_{aire}: Aire_{NFP} / Aire_{ABM}
quotient_{Volumes}: e / d
Volume_{partie carrée}: d - e