Spectrome's solution for Prime Factors in Haskell on Exercism