I think max and min need an option that sorts, removes duplicates, and deletes non-extremal numbers (I'd include minf and inf as a number). (%i26) e(n) := makelist(random(5000) * x + random(5000) * y + random(5000) * z + random(5000),i,1,n); This is way too slow: (%i28) lmax(e(1000))$ Evaluation took 124.70 seconds (124.70 elapsed) BW