proposition: Lemma isofhlevelfsnincl (n : nat) {X Y : UU} (f : X -> Y) (is : isincl f) : isofhlevelf (S n) f.
proof: Proof. intros. unfold isofhlevelf. intro y. apply isofhlevelsnprop. apply (is y). Defined.
imports: UniMath.Foundations.PartA