`{MapIn (Sep O) _ _ f} : MapIn O (diagonal f). Proof. intros p. refine (inO_equiv_inO' _ (hfiber_diagonal f p)^-1). Defined.
Require Import HoTT.Basics HoTT.Types HoTT.Cubical.DPath. Require Import HFiber Extensions Factorization Limits.Pullback. Require Import Modality Accessible Descent. Require Import Truncations.Core. Require Import Homotopy.Suspension.