Merge Sort in Racket