Definition make_interval_diagram {C : category} (x : C) (y : C) (f : x --> y) : diagram interval_graph C. Proof. use make_diagram. - exact(bool_rect _ x y). - intros a b; destruct a, b; try (exact fromempty). exact(λ _ , f). Defined.
Require Import UniMath.Foundations.All. Require Import UniMath.MoreFoundations.All. Require Import UniMath.CategoryTheory.Core.Categories. Require Import UniMath.CategoryTheory.Limits.Graphs.Colimits. Require Import UniMath.Combinatorics.StandardFiniteSets. Require Import UniMath.Combinatorics.FiniteSets.