mirror of
https://github.com/anoma/juvix.git
synced 2024-12-15 01:52:11 +03:00
20 lines
280 B
Plaintext
20 lines
280 B
Plaintext
module Input;
|
|
|
|
open import Data.IO;
|
|
|
|
infixr 5 ::;
|
|
type List (A : Type) :=
|
|
nil : List A
|
|
| :: : A → List A → List A;
|
|
|
|
type Foo :=
|
|
a : Foo;
|
|
|
|
l : List (List Foo) → List (List Foo);
|
|
l ((_ :: nil) :: nil) := nil :: nil;
|
|
|
|
main : Action;
|
|
main := put-str-ln "no errors";
|
|
|
|
end;
|