proposition: Proposition equiv_path_abses_data `{Funext} {B A : AbGroup@{u}} (E F: AbSES B A) : abses_path_data E F <~> abses_path_data_iso E F.
proof: Proof. srapply equiv_adjointify. - apply abses_path_data_to_iso. - srapply (functor_sigma (grp_iso_homo _ _)). exact (fun _ => idmap). - intros [phi [p q]]. apply path_sigma_hprop. by apply equiv_path_groupisomorphism. - reflexivity. Defined.
imports: Basics Types Truncations.Core HSet WildCat Groups.QuotientGroup Groups.ShortExactSequence AbelianGroup AbGroups.Biproduct AbHom Homotopy.ExactSequence Pointed Modalities.ReflectiveSubuniverse