michael/Spectral
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

trivial

Browse source
This commit is contained in:
Steve Awodey 2017-01-26 14:58:19 -05:00
parent 00e01fd2a6
commit c09f568992
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
algebra/quotient_group.hlean
View file

@ -247,6 +247,7 @@ namespace group
------------------------------------------------
-- FIRST ISOMORPHISM THEOREM
------------------------------------------------
definition kernel_quotient_extension {A B : AbGroup} (f : A →g B) : quotient_ab_group (kernel_subgroup f) →g B :=
@ -371,7 +372,8 @@ definition is_embedding_kernel_quotient_to_image {A B : AbGroup} (f : A →g B)
exact is_embedding_kernel_quotient_extension f
end
definition ab_group_first_iso_thm (A B : AbGroup) (f : A →g B) : quotient_ab_group (kernel_subgroup f) ≃g ab_image f :=
definition ab_group_first_iso_thm (A B : AbGroup) (f : A →g B)
: quotient_ab_group (kernel_subgroup f) ≃g ab_image f :=
begin
fapply isomorphism.mk,
exact ab_group_kernel_quotient_to_image f,