I have got some values H, and I would like to find the maximum one using \+, how can i do it?

```
maxValue(X) :-
  Get(Id, X),
  \+( Get(Id, Y), X < Y ).

```

don't have a clue....please help, thanks!