Create quicksort.hs