combs([H|_],[H]). % Simple case of one element comb
combs([_|T],T2) :- % Combinations of the tail w/o head
    combs(T,T2).
combs([H|T],[H|T2]) :- % Combinations of the tail including head
    combs(T,T2).