added more functions
added more practice haskell