auto gitdoc commit

This commit is contained in:
Michael Zhang 2024-04-25 19:39:14 +00:00
parent cc73889956
commit 72a46d4f26

View file

@ -63,7 +63,7 @@ exercise2∙13 = aux1 , equiv1
equiv1 : isequiv aux1
g equiv1 = rev
g-id equiv1 (f , f-equiv @ (mkIsEquiv g g-id h h-id)) =
g-id equiv1 e@(f , f-equiv @ (mkIsEquiv g g-id h h-id)) =
-- proving that given any equivalence e, that:
-- ((aux1 ∘ rev) e ≡ id e)
-- (rev (aux1 e) ≡ e)