# example|IterativeFibonacci

~~~
:fib (n-m)
  [ #0 #1 ] dip
  [ over + swap ] times drop ;
~~~