Pisano period: Difference between revisions
Content added Content deleted
m (→{{header|Haskell}}: Applied hlint, hindent.) |
|||
Line 455: | Line 455: | ||
factor n |
factor n |
||
| n <= 1 = [] |
| n <= 1 = [] |
||
factor n = |
factor n = ans |
||
if null ans |
|||
then [(n, 1)] |
|||
else ans |
|||
where |
where |
||
ans = go n primes |
ans = go n primes |