Definition dialgebra_enrichment_from_arr_incl {x y : C₁} {f : F x --> G x} {g : F y --> G y} (h : x --> y) (p : f · # G h = # F h · g) : dialgebra_enrichment_from_arr h p · dialgebra_enrichment_mor_incl f g = enriched_from_arr E₁ h. Proof. apply EqualizerCommutes. Defined.
Require Import UniMath.Foundations.All. Require Import UniMath.MoreFoundations.All. Require Import UniMath.CategoryTheory.Core.Categories. Require Import UniMath.CategoryTheory.Core.Isos. Require Import UniMath.CategoryTheory.Core.Univalence. Require Import UniMath.CategoryTheory.Core.Functors. Require Import UniMath.CategoryTheory.Core.NaturalTransformations. Require Import UniMath.CategoryTheory.Categories.Dialgebras. Require Import UniMath.CategoryTheory.EnrichedCats.Enrichment. Require Import UniMath.CategoryTheory.EnrichedCats.EnrichmentFunctor. Require Import UniMath.CategoryTheory.EnrichedCats.EnrichmentTransformation. Require Import UniMath.CategoryTheory.Monoidal.Categories. Require Import UniMath.CategoryTheory.Limits.Equalizers. Import MonoidalNotations.