3 lines
155 B
Prolog
3 lines
155 B
Prolog
|
?- ncsubs([a,e,i,o,u], L).
|
||
|
|
L = [[a,e,i,u],[a,e,o],[a,e,o,u],[a,e,u],[a,i],[a,i,o],[a,i,o,u],[a,i,u],[a,o],[a,o,u],[a,u],[e,i,u],[e,o],[e,o,u],[e,u],[i,u]]
|