Add isomorphism_ap.

This commit is contained in:
favonia 2017-06-06 12:33:22 -06:00
parent 7125413a9a
commit d014e50cd7

View file

@ -95,6 +95,13 @@ namespace eq
end eq open eq
namespace group
definition isomorphism_ap (A : Type) (F : A → Group) {a b : A} (p : a = b) : F a ≃g F b :=
isomorphism_of_eq (ap F p)
end group
namespace trunc
-- TODO: redefine loopn_ptrunc_pequiv