(** Unicity *)

(* Specifications: *)
Lemma is_lim_seq_unique (u : nat -> R) (l : Rbar) :
is_lim_seq u l -> Lim_seq u = l.
Lemma Lim_seq_correct (u : nat -> R) :
ex_lim_seq u -> is_lim_seq u (Lim_seq u).
Lemma Lim_seq_correct' (u : nat -> R) :
ex_finite_lim_seq u -> is_lim_seq u (real (Lim_seq u)).
Lemma ex_finite_lim_seq_correct (u : nat -> R) :
ex_finite_lim_seq u <-> ex_lim_seq u /\ is_finite (Lim_seq u).
Lemma ex_lim_seq_dec (u : nat -> R) :
{ex_lim_seq u} + {~ex_lim_seq u}.
Lemma ex_finite_lim_seq_dec (u : nat -> R) :
{ex_finite_lim_seq u} + {~ ex_finite_lim_seq u}.