Just another update

2015-02-20 00:35:01 -05:00 · 2015-02-20 00:35:01 -05:00 · 00a190b0a6
commit 00a190b0a6
parent a25938f123
6591 changed files with 94363 additions and 23227 deletions
--- a/Task/Fibonacci-sequence/Haskell/fibonacci-sequence-6.hs
+++ b/Task/Fibonacci-sequence/Haskell/fibonacci-sequence-6.hs
@ -1,6 +1,6 @@
 fibsteps (a,b) n
-    | n <= 0 = (a,b)
-    | True   = fibsteps (b, a+b) (n-1)
+    | n <= 0    = (a,b)
+    | otherwise = fibsteps (b, a+b) (n-1)

 fibnums :: [Integer]
 fibnums = map fst $ iterate (`fibsteps` 1) (0,1)