Added test cases to Sort.hs