Merge two group namespaces.

This commit is contained in:
favonia 2017-06-06 17:18:10 -06:00
parent b6394b9750
commit a292dba89f

View file

@ -95,13 +95,6 @@ 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 pmap
definition eta {A B : Type*} (f : A →* B) : pmap.mk f (respect_pt f) = f :=
@ -184,6 +177,9 @@ namespace group
-- : @is_mul_hom G G' (@ab_group.to_group _ (AbGroup.struct G)) _ φ :=
-- homomorphism.struct φ
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 open group
namespace function