Fixed error message

This commit is contained in:
sebastianselander 2023-05-15 13:45:50 +02:00
parent 229679f60d
commit 9495c3b12a
3 changed files with 7 additions and 10 deletions

View file

@ -13,7 +13,7 @@ add x y = x + y
sum : List Int -> Int
sum xs = case xs of
Nil => 0
Cons a as => a + (sum xs)
Cons x xs => x + (sum xs)
main : Int
main = sum (map (add 1) (Cons 1 Nil))
main = sum (map (add 1) (Cons 4 (Cons 3 (Cons 2 (Cons 1 Nil)))))