diff --git a/Main.hs b/Main.hs index 19b45f7..8386199 100644 --- a/Main.hs +++ b/Main.hs @@ -146,5 +146,5 @@ fibonacci n = fibonacci (n - 1) + fibonacci (n - 2) -- Fibonnaci sequence until indice n fibonnaciSequence :: Int -> [Int] fibonnaciSequence 0 = [0] -fibonnaciSequence 1 = [1] +fibonnaciSequence 1 = [0, 1] fibonnaciSequence n = fibonnaciSequence (n - 1) ++ [fibonacci n]