I am struggling to connect these three rules together

Question

I'm having issues connecting the following three rules together.

countingCombo([H|T], Sequence2) :-
   fact1(H, Sequence),
   append(Sequence, Sequence2, Sequence3),
   countingCombo(T, Sequence3).
countingCombo([], Combination) :-
   print(Combination),
   membersofCombo(Combination, X, C).

membersofCombo(List, X, C) :-
   sort(List, List1),
   member(X, List1),
   count(List, X, C).

count([], X, 0).
count([X|T], X, Y) :-
   count(T, X, Z),
   Y is 1+Z.
count([X1|T], X, Z) :-
   X1 \= X,
   count(T, X, Z).

countingcombo creates an appended list. membersofcombo, sorts that list and then produces each member of the original appended list, count rule then counts the occurences of each memeber.

membersofcombo and count work together, but I can't get countingcombo to connect to members of combo.

@repeat Its from my database, each one follows this format fact(Name,List). — FProlog, Jan 15 '16 at 13:26
@repeat namelist(g,[g,b,h]), namelist(g,[f,b,g]), namelist(h,[g,l,h]), namelist(r,[g,h,b]), namelist(r,[l,h,h]), namelist( r,[f,l,f]). Some names have multiple lists. — FProlog, Jan 15 '16 at 13:34
You should really hotlink the questions and answers from where you get the code that you show in a question. — , Jan 15 '16 at 20:30
@Boris. Good point! So I'm not the only one who had a deja-vu when seeing `count/3`:) — repeat, Jan 15 '16 at 20:40

repeat · Answer 1 · 2016-01-15T13:57:50.240

2

There are a number of issues with your code:

~~Are you aware that combination is not a variable (standing for some list)?~~

rule1([], combination) :-
   print(combination),
   rule2(combination, X, C).

~~Choose better predicate names: rule1, rule2, and rule3 don't tell me nothing...~~
Use prolog-dif in the implementation of count/3!
Eliminate the singleton variable X in clause count([], X, 0).
Quite likely, you meant to write count([], _, 0).
~~Provide an implementation of count/3. Is it rule3/3?~~

edited Jan 15 '16 at 13:57

answered Jan 15 '16 at 12:54

repeat

18,496
4
54
166

1

Yes, typo. Meant to be Combination with a capital. The code still doesn't work however. Editted the question. – FProlog Jan 15 '16 at 12:57

I am struggling to connect these three rules together

1 Answers1