Definition free_gr_hrel (X : hSet) : hrel (free_monoid (setcoprod X X)) := λ g h, ∃ x, x::coprodcomm X X x::[] = g × [] = h.
Require Import UniMath.MoreFoundations.Subtypes. Require Import UniMath.MoreFoundations.Sets. Require Import UniMath.Algebra.Monoids. Require Import UniMath.Algebra.Groups. Require Import UniMath.Algebra.IteratedBinaryOperations. Require Import UniMath.Combinatorics.Lists.