Haskell Count and Prod functions