wrote quicksort in haskell

to run the test:

    runghc Quicksort_test.hs