This website requires JavaScript.
Explore
Help
Register
Sign in
aparler
/
RosettaCodeData
Watch
1
Star
0
Fork
You've already forked RosettaCodeData
0
Code
Issues
12
Pull requests
3
Projects
Releases
Packages
Wiki
Activity
Actions
master
RosettaCodeData
/
Task
/
Fibonacci-sequence
/
Haskell
/
fibonacci-sequence-2.hs
7 lines
108 B
Haskell
Raw
Permalink
Normal View
History
Unescape
Escape
September 2017 Update
2017-09-23 10:01:46 +02:00
fib
x
=
if
x
<
1
then
0
else
if
x
<
2
then
1
else
fib
(
x
-
1
)
+
fib
(
x
-
2
)
Reference in a new issue
Copy permalink