proposition: Lemma Rseq_bound_eq : forall Wn, Un == Wn -> Rseq_bound Wn lu.
proof: Proof. intros Wn Heq n ; rewrite <- Heq ; apply Un_bd. Qed.
imports: Lia Rsequence_def Rsequence_base_facts Rsequence_sums_facts Rsequence_rewrite_facts Lra MyRIneq