{O' : Subuniverse} (O : Subuniverse) {A : Type} `{ReflectsD O' O A} (B : O_reflector O' A -> Type) {B_inO : forall oa, In O (B oa)} (f : forall a, B (to O' A a)) (oa : O_reflector O' A) : B oa := (fst (extendable_to_OO B 1%nat) f).
Require Import HoTT.Basics HoTT.Types. Require Import HFiber Extensions Factorization Limits.Pullback.