Metamath Proof Explorer


Theorem sge0rpcpnf

Description: The sum of an infinite number of a positive constant, is +oo (Contributed by Glauco Siliprandi, 11-Oct-2020)

Ref Expression
Hypotheses sge0rpcpnf.a ⊢ φ → A ∈ V
sge0rpcpnf.nfi ⊢ φ → ¬ A ∈ Fin
sge0rpcpnf.b ⊢ φ → B ∈ ℝ +
Assertion sge0rpcpnf ⊢ φ → sum^ ⁡ x ∈ A ⟼ B = +∞

Proof

Step Hyp Ref Expression
1 sge0rpcpnf.a ⊢ φ → A ∈ V
2 sge0rpcpnf.nfi ⊢ φ → ¬ A ∈ Fin
3 sge0rpcpnf.b ⊢ φ → B ∈ ℝ +
4 1 adantr ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ → A ∈ V
5 0xr ⊢ 0 ∈ ℝ *
6 5 a1i ⊢ φ → 0 ∈ ℝ *
7 pnfxr ⊢ +∞ ∈ ℝ *
8 7 a1i ⊢ φ → +∞ ∈ ℝ *
9 3 rpxrd ⊢ φ → B ∈ ℝ *
10 3 rpge0d ⊢ φ → 0 ≤ B
11 3 rpred ⊢ φ → B ∈ ℝ
12 ltpnf ⊢ B ∈ ℝ → B < +∞
13 11 12 syl ⊢ φ → B < +∞
14 9 8 13 xrltled ⊢ φ → B ≤ +∞
15 6 8 9 10 14 eliccxrd ⊢ φ → B ∈ 0 +∞
16 15 adantr ⊢ φ ∧ x ∈ A → B ∈ 0 +∞
17 eqid ⊢ x ∈ A ⟼ B = x ∈ A ⟼ B
18 16 17 fmptd ⊢ φ → x ∈ A ⟼ B : A ⟶ 0 +∞
19 18 adantr ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ → x ∈ A ⟼ B : A ⟶ 0 +∞
20 4 19 sge0xrcl ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ → sum^ ⁡ x ∈ A ⟼ B ∈ ℝ *
21 7 a1i ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ → +∞ ∈ ℝ *
22 simpr ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ → sum^ ⁡ x ∈ A ⟼ B < +∞
23 20 21 22 xrgtned ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ → +∞ ≠ sum^ ⁡ x ∈ A ⟼ B
24 23 necomd ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ → sum^ ⁡ x ∈ A ⟼ B ≠ +∞
25 24 neneqd ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ → ¬ sum^ ⁡ x ∈ A ⟼ B = +∞
26 4 19 sge0repnf ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ → sum^ ⁡ x ∈ A ⟼ B ∈ ℝ ↔ ¬ sum^ ⁡ x ∈ A ⟼ B = +∞
27 25 26 mpbird ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ → sum^ ⁡ x ∈ A ⟼ B ∈ ℝ
28 11 adantr ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ → B ∈ ℝ
29 3 rpne0d ⊢ φ → B ≠ 0
30 29 adantr ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ → B ≠ 0
31 27 28 30 redivcld ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ → sum^ ⁡ x ∈ A ⟼ B B ∈ ℝ
32 arch ⊢ sum^ ⁡ x ∈ A ⟼ B B ∈ ℝ → ∃ n ∈ ℕ sum^ ⁡ x ∈ A ⟼ B B < n
33 31 32 syl ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ → ∃ n ∈ ℕ sum^ ⁡ x ∈ A ⟼ B B < n
34 ishashinf ⊢ ¬ A ∈ Fin → ∀ n ∈ ℕ ∃ y ∈ 𝒫 A y = n
35 2 34 syl ⊢ φ → ∀ n ∈ ℕ ∃ y ∈ 𝒫 A y = n
36 35 r19.21bi ⊢ φ ∧ n ∈ ℕ → ∃ y ∈ 𝒫 A y = n
37 df-rex ⊢ ∃ y ∈ 𝒫 A y = n ↔ ∃ y y ∈ 𝒫 A ∧ y = n
38 36 37 sylib ⊢ φ ∧ n ∈ ℕ → ∃ y y ∈ 𝒫 A ∧ y = n
39 38 adantlr ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ ∧ n ∈ ℕ → ∃ y y ∈ 𝒫 A ∧ y = n
40 39 3adant3 ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ ∧ n ∈ ℕ ∧ sum^ ⁡ x ∈ A ⟼ B B < n → ∃ y y ∈ 𝒫 A ∧ y = n
41 nfv ⊢ Ⅎ y φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ ∧ n ∈ ℕ ∧ sum^ ⁡ x ∈ A ⟼ B B < n
42 simprl ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ ∧ n ∈ ℕ ∧ sum^ ⁡ x ∈ A ⟼ B B < n ∧ y ∈ 𝒫 A ∧ y = n → y ∈ 𝒫 A
43 simpr ⊢ n ∈ ℕ ∧ y = n → y = n
44 simpl ⊢ n ∈ ℕ ∧ y = n → n ∈ ℕ
45 43 44 eqeltrd ⊢ n ∈ ℕ ∧ y = n → y ∈ ℕ
46 nnnn0 ⊢ y ∈ ℕ → y ∈ ℕ 0
47 vex ⊢ y ∈ V
48 47 a1i ⊢ y ∈ ℕ → y ∈ V
49 hashclb ⊢ y ∈ V → y ∈ Fin ↔ y ∈ ℕ 0
50 48 49 syl ⊢ y ∈ ℕ → y ∈ Fin ↔ y ∈ ℕ 0
51 46 50 mpbird ⊢ y ∈ ℕ → y ∈ Fin
52 45 51 syl ⊢ n ∈ ℕ ∧ y = n → y ∈ Fin
53 52 adantrl ⊢ n ∈ ℕ ∧ y ∈ 𝒫 A ∧ y = n → y ∈ Fin
54 53 3ad2antl2 ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ ∧ n ∈ ℕ ∧ sum^ ⁡ x ∈ A ⟼ B B < n ∧ y ∈ 𝒫 A ∧ y = n → y ∈ Fin
55 42 54 elind ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ ∧ n ∈ ℕ ∧ sum^ ⁡ x ∈ A ⟼ B B < n ∧ y ∈ 𝒫 A ∧ y = n → y ∈ 𝒫 A ∩ Fin
56 simp3 ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ ∧ n ∈ ℕ ∧ sum^ ⁡ x ∈ A ⟼ B B < n → sum^ ⁡ x ∈ A ⟼ B B < n
57 27 3ad2ant1 ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ ∧ n ∈ ℕ ∧ sum^ ⁡ x ∈ A ⟼ B B < n → sum^ ⁡ x ∈ A ⟼ B ∈ ℝ
58 nnre ⊢ n ∈ ℕ → n ∈ ℝ
59 58 3ad2ant2 ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ ∧ n ∈ ℕ ∧ sum^ ⁡ x ∈ A ⟼ B B < n → n ∈ ℝ
60 3 adantr ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ → B ∈ ℝ +
61 60 3ad2ant1 ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ ∧ n ∈ ℕ ∧ sum^ ⁡ x ∈ A ⟼ B B < n → B ∈ ℝ +
62 57 59 61 ltdivmul2d ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ ∧ n ∈ ℕ ∧ sum^ ⁡ x ∈ A ⟼ B B < n → sum^ ⁡ x ∈ A ⟼ B B < n ↔ sum^ ⁡ x ∈ A ⟼ B < n ⁢ B
63 56 62 mpbid ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ ∧ n ∈ ℕ ∧ sum^ ⁡ x ∈ A ⟼ B B < n → sum^ ⁡ x ∈ A ⟼ B < n ⁢ B
64 63 adantr ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ ∧ n ∈ ℕ ∧ sum^ ⁡ x ∈ A ⟼ B B < n ∧ y ∈ 𝒫 A ∧ y = n → sum^ ⁡ x ∈ A ⟼ B < n ⁢ B
65 53 adantll ⊢ φ ∧ n ∈ ℕ ∧ y ∈ 𝒫 A ∧ y = n → y ∈ Fin
66 5 a1i ⊢ φ ∧ n ∈ ℕ ∧ y ∈ 𝒫 A ∧ y = n ∧ x ∈ y → 0 ∈ ℝ *
67 7 a1i ⊢ φ ∧ n ∈ ℕ ∧ y ∈ 𝒫 A ∧ y = n ∧ x ∈ y → +∞ ∈ ℝ *
68 9 ad3antrrr ⊢ φ ∧ n ∈ ℕ ∧ y ∈ 𝒫 A ∧ y = n ∧ x ∈ y → B ∈ ℝ *
69 10 ad3antrrr ⊢ φ ∧ n ∈ ℕ ∧ y ∈ 𝒫 A ∧ y = n ∧ x ∈ y → 0 ≤ B
70 13 ad3antrrr ⊢ φ ∧ n ∈ ℕ ∧ y ∈ 𝒫 A ∧ y = n ∧ x ∈ y → B < +∞
71 66 67 68 69 70 elicod ⊢ φ ∧ n ∈ ℕ ∧ y ∈ 𝒫 A ∧ y = n ∧ x ∈ y → B ∈ 0 +∞
72 65 71 sge0fsummpt ⊢ φ ∧ n ∈ ℕ ∧ y ∈ 𝒫 A ∧ y = n → sum^ ⁡ x ∈ y ⟼ B = ∑ x ∈ y B
73 11 recnd ⊢ φ → B ∈ ℂ
74 73 ad2antrr ⊢ φ ∧ n ∈ ℕ ∧ y ∈ 𝒫 A ∧ y = n → B ∈ ℂ
75 fsumconst ⊢ y ∈ Fin ∧ B ∈ ℂ → ∑ x ∈ y B = y ⁢ B
76 65 74 75 syl2anc ⊢ φ ∧ n ∈ ℕ ∧ y ∈ 𝒫 A ∧ y = n → ∑ x ∈ y B = y ⁢ B
77 oveq1 ⊢ y = n → y ⁢ B = n ⁢ B
78 77 adantl ⊢ y ∈ 𝒫 A ∧ y = n → y ⁢ B = n ⁢ B
79 78 adantl ⊢ φ ∧ n ∈ ℕ ∧ y ∈ 𝒫 A ∧ y = n → y ⁢ B = n ⁢ B
80 72 76 79 3eqtrrd ⊢ φ ∧ n ∈ ℕ ∧ y ∈ 𝒫 A ∧ y = n → n ⁢ B = sum^ ⁡ x ∈ y ⟼ B
81 80 adantllr ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ ∧ n ∈ ℕ ∧ y ∈ 𝒫 A ∧ y = n → n ⁢ B = sum^ ⁡ x ∈ y ⟼ B
82 81 3adantl3 ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ ∧ n ∈ ℕ ∧ sum^ ⁡ x ∈ A ⟼ B B < n ∧ y ∈ 𝒫 A ∧ y = n → n ⁢ B = sum^ ⁡ x ∈ y ⟼ B
83 64 82 breqtrd ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ ∧ n ∈ ℕ ∧ sum^ ⁡ x ∈ A ⟼ B B < n ∧ y ∈ 𝒫 A ∧ y = n → sum^ ⁡ x ∈ A ⟼ B < sum^ ⁡ x ∈ y ⟼ B
84 55 83 jca ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ ∧ n ∈ ℕ ∧ sum^ ⁡ x ∈ A ⟼ B B < n ∧ y ∈ 𝒫 A ∧ y = n → y ∈ 𝒫 A ∩ Fin ∧ sum^ ⁡ x ∈ A ⟼ B < sum^ ⁡ x ∈ y ⟼ B
85 84 ex ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ ∧ n ∈ ℕ ∧ sum^ ⁡ x ∈ A ⟼ B B < n → y ∈ 𝒫 A ∧ y = n → y ∈ 𝒫 A ∩ Fin ∧ sum^ ⁡ x ∈ A ⟼ B < sum^ ⁡ x ∈ y ⟼ B
86 41 85 eximd ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ ∧ n ∈ ℕ ∧ sum^ ⁡ x ∈ A ⟼ B B < n → ∃ y y ∈ 𝒫 A ∧ y = n → ∃ y y ∈ 𝒫 A ∩ Fin ∧ sum^ ⁡ x ∈ A ⟼ B < sum^ ⁡ x ∈ y ⟼ B
87 40 86 mpd ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ ∧ n ∈ ℕ ∧ sum^ ⁡ x ∈ A ⟼ B B < n → ∃ y y ∈ 𝒫 A ∩ Fin ∧ sum^ ⁡ x ∈ A ⟼ B < sum^ ⁡ x ∈ y ⟼ B
88 df-rex ⊢ ∃ y ∈ 𝒫 A ∩ Fin sum^ ⁡ x ∈ A ⟼ B < sum^ ⁡ x ∈ y ⟼ B ↔ ∃ y y ∈ 𝒫 A ∩ Fin ∧ sum^ ⁡ x ∈ A ⟼ B < sum^ ⁡ x ∈ y ⟼ B
89 87 88 sylibr ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ ∧ n ∈ ℕ ∧ sum^ ⁡ x ∈ A ⟼ B B < n → ∃ y ∈ 𝒫 A ∩ Fin sum^ ⁡ x ∈ A ⟼ B < sum^ ⁡ x ∈ y ⟼ B
90 89 3exp ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ → n ∈ ℕ → sum^ ⁡ x ∈ A ⟼ B B < n → ∃ y ∈ 𝒫 A ∩ Fin sum^ ⁡ x ∈ A ⟼ B < sum^ ⁡ x ∈ y ⟼ B
91 90 rexlimdv ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ → ∃ n ∈ ℕ sum^ ⁡ x ∈ A ⟼ B B < n → ∃ y ∈ 𝒫 A ∩ Fin sum^ ⁡ x ∈ A ⟼ B < sum^ ⁡ x ∈ y ⟼ B
92 33 91 mpd ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ → ∃ y ∈ 𝒫 A ∩ Fin sum^ ⁡ x ∈ A ⟼ B < sum^ ⁡ x ∈ y ⟼ B
93 1 adantr ⊢ φ ∧ y ∈ 𝒫 A ∩ Fin → A ∈ V
94 16 adantlr ⊢ φ ∧ y ∈ 𝒫 A ∩ Fin ∧ x ∈ A → B ∈ 0 +∞
95 elpwinss ⊢ y ∈ 𝒫 A ∩ Fin → y ⊆ A
96 95 adantl ⊢ φ ∧ y ∈ 𝒫 A ∩ Fin → y ⊆ A
97 93 94 96 sge0lessmpt ⊢ φ ∧ y ∈ 𝒫 A ∩ Fin → sum^ ⁡ x ∈ y ⟼ B ≤ sum^ ⁡ x ∈ A ⟼ B
98 simpr ⊢ φ ∧ y ∈ 𝒫 A ∩ Fin → y ∈ 𝒫 A ∩ Fin
99 15 adantr ⊢ φ ∧ x ∈ y → B ∈ 0 +∞
100 eqid ⊢ x ∈ y ⟼ B = x ∈ y ⟼ B
101 99 100 fmptd ⊢ φ → x ∈ y ⟼ B : y ⟶ 0 +∞
102 101 adantr ⊢ φ ∧ y ∈ 𝒫 A ∩ Fin → x ∈ y ⟼ B : y ⟶ 0 +∞
103 98 102 sge0xrcl ⊢ φ ∧ y ∈ 𝒫 A ∩ Fin → sum^ ⁡ x ∈ y ⟼ B ∈ ℝ *
104 1 18 sge0xrcl ⊢ φ → sum^ ⁡ x ∈ A ⟼ B ∈ ℝ *
105 104 adantr ⊢ φ ∧ y ∈ 𝒫 A ∩ Fin → sum^ ⁡ x ∈ A ⟼ B ∈ ℝ *
106 103 105 xrlenltd ⊢ φ ∧ y ∈ 𝒫 A ∩ Fin → sum^ ⁡ x ∈ y ⟼ B ≤ sum^ ⁡ x ∈ A ⟼ B ↔ ¬ sum^ ⁡ x ∈ A ⟼ B < sum^ ⁡ x ∈ y ⟼ B
107 97 106 mpbid ⊢ φ ∧ y ∈ 𝒫 A ∩ Fin → ¬ sum^ ⁡ x ∈ A ⟼ B < sum^ ⁡ x ∈ y ⟼ B
108 107 ralrimiva ⊢ φ → ∀ y ∈ 𝒫 A ∩ Fin ¬ sum^ ⁡ x ∈ A ⟼ B < sum^ ⁡ x ∈ y ⟼ B
109 ralnex ⊢ ∀ y ∈ 𝒫 A ∩ Fin ¬ sum^ ⁡ x ∈ A ⟼ B < sum^ ⁡ x ∈ y ⟼ B ↔ ¬ ∃ y ∈ 𝒫 A ∩ Fin sum^ ⁡ x ∈ A ⟼ B < sum^ ⁡ x ∈ y ⟼ B
110 108 109 sylib ⊢ φ → ¬ ∃ y ∈ 𝒫 A ∩ Fin sum^ ⁡ x ∈ A ⟼ B < sum^ ⁡ x ∈ y ⟼ B
111 110 adantr ⊢ φ ∧ sum^ ⁡ x ∈ A ⟼ B < +∞ → ¬ ∃ y ∈ 𝒫 A ∩ Fin sum^ ⁡ x ∈ A ⟼ B < sum^ ⁡ x ∈ y ⟼ B
112 92 111 pm2.65da ⊢ φ → ¬ sum^ ⁡ x ∈ A ⟼ B < +∞
113 nltpnft ⊢ sum^ ⁡ x ∈ A ⟼ B ∈ ℝ * → sum^ ⁡ x ∈ A ⟼ B = +∞ ↔ ¬ sum^ ⁡ x ∈ A ⟼ B < +∞
114 104 113 syl ⊢ φ → sum^ ⁡ x ∈ A ⟼ B = +∞ ↔ ¬ sum^ ⁡ x ∈ A ⟼ B < +∞
115 112 114 mpbird ⊢ φ → sum^ ⁡ x ∈ A ⟼ B = +∞