A very crude way to sort a 2D array in Haskell.  This was a project for CS 1621.