なあ、再帰関数好きな人いる？ パート2 [転載禁止]©5ch.io
レス数が900を超えています。1000を超えると表示できなくなるよ。
0932デフォルトの名無しさん
2015/11/17(火) 06:28:37.62ID:NQ6PWML2subset([],[]).
subset([A|B],[A|C]) :-
subset(B,C).
subset([A|B],C) :-
subset(B,C).
?- subset([1,2,3],X).
X = [1, 2, 3] ;
X = [1, 2] ;
X = [1, 3] ;
X = [1] ;
X = [2, 3] ;
X = [2] ;
X = [3] ;
X = [].
?-
レス数が900を超えています。1000を超えると表示できなくなるよ。