DEFINE fib == [1 0] dip [swap [+] unary] times popd.