RosettaCodeData/Task/Draw-a-rotating-cube/Maple/draw-a-rotating-cube.maple
2023-07-01 13:44:08 -04:00

7 lines
205 B
Text

plots:-display(
seq(
plots:-display(
plottools[cuboid]( [0,0,0], [1,1,1] ),
axes=none, scaling=constrained, orientation=[0,45,i] ),
i = 0..360, 20 ),
insequence=true );