Paste: fib

Author: blah
Mode: factor
Date: Wed, 30 Sep 2009 20:15:46
Plain Text |
: fib ( m -- n )
    dup 1 > [
        [ 1 - fib ] [ 2 - fib ] bi +
    ] when ;

New Annotation

Summary:
Author:
Mode:
Body: