Fibonacci sequence: Difference between revisions

Content added Content deleted
Line 9,412: Line 9,412:
multi fib ($n) { fib($n - 1) + fib($n - 2) }</lang>
multi fib ($n) { fib($n - 1) + fib($n - 2) }</lang>
=={{header|Red}}==
=={{header|Red}}==
(unnecessarily, but pleasantly palindromic)
<lang Red>fibonacci: func [n][
<lang Red>palindrome: [fn: fn-1 + fn-1: fn]
fibonacci: func [n][
fn-1: 0
fn-1: 0
fn: 1
fn: 1
loop n [fn: fn-1 + fn-1: fn]
loop n palindrome
]</lang>
]</lang>