mirror of
https://github.com/anoma/juvix.git
synced 2025-01-05 22:46:08 +03:00
15 lines
160 B
Plaintext
15 lines
160 B
Plaintext
module Box;
|
|
|
|
type Box (A : Type) :=
|
|
| box : A → Box A;
|
|
|
|
type T :=
|
|
| t : T;
|
|
|
|
b : Box _ := box t;
|
|
|
|
id : {A : Type} → A → A
|
|
| x := x;
|
|
|
|
tt : _ := id t;
|