使用Haskell实现一个函数，将列表中的元素按照某个条件进行排序。

在Haskell中，我们可以使用函数sortBy来对列表中的元素进行排序。sortBy函数需要两个参数：一个比较函数和要排序的列表。

比较函数是一个函数，它接收两个元素作为参数并返回一个Ordering类型的值。Ordering类型有三个值：LT表示第一个参数应该排在第二个参数之前，GT表示第一个参数应该排在第二个参数之后，EQ表示两个参数相等。比较函数的返回值决定了排序的顺序。

下面是一个例子，演示如何使用sortBy函数来按照整数的绝对值对列表进行排序：

import Data.List (sortBy)

absCompare :: Int -> Int -> Ordering
absCompare x y = compare (abs x) (abs y)

sortedList :: [Int]
sortedList = sortBy absCompare [5, -3, 2, -1, 4]

main :: IO ()
main = print sortedList

在上面的例子中，我们首先导入Data.List模块中的sortBy函数，然后定义了一个比较函数absCompare。这个比较函数使用compare函数比较两个整数的绝对值，并返回排序顺序。接下来，我们定义了一个名为sortedList的列表，通过调用sortBy函数并传入比较函数和待排序的列表来获取排序后的列表。最后，我们在main函数中打印结果。

运行上面的代码将输出[-1, 2, -3, 4, 5]，因为列表中的元素按照它们的绝对值进行了排序。

你可以根据自己的需求定义不同的比较函数来排序列表中的元素。例如，你可以按照字符串长度、字母顺序或者自定义的其他条件对列表中的元素进行排序。