Power set: Difference between revisions
m
→Logical (cut-free) Definition: remove redundant comment
(Logical (cut-free) Definition) |
m (→Logical (cut-free) Definition: remove redundant comment) |
||
Line 1,715:
<lang Prolog>
powerset(X,Y) :- bagof( S, subseq(S,X), Y).
subseq( [], []).
|