Skip to content

Instantly share code, notes, and snippets.

@5outh
Created April 3, 2012 06:16
Show Gist options
  • Save 5outh/2289711 to your computer and use it in GitHub Desktop.
Save 5outh/2289711 to your computer and use it in GitHub Desktop.
Insertion Sort
import Data.List
insertionSort :: (Ord a) => [a] -> [a]
insertionSort = foldr insert []
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment