Pisano period: Difference between revisions
m
→{{header|Haskell}}
mNo edit summary |
|||
Line 455:
factor n
| n <= 1 = []
factor n =
where
fun x d c =
if 0 /= rem x d
|