Haskell选择排序

示例

选择排序将反复选择最小元素，直到列表为空。

importData.List(minimum, delete)

ssort :: Ord t => [t] -> [t]
ssort [] = []
ssort xs = let { x = minimum xs } 
           in  x : ssort (delete x xs)