4 lines
139 B
Raku
4 lines
139 B
Raku
use ntheory "vecextract";
|
|
my @S = qw/a b c/;
|
|
my @PS = map { "[".join(" ",vecextract(\@S,$_))."]" } 0..2**scalar(@S)-1;
|
|
say join(" ",@PS);
|