fact: Definition equiv_inO_closed (A : Type) : (U -> Contr A) <-> IsEquiv (fun a:A => push (inr a) : Join U A).
imports: HoTT.Basics HoTT.Types Extensions Modality Accessible Nullification Lex Topological Colimits.Pushout Homotopy.Join.Core