mirror of
https://github.com/anoma/juvix.git
synced 2025-01-07 16:22:14 +03:00
32059965a9
* infer hole in type from pattern * refactor * fix error message * format * fix matching of identifiers * improve error message
17 lines
205 B
Plaintext
17 lines
205 B
Plaintext
module M;
|
|
|
|
inductive Bool {
|
|
false : Bool;
|
|
true : Bool;
|
|
};
|
|
|
|
inductive Pair (A : Type) (B : Type) {
|
|
mkPair : A → B → Pair A B;
|
|
};
|
|
|
|
f : _ → _;
|
|
f (mkPair false true) ≔ true;
|
|
f _ ≔ false;
|
|
|
|
end;
|