0001 Haskell: turn a sorted list into a binary search tree | Homework Assignment solution