Finished new check pattern
This commit is contained in:
parent
76b1c55065
commit
52db1943bb
2 changed files with 42 additions and 70 deletions
|
|
@ -3,7 +3,7 @@ data forall a. List (a) where {
|
|||
Cons : a -> List (a) -> List (a)
|
||||
};
|
||||
|
||||
length : List (Int) -> Int;
|
||||
length : forall c. List (List (c)) -> Int;
|
||||
length = \list. case list of {
|
||||
Cons x xs => 1 + length xs;
|
||||
-- Nil => 0;
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue