afficher I

afficher L

afficher N

afficher P

afficher M

A: (-3, -1, 0)
B: (3, -1, 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)
I = Midpoint(F, B)
J = Midpoint(E, A)
K = Midpoint(C, G)
poly1, j, b, k, h = Polygon(J, B, K, H)
poly2, j_1, i, g, h_1 = Polygon(J, I, G, H)
ABFE, a_1, b_1, f, e = Polygon(A, B, F, E)
u: (2 / 3 * Vector[B, A])
L = Translate(B, u)
w: (1 / 2 * Vector[B, F]) + (2 / 3 * Vector[B, A])
M = Translate(B, w)
B' = Translate(B, u)
v = Vector(B, B')
l = Vector(B, I)
m = Vector(B, M)
c = false
R = Translate(B, Vector[(1 / 3 * Vector[B, A])])
N = Translate(C, Vector[(1 / 2 * Vector[C, G]) + (1 / 3 * Vector[C, B])])
T = Translate(C, Vector[(1 / 3 * Vector[C, B])])
p = Segment(L, M)
q = Segment(T, N)
r = Segment(N, K)
P = Translate(D, Vector[D, C] + (1 / 2 * Vector[D, A]))
O = Midpoint(A, D)
s = Segment(O, P)
d = false
o = false
t = false
n = Segment(M, I)
c_1 = false