hasNoDuplicates :: (Ord a) => [a] -> Bool
hasNoDuplicates xs = S.size (S.fromList xs) == length xs
hasNoDuplicates :: (Ord a) => [a] -> Bool
hasNoDuplicates xs = S.size (S.fromList xs) == length xs
hasNoDuplicates xs = S.size (S.fromList xs) == length xs