a question from Maple users

[Emeric Deutsch]

Dear Maple user seqfans,

I'd like to be able to get for any n all the n-dimensional
0-1 vectors (2^n, of course). 
For a particular n, for example n=3, I can write the 
command

[seq(seq(seq([u,v,w],u=0..1),v=0..1),w=0..1)];

leading to 
[[0, 0, 0], [1, 0, 0], [0, 1, 0], [1, 1, 0], [0, 0, 1],
   [1, 0, 1], [0, 1, 1], [1, 1, 1]]

How can I avoid writing seq n times?

I'd appreciate your help or the address of a Maple support group.

Thanks,
Emeric