My task is to find most repeatable element in list on visual prolog. As I am beginner in prolog, I don't have any ideas how to do that. I have some examples like one below but I cant adapt it to Visual Prolog :(
listmax(L, M):-
listmax(L, [], [], M).
listmax([], Seen, MMax, Max):-
MMax=[] -> Max=Seen ; listmax(MMax, [], [], Max).
listmax([H|T], Seen, MMax, Max):-
( member(H, Seen) ->
listmax(T, Seen, [H|MMax], Max)
; listmax(T, [H|Seen], MMax, Max)
).