我很好奇,并且一直无法在 Haskell 中找到类似的提案。考虑是否sort
已写但未写sortBy
。
sortBy :: forall a. (a -> a -> Ordering) -> [a] -> [a]
sortBy f = map getX . sort . map X
where
newtype X = X { getX :: a }
instance Ord X where
compare (X a) (X b) = f a b
有人看过这个提议吗?