fact: Definition group_mul_rid := group_mul group_id x == x.
imports: UniMath.MoreFoundations.Notations UniMath.Combinatorics.StandardFiniteSets UniMath.Combinatorics.MoreLists UniMath.Algebra.Groups UniMath.Algebra.Universal.EqAlgebras