Update SelectionSort.hs