mirror of
https://github.com/anoma/juvix.git
synced 2024-12-01 00:04:58 +03:00
3b3ea45da9
* Renaming MiniJuvix to Juvix * Make Ormolu happy * Make Hlint happy * Remove redundant imports * Fix shell tests and add target ci to our Makefile * Make pre-commit happy
11 lines
202 B
Plaintext
11 lines
202 B
Plaintext
module Lambda;
|
|
|
|
inductive Pair (a : Type) (b : Type) {
|
|
mkPair : a → b → Pair a b
|
|
};
|
|
|
|
fst : (a : Type) → (b : Type) → Pair a b → a ;
|
|
fst ≔ λ { _ _ (mkPair _ _ x x) ↦ x };
|
|
|
|
end;
|