Re: [colorforth] Fibonacci numbers
- Subject: Re: [colorforth] Fibonacci numbers
- From: Mark Slicker <maslicke@xxxxxxxxxxx>
- Date: Thu, 28 Nov 2002 12:58:16 -0500 (EST)
Nice work! I think that demonstrates a useful and general looping
construct, not to mention a simple one.
Mark
On Thu, 28 Nov 2002, Peter Appelman wrote:
> Mark,
>
> lets not stop there:
>
> : fib push 1 dup pop -2 +
> : f -if drop nip ; then push swap over + pop -1 + f ;
>
> Regards,
> Peter.
>
>
> ---------------------------------------------------------------------
> To unsubscribe, e-mail: colorforth-unsubscribe@xxxxxxxxxxxxxxxxxx
> For additional commands, e-mail: colorforth-help@xxxxxxxxxxxxxxxxxx
>
>
---------------------------------------------------------------------
To unsubscribe, e-mail: colorforth-unsubscribe@xxxxxxxxxxxxxxxxxx
For additional commands, e-mail: colorforth-help@xxxxxxxxxxxxxxxxxx
