fact: Definition extendable_over_unit (n : nat) (A : Type@{a}) (C : Unit -> Type@{i}) (D : forall u, C u -> Type@{j}) (ext : ExtendableAlong@{a a i k} n (const_tt A) C) (ext' : forall (c : forall u, C u), ExtendableAlong@{a a j k} n (const_tt A) (fun u => (D u (c u)))) : ExtendableAlong_Over@{a a i j k} n (const_tt A) C D ext.
imports: HoTT.Basics HoTT.Types Extensions Modality Accessible Localization