mirror of
https://github.com/anoma/juvix.git
synced 2025-01-05 22:46:08 +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
12 lines
181 B
Plaintext
12 lines
181 B
Plaintext
module Data.Pair;
|
|
|
|
inductive Pair (A : Type) (B : Type) {
|
|
mkPair : A → B → Pair A B;
|
|
};
|
|
|
|
fst : (A : Type) → (B : Type) → Pair A B → A;
|
|
fst _ _ (mkPair a b) ≔ a;
|
|
|
|
|
|
end;
|