fact: Definition absemigr_perm120 : ∏ X : hSet, ∏ opp : binop X, ∏ is : isabsemigrop opp, ∏ n0 n1 n2, opp (opp n0 n1) n2 = opp (opp n2 n0) n1 := λ X opp is n0 n1 n2, pathscomp0 ((pr2 is) (opp n0 n1) n2) (pathsinv0 ((pr1 is) n2 n0 n1)).
imports: UniMath.Algebra.Monoids UniMath.Algebra.Groups UniMath.Tactics.Monoids_Tactics UniMath.Tactics.Utilities