Mercurial > repos > tabletprog

view samples/fib.tp @ 127:2b25d0ce2946

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add fullscreen support and improve experience on tablet browsers by tweaking button text size and disabling zooming.
author Mike Pavone <pavone@retrodev.com>
date Tue, 06 Aug 2013 00:06:41 -0700
parents 3a169ebb3224
children
line wrap: on
line source

#{
fib <- :n {
  if: n < 2 {
    1
  } else: {
    (fib: n-1) + (fib: n-2)
  }
}

main <- {
  print: (string: (fib: 30)) . "\n"
}

}