proposition: Lemma iterop_list_mon_step (x:M) (xs:list M) : iterop_list_mon (x::xs) = x * iterop_list_mon xs.
proof: Proof. apply iterop_list_step. apply runax. Defined.
imports: UniMath.Combinatorics.Lists UniMath.Combinatorics.FiniteSequences UniMath.Algebra.RigsAndRings UniMath.Foundations.UnivalenceAxiom UniMath.MoreFoundations.Tactics UniMath.Algebra.Groups UniMath.MoreFoundations.NegativePropositions