fact: Definition equiv_O_functor {A B : Type} (f : A <~> B) : O A <~> O B := Build_Equiv _ _ (O_functor f) _.
imports: HoTT.Basics HoTT.Types Equiv.BiInv Extensions HProp HFiber NullHomotopy Limits.Pullback PathAny Colimits.Pushout