xref
: /
dports
/
lang
/
chibi-scheme
/
chibi-scheme-0.10
/
tests
/
snow
/
repo2
/
leonardo
/
fibonacci.scm
Home
History
Annotate
Line#
Scopes#
Navigate#
Raw
Download
current directory
1
(
define
(
fib
n
)
2
(
let
lp
((
n
n
) (
a
1
) (
b
1
))
3
(
if
(
<
n
2
)
4
a
5
(
lp
(
-
n
1
) (
+
a
b
)
a
))))
6