mirror of
https://github.com/anoma/juvix.git
synced 2024-12-01 00:04:58 +03:00
11 lines
100 B
Plaintext
11 lines
100 B
Plaintext
module M;
|
|
|
|
type Nat :=
|
|
O : Nat |
|
|
S : Nat -> Nat;
|
|
|
|
fun : Nat -> Nat;
|
|
fun (S {S {x}}) := x;
|
|
|
|
end;
|