proposition: Lemma ismonoidop_concatenate (X : UU) : ismonoidop (@concatenate X).
proof: Proof. use make_ismonoidop. - use assoc_concatenate. - use make_isunital. + exact []. + use make_isunit. * use nil_concatenate. * use concatenate_nil. Defined.
imports: UniMath.MoreFoundations.Subtypes UniMath.MoreFoundations.Sets UniMath.Algebra.Monoids UniMath.Algebra.Groups UniMath.Algebra.IteratedBinaryOperations UniMath.Combinatorics.Lists