Cacher is the code snippet organizer for pro developers

inssort (x:xs) = insert x (inssort xs)
  where insert y (z:zs) | y > z = z : insert y zs
        insert y zs = y:zs
inssort _ = []