Jacobsthal numbers: Difference between revisions

m
m (→‎{{header|Haskell}}: Preferred (:) to (<>) in unfoldr variant)
Line 846:
jacobsthalish (x, y) = unfoldr go [x, y]
where
go ([a :, b : xs)] = Just (a, [b :, 2 * a + b : xs])
 
--------------------------- TEST -------------------------
9,655

edits