Prime Factors - Haskell | SlaveCode