Skip to content

Instantly share code, notes, and snippets.

@kiritsuku
Created November 19, 2012 20:28
Show Gist options
  • Select an option

  • Save kiritsuku/4113670 to your computer and use it in GitHub Desktop.

Select an option

Save kiritsuku/4113670 to your computer and use it in GitHub Desktop.
corec tribonacci
trib = 1 : 1 : 1 : zipWith (+) trib (zipWith (+) (tail trib) (tail (tail trib)))
take 15 trib --[1,1,1,3,5,9,17,31,57,105,193,355,653,1201,2209]
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment