import Data.List (sort); import Data.Function on (==) sort [1,2] [2,1]