Maxima Function
lmax (L)
When L is a list or a set, return apply ('max, args (L)). When L isn't a list or a set, signal an error.
apply ('max, args (L))