This website requires JavaScript.
Explore
Help
Sign in
kotovalexarian-likes-github
/
ruby--ruby
Watch
1
Star
0
Fork
You've already forked ruby--ruby
0
mirror of
https://github.com/ruby/ruby.git
synced
2022-11-09 12:17:21 -05:00
Code
Releases
Activity
31fd8aa681
ruby--ruby
/
sample
/
fib.scm
9 lines
115 B
Scheme
Raw
Normal View
History
Unescape
Escape
Initial revision git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@2 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
1998-01-16 07:13:05 -05:00
(
define
(
fib
n
)
(
if
(
<
n
2
)
n
(
+
(
fib
(
-
n
2
)
)
(
fib
(
-
n
1
)
)
)
)
)
This commit was generated by cvs2svn to compensate for changes in r372, which included commits to RCS files with non-trunk default branches. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@373 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
1999-01-19 23:59:39 -05:00
(
display
(
fib
20
)
)
(
newline
)
matz git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@1053 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
2000-11-27 04:23:38 -05:00
(
quit
)
Copy permalink