RosettaCodeData/Task/Anonymous-recursion/REBOL/anonymous-recursion.rebol

2 lines
77 B
Text
Raw Permalink Normal View History

2015-11-18 06:14:39 +00:00
fib: func [n /f][ do f: func [m] [ either m < 2 [m][(f m - 1) + f m - 2]] n]