fact: Definition path_baut `{Univalence} {X} (Z Z' : BAut X) : (Z <~> Z') <~> (Z = Z' :> BAut X) := equiv_path_sigma_hprop _ _ oE equiv_path_universe _ _.
imports: HoTT.Basics HoTT.Types Constant HoTT.Truncations ObjectClassifier Homotopy.ExactSequence Pointed