使用Haskell实现一个函数，找出列表中的最大值。

在Haskell中，可以使用以下函数来找出列表中的最大值：

maximum' :: (Ord a) => [a] -> a
maximum' [] = error "empty list"
maximum' [x] = x
maximum' (x:xs)
    | x > maxTail = x
    | otherwise = maxTail
    where maxTail = maximum' xs

这个函数的类型签名说明了它可以处理任意可比较大小的类型。它接受一个列表作为参数，返回列表中的最大值。如果列表为空，它会抛出一个错误；如果列表中只有一个元素，它会直接返回该元素；否则，它会递归地比较列表头部的元素和尾部的最大值，返回较大者。

下面是一个使用该函数的例子：

main :: IO ()
main = do
    let numbers = [5, 10, 3, 8, 2]
    putStrLn ("The maximum number is: " ++ show (maximum' numbers))

在这个例子中，我们定义了一个名为numbers的列表，然后调用maximum'函数来找出列表中的最大值，并使用putStrLn打印出来。show函数用于将最大值转换为字符串类型，以便可以与其他字符串拼接。

当我们运行这个程序时，它会输出：

The maximum number is: 10

这是因为在numbers列表中，10是最大的数值。