mirror of
https://github.com/anoma/juvix.git
synced 2024-12-02 23:43:01 +03:00
14 lines
194 B
Plaintext
14 lines
194 B
Plaintext
module M;
|
|
|
|
type Bool :=
|
|
| true : Bool
|
|
| false : Bool;
|
|
|
|
type Pair (A : Type) (B : Type) :=
|
|
| mkPair : A → B → Pair A B;
|
|
|
|
f : _ → _
|
|
| (mkPair false true) := true
|
|
| true := false;
|
|
|