proposition: Lemma Rseq_bound_mult : Rseq_bound (Un * Vn) (lu * lv).
proof: Proof. intro n ; unfold Rseq_mult ; rewrite Rabs_mult ; apply Rmult_le_compat ; (apply Rabs_pos || auto). Qed.
imports: Lia Rsequence_def Rsequence_base_facts Rsequence_sums_facts Rsequence_rewrite_facts Lra MyRIneq