Question

我需要编制一份log鱼清单。

?- gener_booleans(Xs,3).
Xs = [true, true, true] ;
Xs = [true, true, false] ;
...
Xs = [false, false, false] ;

Here is link to another solution, but i do not know how to apply it to booleans. Get all sets of list in prolog Can anybody help? P.S the amount of lists is 2^N. Thanks!

Answer 1

gener_booleans([],0).
gener_booleans([true|Xs],N) :- N>0, N1 is N-1, gener_booleans(Xs,N1).
gener_booleans([false|Xs],N) :- N>0, N1 is N-1, gener_booleans(Xs,N1).

Answer 2

3. 如果阁下的证明书有“条形表”:

booleans(Xs, N) :-
    length(Xs, N),
    maplist(boolean, Xs).
boolean(true).
boolean(false).

(我改名为<代码>booleans) 因为它还可以检查女bo;在Prolog方案拟定时更喜欢申报姓名。

友情链接