MAX
* MAX ( a b -- c )

return the maximum of a and b

core ordinary primitive