Add insertToSortedList.rkt