Pour avoir les coordonnées des sommets du cube, on tape :
normal(cube_centre([0,0,0],[3,3,3],[0,1,0])),0
car c'est le dernier argument d'une liste qui détermine
le mode d'affichage : ici 0 dit
que l'on affiche des expressions.
On obtient :
pnt(pnt[[[[3,3,3],[-1,-1,5],[-5,1,1],[-1,5,-1]],
[[3,3,3],[-1,5,-1],[1,1,-5],[5,-1,-1]],[[3,3,3],[-1,-1,5],[1,-5,1],
[5,-1,-1]],[[-1,-1,5],[-5,1,1],[-3,-3,-3],[1,-5,1]],[[-1,5,-1],
[-5,1,1],[-3,-3,-3],[1,1,-5]],[[5,-1,-1],[1,-5,1],[-3,-3,-3],
[1,1,-5]]],0]),0
On peut aussi taper
normal(coordonnees(sommets(cube_centre([0,0,0],[3,3,3],[0,1,0]))))