Learning haskell updated
finished cleaning up functional