OFFSET
0,2
COMMENTS
a(n) <= 11*n; a(m) = 11*m iff m is a term of A039691. - Reinhard Zumkeller, Jul 05 2014
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 0..10000
David Applegate, Marc LeBrun and N. J. A. Sloane, Carryless Arithmetic (I): The Mod 10 Version.
EXAMPLE
a(19)=109 since we have 11 X 19 = carryless sum of 100, 90, 10 and 9 =109
PROG
(Haskell)
a059632 n = foldl (\v d -> 10 * v + d) 0 $
map (flip mod 10) $ zipWith (+) ([0] ++ ds) (ds ++ [0])
where ds = map (read . return) $ show n
-- Reinhard Zumkeller, Jul 05 2014
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Henry Bottomley, Feb 19 2001
STATUS
approved