% ice-cream cones, calculating all the possible combinations of scoops.
scoop(vanilla). scoop(strawberry). scoop(chocolate).
cone(A,B,C):-scoop(A), scoop(B), scoop(C).
conesnum(0).
%%write your own code for count
go:-cone(X,Y,Z), count,fail; conesnum(Number), write(number_cones(Number)).