Fibonacci sequence: Difference between revisions
Latitude language added
No edit summary |
Mercerenies (talk | contribs) (Latitude language added) |
||
Line 5,433:
fibonacci(3) //->output 2
</lang>
=={{header|Latitude}}==
===Recursive===
<lang latitude>fibo := {
takes '[n].
if { n <= 1. } then {
n.
} else {
fibo (n - 1) + fibo (n - 2).
}.
}.</lang>
===Memoization===
<lang latitude>fibo := {
takes '[n].
cache := here cache.
{ cache slot? (n ordinal). } ifFalse {
cache slot (n ordinal) =
if { n <= 1. } then {
n.
} else {
fibo (n - 1) + fibo (n - 2).
}.
}.
cache slot (n ordinal).
} tap {
;; Attach the cache to the method object itself.
#'self cache := Object clone.
}.</lang>
=={{header|LFE}}==
| |||