>>> Max 42 <> Max 3 Max {getMax = 42}
>>> sconcat $ Max 1 :| [ Max n | n <- [2 .. 100]] Max {getMax = 100}