fact: Definition latticeop_cat {L} (meet_mor join_mor : C⟦L ⊗ L,L⟧) := (isassoc_cat meet_mor × iscomm_cat meet_mor) × (isassoc_cat join_mor × iscomm_cat join_mor) × (isabsorb_cat meet_mor join_mor × isabsorb_cat join_mor meet_mor).
imports: UniMath.Foundations.PartD UniMath.Foundations.Propositions UniMath.Foundations.Sets UniMath.MoreFoundations.Tactics UniMath.Algebra.Monoids UniMath.OrderTheory.Lattice.Lattice UniMath.OrderTheory.Lattice.Bounded UniMath.CategoryTheory.Core.Categories UniMath.CategoryTheory.Monics UniMath.CategoryTheory.Limits.BinProducts UniMath.CategoryTheory.Limits.Terminal