OFFSET
1,2
COMMENTS
a(n) = A128924(n,n).
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 1..10000
PROG
(Haskell)
a235715 1 = 1
a235715 n = f 1 ps 0 where
f 0 (1 : xs) z = z
f _ (x : xs) z = f x xs (z + 0 ^ (n - 1 - x))
ps = 1 : 1 : zipWith (\u v -> (u + v) `mod` n) (tail ps) ps
CROSSREFS
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, Jan 17 2014
STATUS
approved