“Prolog Finding the Max a partir de una lista de hechos” Código de respuesta

Prolog Finding the Max a partir de una lista de hechos

most_wins(Id) :-
    wins(Id, W), \+ (wins(_, W1), W1 > W).