Prolog Encontrando o máximo de uma lista de fatos most_wins(Id) :- wins(Id, W), \+ (wins(_, W1), W1 > W).