Skip to content

Instantly share code, notes, and snippets.

@kiritsuku

kiritsuku/trib.hs

Created November 19, 2012 20:26
Show Gist options

  • Select an option

    Learn more about clone URLs
  • Save kiritsuku/4113654 to your computer and use it in GitHub Desktop.

Select an option

Learn more about clone URLs
Save kiritsuku/4113654 to your computer and use it in GitHub Desktop.
Download ZIP
tailrec tribonacci
Raw
trib.hs
trib n = if n <= 2 then 1 else loop 1 1 1 2
where loop a b c i = if i < n then loop b c (a+b+c) (i+1) else c
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment