Implements map with foldr

Honestly, I don't fully grasp this yet. Got this solution from the (folds section)[http://learnyouahaskell.com/higher-order-functions#folds] in Learn You a Haskell for a Great Good! Really need to reread the chapter on higher-order functions thoroughly.