fact: Definition dagger_law_id {C : category} (dag : dagger_structure C) : UU := ∏ x : C, dag x x (identity x) = identity x.
imports: UniMath.Foundations.All UniMath.MoreFoundations.All UniMath.CategoryTheory.Core.Categories