Metamath Proof Explorer


Theorem fseqsupcl

Description: The values of a finite real sequence have a supremum. (Contributed by NM, 20-Sep-2005) (Revised by Mario Carneiro, 28-Apr-2015)

Ref Expression
Assertion fseqsupcl ⊢ N ∈ ℤ ≥ M ∧ F : M … N ⟶ ℝ → sup ran ⁡ F ℝ < ∈ ℝ

Proof

Step Hyp Ref Expression
1 frn ⊢ F : M … N ⟶ ℝ → ran ⁡ F ⊆ ℝ
2 1 adantl ⊢ N ∈ ℤ ≥ M ∧ F : M … N ⟶ ℝ → ran ⁡ F ⊆ ℝ
3 fzfi ⊢ M … N ∈ Fin
4 ffn ⊢ F : M … N ⟶ ℝ → F Fn M … N
5 4 adantl ⊢ N ∈ ℤ ≥ M ∧ F : M … N ⟶ ℝ → F Fn M … N
6 dffn4 ⊢ F Fn M … N ↔ F : M … N ⟶ onto ran ⁡ F
7 5 6 sylib ⊢ N ∈ ℤ ≥ M ∧ F : M … N ⟶ ℝ → F : M … N ⟶ onto ran ⁡ F
8 fofi ⊢ M … N ∈ Fin ∧ F : M … N ⟶ onto ran ⁡ F → ran ⁡ F ∈ Fin
9 3 7 8 sylancr ⊢ N ∈ ℤ ≥ M ∧ F : M … N ⟶ ℝ → ran ⁡ F ∈ Fin
10 fdm ⊢ F : M … N ⟶ ℝ → dom ⁡ F = M … N
11 10 adantl ⊢ N ∈ ℤ ≥ M ∧ F : M … N ⟶ ℝ → dom ⁡ F = M … N
12 fzn0 ⊢ M … N ≠ ∅ ↔ N ∈ ℤ ≥ M
13 12 biranri ⊢ N ∈ ℤ ≥ M ∧ F : M … N ⟶ ℝ → M … N ≠ ∅
14 11 13 eqnetrd ⊢ N ∈ ℤ ≥ M ∧ F : M … N ⟶ ℝ → dom ⁡ F ≠ ∅
15 dm0rn0 ⊢ dom ⁡ F = ∅ ↔ ran ⁡ F = ∅
16 15 necon3bii ⊢ dom ⁡ F ≠ ∅ ↔ ran ⁡ F ≠ ∅
17 14 16 sylib ⊢ N ∈ ℤ ≥ M ∧ F : M … N ⟶ ℝ → ran ⁡ F ≠ ∅
18 ltso ⊢ < Or ℝ
19 fisupcl ⊢ < Or ℝ ∧ ran ⁡ F ∈ Fin ∧ ran ⁡ F ≠ ∅ ∧ ran ⁡ F ⊆ ℝ → sup ran ⁡ F ℝ < ∈ ran ⁡ F
20 18 19 mpan ⊢ ran ⁡ F ∈ Fin ∧ ran ⁡ F ≠ ∅ ∧ ran ⁡ F ⊆ ℝ → sup ran ⁡ F ℝ < ∈ ran ⁡ F
21 9 17 2 20 syl3anc ⊢ N ∈ ℤ ≥ M ∧ F : M … N ⟶ ℝ → sup ran ⁡ F ℝ < ∈ ran ⁡ F
22 2 21 sseldd ⊢ N ∈ ℤ ≥ M ∧ F : M … N ⟶ ℝ → sup ran ⁡ F ℝ < ∈ ℝ