Algo 4th Insertion sort and Select sort, Learn Haskell chapter 3