Next Atypical Types 64

Merge Sort

        sort [] = []
        sort ls = merge (sort p) (sort q)
          where (p, q) = split ls
        sort :: (Ord a) => [t] -> [a]

Huh??



Next Copyright © 1999,2008 Mark Dominus