{X} `{IsLocal f X} {i} (h k : lgen_codomain f i -> X) (p : h o f i == k o f i) s : local_indpaths p (f i s) = p s := (fst (snd (ooextendable_islocal i 2) h k) p).2 s. End LocalTypes. Arguments local_rec : simpl never. Arguments local_rec_beta : simpl never. Arguments local_indpaths : simpl never. Arguments : simpl never. Global Instance accrsu_loc@{a i} (f : LocalGenerators@{a}) : IsAccRSU@{a i} (Loc@{a i} f). Proof. unshelve econstructor. - exact f. - intros; split; apply idmap. Defined.
Require Import HoTT.Basics HoTT.Types. Require Import Extensions. Require Import ReflectiveSubuniverse Accessible. Import IsLocal_Internal.