Solve Problem 60 in Haskell
Reduce repetition by parameterization and recursion
Terminate when length is n to avoid decrementing n
Reduce redundancy
Simplify function names