Another sample file

This commit is contained in:
Arfon Smith
2014-09-04 13:53:36 -05:00
parent fae6dbfebd
commit bca9716fc6
2 changed files with 22 additions and 11 deletions
+5
View File
@@ -0,0 +1,5 @@
%6.8
subset(Set, Subset) :-
append(L1, Subset, Set).
powerset(Set, Subset) :-
bagof(Subset, subset(Set, Subset), Subset).