Metamath Proof Explorer


Theorem rlimclim1

Description: Forward direction of rlimclim . (Contributed by Mario Carneiro, 16-Sep-2014)

Ref Expression
Hypotheses rlimclim1.1 ⊢ Z = ℤ ≥ M
rlimclim1.2 ⊢ φ → M ∈ ℤ
rlimclim1.3 ⊢ φ → F ⇝ℝ A
rlimclim1.4 ⊢ φ → Z ⊆ dom ⁡ F
Assertion rlimclim1 ⊢ φ → F ⇝ A

Proof

Step Hyp Ref Expression
1 rlimclim1.1 ⊢ Z = ℤ ≥ M
2 rlimclim1.2 ⊢ φ → M ∈ ℤ
3 rlimclim1.3 ⊢ φ → F ⇝ℝ A
4 rlimclim1.4 ⊢ φ → Z ⊆ dom ⁡ F
5 fvex ⊢ F ⁡ w ∈ V
6 5 rgenw ⊢ ∀ w ∈ dom ⁡ F F ⁡ w ∈ V
7 6 a1i ⊢ φ ∧ y ∈ ℝ + → ∀ w ∈ dom ⁡ F F ⁡ w ∈ V
8 simpr ⊢ φ ∧ y ∈ ℝ + → y ∈ ℝ +
9 rlimf ⊢ F ⇝ℝ A → F : dom ⁡ F ⟶ ℂ
10 3 9 syl ⊢ φ → F : dom ⁡ F ⟶ ℂ
11 10 adantr ⊢ φ ∧ y ∈ ℝ + → F : dom ⁡ F ⟶ ℂ
12 11 feqmptd ⊢ φ ∧ y ∈ ℝ + → F = w ∈ dom ⁡ F ⟼ F ⁡ w
13 3 adantr ⊢ φ ∧ y ∈ ℝ + → F ⇝ℝ A
14 12 13 eqbrtrrd ⊢ φ ∧ y ∈ ℝ + → w ∈ dom ⁡ F ⟼ F ⁡ w ⇝ℝ A
15 7 8 14 rlimi ⊢ φ ∧ y ∈ ℝ + → ∃ z ∈ ℝ ∀ w ∈ dom ⁡ F z ≤ w → F ⁡ w − A < y
16 2 ad2antrr ⊢ φ ∧ y ∈ ℝ + ∧ z ∈ ℝ ∧ ∀ w ∈ dom ⁡ F z ≤ w → F ⁡ w − A < y → M ∈ ℤ
17 flcl ⊢ z ∈ ℝ → z ∈ ℤ
18 17 peano2zd ⊢ z ∈ ℝ → z + 1 ∈ ℤ
19 18 ad2antrl ⊢ φ ∧ y ∈ ℝ + ∧ z ∈ ℝ ∧ ∀ w ∈ dom ⁡ F z ≤ w → F ⁡ w − A < y → z + 1 ∈ ℤ
20 19 16 ifcld ⊢ φ ∧ y ∈ ℝ + ∧ z ∈ ℝ ∧ ∀ w ∈ dom ⁡ F z ≤ w → F ⁡ w − A < y → if M ≤ z + 1 z + 1 M ∈ ℤ
21 16 zred ⊢ φ ∧ y ∈ ℝ + ∧ z ∈ ℝ ∧ ∀ w ∈ dom ⁡ F z ≤ w → F ⁡ w − A < y → M ∈ ℝ
22 19 zred ⊢ φ ∧ y ∈ ℝ + ∧ z ∈ ℝ ∧ ∀ w ∈ dom ⁡ F z ≤ w → F ⁡ w − A < y → z + 1 ∈ ℝ
23 max1 ⊢ M ∈ ℝ ∧ z + 1 ∈ ℝ → M ≤ if M ≤ z + 1 z + 1 M
24 21 22 23 syl2anc ⊢ φ ∧ y ∈ ℝ + ∧ z ∈ ℝ ∧ ∀ w ∈ dom ⁡ F z ≤ w → F ⁡ w − A < y → M ≤ if M ≤ z + 1 z + 1 M
25 eluz2 ⊢ if M ≤ z + 1 z + 1 M ∈ ℤ ≥ M ↔ M ∈ ℤ ∧ if M ≤ z + 1 z + 1 M ∈ ℤ ∧ M ≤ if M ≤ z + 1 z + 1 M
26 16 20 24 25 syl3anbrc ⊢ φ ∧ y ∈ ℝ + ∧ z ∈ ℝ ∧ ∀ w ∈ dom ⁡ F z ≤ w → F ⁡ w − A < y → if M ≤ z + 1 z + 1 M ∈ ℤ ≥ M
27 26 1 eleqtrrdi ⊢ φ ∧ y ∈ ℝ + ∧ z ∈ ℝ ∧ ∀ w ∈ dom ⁡ F z ≤ w → F ⁡ w − A < y → if M ≤ z + 1 z + 1 M ∈ Z
28 simplrl ⊢ φ ∧ y ∈ ℝ + ∧ z ∈ ℝ ∧ ∀ w ∈ dom ⁡ F z ≤ w → F ⁡ w − A < y ∧ k ∈ ℤ ≥ if M ≤ z + 1 z + 1 M → z ∈ ℝ
29 18 zred ⊢ z ∈ ℝ → z + 1 ∈ ℝ
30 28 29 syl ⊢ φ ∧ y ∈ ℝ + ∧ z ∈ ℝ ∧ ∀ w ∈ dom ⁡ F z ≤ w → F ⁡ w − A < y ∧ k ∈ ℤ ≥ if M ≤ z + 1 z + 1 M → z + 1 ∈ ℝ
31 21 adantr ⊢ φ ∧ y ∈ ℝ + ∧ z ∈ ℝ ∧ ∀ w ∈ dom ⁡ F z ≤ w → F ⁡ w − A < y ∧ k ∈ ℤ ≥ if M ≤ z + 1 z + 1 M → M ∈ ℝ
32 30 31 ifcld ⊢ φ ∧ y ∈ ℝ + ∧ z ∈ ℝ ∧ ∀ w ∈ dom ⁡ F z ≤ w → F ⁡ w − A < y ∧ k ∈ ℤ ≥ if M ≤ z + 1 z + 1 M → if M ≤ z + 1 z + 1 M ∈ ℝ
33 eluzelre ⊢ k ∈ ℤ ≥ if M ≤ z + 1 z + 1 M → k ∈ ℝ
34 33 adantl ⊢ φ ∧ y ∈ ℝ + ∧ z ∈ ℝ ∧ ∀ w ∈ dom ⁡ F z ≤ w → F ⁡ w − A < y ∧ k ∈ ℤ ≥ if M ≤ z + 1 z + 1 M → k ∈ ℝ
35 fllep1 ⊢ z ∈ ℝ → z ≤ z + 1
36 28 35 syl ⊢ φ ∧ y ∈ ℝ + ∧ z ∈ ℝ ∧ ∀ w ∈ dom ⁡ F z ≤ w → F ⁡ w − A < y ∧ k ∈ ℤ ≥ if M ≤ z + 1 z + 1 M → z ≤ z + 1
37 max2 ⊢ M ∈ ℝ ∧ z + 1 ∈ ℝ → z + 1 ≤ if M ≤ z + 1 z + 1 M
38 31 30 37 syl2anc ⊢ φ ∧ y ∈ ℝ + ∧ z ∈ ℝ ∧ ∀ w ∈ dom ⁡ F z ≤ w → F ⁡ w − A < y ∧ k ∈ ℤ ≥ if M ≤ z + 1 z + 1 M → z + 1 ≤ if M ≤ z + 1 z + 1 M
39 28 30 32 36 38 letrd ⊢ φ ∧ y ∈ ℝ + ∧ z ∈ ℝ ∧ ∀ w ∈ dom ⁡ F z ≤ w → F ⁡ w − A < y ∧ k ∈ ℤ ≥ if M ≤ z + 1 z + 1 M → z ≤ if M ≤ z + 1 z + 1 M
40 eluzle ⊢ k ∈ ℤ ≥ if M ≤ z + 1 z + 1 M → if M ≤ z + 1 z + 1 M ≤ k
41 40 adantl ⊢ φ ∧ y ∈ ℝ + ∧ z ∈ ℝ ∧ ∀ w ∈ dom ⁡ F z ≤ w → F ⁡ w − A < y ∧ k ∈ ℤ ≥ if M ≤ z + 1 z + 1 M → if M ≤ z + 1 z + 1 M ≤ k
42 28 32 34 39 41 letrd ⊢ φ ∧ y ∈ ℝ + ∧ z ∈ ℝ ∧ ∀ w ∈ dom ⁡ F z ≤ w → F ⁡ w − A < y ∧ k ∈ ℤ ≥ if M ≤ z + 1 z + 1 M → z ≤ k
43 breq2 ⊢ w = k → z ≤ w ↔ z ≤ k
44 43 imbrov2fvoveq ⊢ w = k → z ≤ w → F ⁡ w − A < y ↔ z ≤ k → F ⁡ k − A < y
45 simplrr ⊢ φ ∧ y ∈ ℝ + ∧ z ∈ ℝ ∧ ∀ w ∈ dom ⁡ F z ≤ w → F ⁡ w − A < y ∧ k ∈ ℤ ≥ if M ≤ z + 1 z + 1 M → ∀ w ∈ dom ⁡ F z ≤ w → F ⁡ w − A < y
46 4 ad3antrrr ⊢ φ ∧ y ∈ ℝ + ∧ z ∈ ℝ ∧ ∀ w ∈ dom ⁡ F z ≤ w → F ⁡ w − A < y ∧ k ∈ ℤ ≥ if M ≤ z + 1 z + 1 M → Z ⊆ dom ⁡ F
47 1 uztrn2 ⊢ if M ≤ z + 1 z + 1 M ∈ Z ∧ k ∈ ℤ ≥ if M ≤ z + 1 z + 1 M → k ∈ Z
48 27 47 sylan ⊢ φ ∧ y ∈ ℝ + ∧ z ∈ ℝ ∧ ∀ w ∈ dom ⁡ F z ≤ w → F ⁡ w − A < y ∧ k ∈ ℤ ≥ if M ≤ z + 1 z + 1 M → k ∈ Z
49 46 48 sseldd ⊢ φ ∧ y ∈ ℝ + ∧ z ∈ ℝ ∧ ∀ w ∈ dom ⁡ F z ≤ w → F ⁡ w − A < y ∧ k ∈ ℤ ≥ if M ≤ z + 1 z + 1 M → k ∈ dom ⁡ F
50 44 45 49 rspcdva ⊢ φ ∧ y ∈ ℝ + ∧ z ∈ ℝ ∧ ∀ w ∈ dom ⁡ F z ≤ w → F ⁡ w − A < y ∧ k ∈ ℤ ≥ if M ≤ z + 1 z + 1 M → z ≤ k → F ⁡ k − A < y
51 42 50 mpd ⊢ φ ∧ y ∈ ℝ + ∧ z ∈ ℝ ∧ ∀ w ∈ dom ⁡ F z ≤ w → F ⁡ w − A < y ∧ k ∈ ℤ ≥ if M ≤ z + 1 z + 1 M → F ⁡ k − A < y
52 51 ralrimiva ⊢ φ ∧ y ∈ ℝ + ∧ z ∈ ℝ ∧ ∀ w ∈ dom ⁡ F z ≤ w → F ⁡ w − A < y → ∀ k ∈ ℤ ≥ if M ≤ z + 1 z + 1 M F ⁡ k − A < y
53 fveq2 ⊢ j = if M ≤ z + 1 z + 1 M → ℤ ≥ j = ℤ ≥ if M ≤ z + 1 z + 1 M
54 53 raleqdv ⊢ j = if M ≤ z + 1 z + 1 M → ∀ k ∈ ℤ ≥ j F ⁡ k − A < y ↔ ∀ k ∈ ℤ ≥ if M ≤ z + 1 z + 1 M F ⁡ k − A < y
55 54 rspcev ⊢ if M ≤ z + 1 z + 1 M ∈ Z ∧ ∀ k ∈ ℤ ≥ if M ≤ z + 1 z + 1 M F ⁡ k − A < y → ∃ j ∈ Z ∀ k ∈ ℤ ≥ j F ⁡ k − A < y
56 27 52 55 syl2anc ⊢ φ ∧ y ∈ ℝ + ∧ z ∈ ℝ ∧ ∀ w ∈ dom ⁡ F z ≤ w → F ⁡ w − A < y → ∃ j ∈ Z ∀ k ∈ ℤ ≥ j F ⁡ k − A < y
57 15 56 rexlimddv ⊢ φ ∧ y ∈ ℝ + → ∃ j ∈ Z ∀ k ∈ ℤ ≥ j F ⁡ k − A < y
58 57 ralrimiva ⊢ φ → ∀ y ∈ ℝ + ∃ j ∈ Z ∀ k ∈ ℤ ≥ j F ⁡ k − A < y
59 rlimpm ⊢ F ⇝ℝ A → F ∈ ℂ ↑ 𝑝𝑚 ℝ
60 3 59 syl ⊢ φ → F ∈ ℂ ↑ 𝑝𝑚 ℝ
61 eqidd ⊢ φ ∧ k ∈ Z → F ⁡ k = F ⁡ k
62 rlimcl ⊢ F ⇝ℝ A → A ∈ ℂ
63 3 62 syl ⊢ φ → A ∈ ℂ
64 4 sselda ⊢ φ ∧ k ∈ Z → k ∈ dom ⁡ F
65 10 ffvelcdmda ⊢ φ ∧ k ∈ dom ⁡ F → F ⁡ k ∈ ℂ
66 64 65 syldan ⊢ φ ∧ k ∈ Z → F ⁡ k ∈ ℂ
67 1 2 60 61 63 66 clim2c ⊢ φ → F ⇝ A ↔ ∀ y ∈ ℝ + ∃ j ∈ Z ∀ k ∈ ℤ ≥ j F ⁡ k − A < y
68 58 67 mpbird ⊢ φ → F ⇝ A