diff options
| -rw-r--r-- | src/Util/Isomorphism.v | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/src/Util/Isomorphism.v b/src/Util/Isomorphism.v index a02afc3bf..0e6553dcd 100644 --- a/src/Util/Isomorphism.v +++ b/src/Util/Isomorphism.v @@ -1,4 +1,8 @@ -Record IsIso {A B} (f : A -> B) := +Class IsIso {A B} (f : A -> B) := { iso_inv : B -> A; is_right_inv : forall x, f (iso_inv x) = x; is_left_inv : forall x, iso_inv (f x) = x }. + +Arguments iso_inv {_ _} _ {_} _. +Arguments is_right_inv {_ _} _ {_} _. +Arguments is_left_inv {_ _} _ {_} _. |