Metamath Proof Explorer < Previous   Next > Nearby theorems Mirrors  >  Home  >  MPE Home  >  Th. List  >  perfectlem2 Structured version   Visualization version   GIF version

Theorem perfectlem2 25000
 Description: Lemma for perfect 25001. (Contributed by Mario Carneiro, 17-May-2016.) Replace OLD theorem. (Revised by Wolf Lammen, 17-Sep-2020.)
Hypotheses
Ref Expression
perfectlem.1 (𝜑𝐴 ∈ ℕ)
perfectlem.2 (𝜑𝐵 ∈ ℕ)
perfectlem.3 (𝜑 → ¬ 2 ∥ 𝐵)
perfectlem.4 (𝜑 → (1 σ ((2↑𝐴) · 𝐵)) = (2 · ((2↑𝐴) · 𝐵)))
Assertion
Ref Expression
perfectlem2 (𝜑 → (𝐵 ∈ ℙ ∧ 𝐵 = ((2↑(𝐴 + 1)) − 1)))

Proof of Theorem perfectlem2
Dummy variables 𝑘 𝑛 𝑥 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 perfectlem.2 . . . 4 (𝜑𝐵 ∈ ℕ)
2 1red 10093 . . . . 5 (𝜑 → 1 ∈ ℝ)
3 perfectlem.1 . . . . . . . 8 (𝜑𝐴 ∈ ℕ)
4 perfectlem.3 . . . . . . . 8 (𝜑 → ¬ 2 ∥ 𝐵)
5 perfectlem.4 . . . . . . . 8 (𝜑 → (1 σ ((2↑𝐴) · 𝐵)) = (2 · ((2↑𝐴) · 𝐵)))
63, 1, 4, 5perfectlem1 24999 . . . . . . 7 (𝜑 → ((2↑(𝐴 + 1)) ∈ ℕ ∧ ((2↑(𝐴 + 1)) − 1) ∈ ℕ ∧ (𝐵 / ((2↑(𝐴 + 1)) − 1)) ∈ ℕ))
76simp3d 1095 . . . . . 6 (𝜑 → (𝐵 / ((2↑(𝐴 + 1)) − 1)) ∈ ℕ)
87nnred 11073 . . . . 5 (𝜑 → (𝐵 / ((2↑(𝐴 + 1)) − 1)) ∈ ℝ)
91nnred 11073 . . . . 5 (𝜑𝐵 ∈ ℝ)
107nnge1d 11101 . . . . 5 (𝜑 → 1 ≤ (𝐵 / ((2↑(𝐴 + 1)) − 1)))
11 2cn 11129 . . . . . . . . . . 11 2 ∈ ℂ
12 exp1 12906 . . . . . . . . . . 11 (2 ∈ ℂ → (2↑1) = 2)
1311, 12ax-mp 5 . . . . . . . . . 10 (2↑1) = 2
14 df-2 11117 . . . . . . . . . 10 2 = (1 + 1)
1513, 14eqtri 2673 . . . . . . . . 9 (2↑1) = (1 + 1)
16 2re 11128 . . . . . . . . . . 11 2 ∈ ℝ
1716a1i 11 . . . . . . . . . 10 (𝜑 → 2 ∈ ℝ)
18 1zzd 11446 . . . . . . . . . 10 (𝜑 → 1 ∈ ℤ)
193peano2nnd 11075 . . . . . . . . . . 11 (𝜑 → (𝐴 + 1) ∈ ℕ)
2019nnzd 11519 . . . . . . . . . 10 (𝜑 → (𝐴 + 1) ∈ ℤ)
21 1lt2 11232 . . . . . . . . . . 11 1 < 2
2221a1i 11 . . . . . . . . . 10 (𝜑 → 1 < 2)
23 1re 10077 . . . . . . . . . . . 12 1 ∈ ℝ
243nnrpd 11908 . . . . . . . . . . . 12 (𝜑𝐴 ∈ ℝ+)
25 ltaddrp 11905 . . . . . . . . . . . 12 ((1 ∈ ℝ ∧ 𝐴 ∈ ℝ+) → 1 < (1 + 𝐴))
2623, 24, 25sylancr 696 . . . . . . . . . . 11 (𝜑 → 1 < (1 + 𝐴))
27 ax-1cn 10032 . . . . . . . . . . . 12 1 ∈ ℂ
283nncnd 11074 . . . . . . . . . . . 12 (𝜑𝐴 ∈ ℂ)
29 addcom 10260 . . . . . . . . . . . 12 ((1 ∈ ℂ ∧ 𝐴 ∈ ℂ) → (1 + 𝐴) = (𝐴 + 1))
3027, 28, 29sylancr 696 . . . . . . . . . . 11 (𝜑 → (1 + 𝐴) = (𝐴 + 1))
3126, 30breqtrd 4711 . . . . . . . . . 10 (𝜑 → 1 < (𝐴 + 1))
32 ltexp2a 12952 . . . . . . . . . 10 (((2 ∈ ℝ ∧ 1 ∈ ℤ ∧ (𝐴 + 1) ∈ ℤ) ∧ (1 < 2 ∧ 1 < (𝐴 + 1))) → (2↑1) < (2↑(𝐴 + 1)))
3317, 18, 20, 22, 31, 32syl32anc 1374 . . . . . . . . 9 (𝜑 → (2↑1) < (2↑(𝐴 + 1)))
3415, 33syl5eqbrr 4721 . . . . . . . 8 (𝜑 → (1 + 1) < (2↑(𝐴 + 1)))
356simp1d 1093 . . . . . . . . . 10 (𝜑 → (2↑(𝐴 + 1)) ∈ ℕ)
3635nnred 11073 . . . . . . . . 9 (𝜑 → (2↑(𝐴 + 1)) ∈ ℝ)
372, 2, 36ltaddsubd 10665 . . . . . . . 8 (𝜑 → ((1 + 1) < (2↑(𝐴 + 1)) ↔ 1 < ((2↑(𝐴 + 1)) − 1)))
3834, 37mpbid 222 . . . . . . 7 (𝜑 → 1 < ((2↑(𝐴 + 1)) − 1))
39 0lt1 10588 . . . . . . . . 9 0 < 1
4039a1i 11 . . . . . . . 8 (𝜑 → 0 < 1)
41 peano2rem 10386 . . . . . . . . 9 ((2↑(𝐴 + 1)) ∈ ℝ → ((2↑(𝐴 + 1)) − 1) ∈ ℝ)
4236, 41syl 17 . . . . . . . 8 (𝜑 → ((2↑(𝐴 + 1)) − 1) ∈ ℝ)
43 expgt1 12938 . . . . . . . . . 10 ((2 ∈ ℝ ∧ (𝐴 + 1) ∈ ℕ ∧ 1 < 2) → 1 < (2↑(𝐴 + 1)))
4417, 19, 22, 43syl3anc 1366 . . . . . . . . 9 (𝜑 → 1 < (2↑(𝐴 + 1)))
45 posdif 10559 . . . . . . . . . 10 ((1 ∈ ℝ ∧ (2↑(𝐴 + 1)) ∈ ℝ) → (1 < (2↑(𝐴 + 1)) ↔ 0 < ((2↑(𝐴 + 1)) − 1)))
4623, 36, 45sylancr 696 . . . . . . . . 9 (𝜑 → (1 < (2↑(𝐴 + 1)) ↔ 0 < ((2↑(𝐴 + 1)) − 1)))
4744, 46mpbid 222 . . . . . . . 8 (𝜑 → 0 < ((2↑(𝐴 + 1)) − 1))
481nngt0d 11102 . . . . . . . 8 (𝜑 → 0 < 𝐵)
49 ltdiv2 10947 . . . . . . . 8 (((1 ∈ ℝ ∧ 0 < 1) ∧ (((2↑(𝐴 + 1)) − 1) ∈ ℝ ∧ 0 < ((2↑(𝐴 + 1)) − 1)) ∧ (𝐵 ∈ ℝ ∧ 0 < 𝐵)) → (1 < ((2↑(𝐴 + 1)) − 1) ↔ (𝐵 / ((2↑(𝐴 + 1)) − 1)) < (𝐵 / 1)))
502, 40, 42, 47, 9, 48, 49syl222anc 1382 . . . . . . 7 (𝜑 → (1 < ((2↑(𝐴 + 1)) − 1) ↔ (𝐵 / ((2↑(𝐴 + 1)) − 1)) < (𝐵 / 1)))
5138, 50mpbid 222 . . . . . 6 (𝜑 → (𝐵 / ((2↑(𝐴 + 1)) − 1)) < (𝐵 / 1))
521nncnd 11074 . . . . . . 7 (𝜑𝐵 ∈ ℂ)
5352div1d 10831 . . . . . 6 (𝜑 → (𝐵 / 1) = 𝐵)
5451, 53breqtrd 4711 . . . . 5 (𝜑 → (𝐵 / ((2↑(𝐴 + 1)) − 1)) < 𝐵)
552, 8, 9, 10, 54lelttrd 10233 . . . 4 (𝜑 → 1 < 𝐵)
56 eluz2b2 11799 . . . 4 (𝐵 ∈ (ℤ‘2) ↔ (𝐵 ∈ ℕ ∧ 1 < 𝐵))
571, 55, 56sylanbrc 699 . . 3 (𝜑𝐵 ∈ (ℤ‘2))
58 fzfid 12812 . . . . . . . . . . . 12 (𝜑 → (1...𝐵) ∈ Fin)
59 dvdsssfz1 15087 . . . . . . . . . . . . 13 (𝐵 ∈ ℕ → {𝑥 ∈ ℕ ∣ 𝑥𝐵} ⊆ (1...𝐵))
601, 59syl 17 . . . . . . . . . . . 12 (𝜑 → {𝑥 ∈ ℕ ∣ 𝑥𝐵} ⊆ (1...𝐵))
61 ssfi 8221 . . . . . . . . . . . 12 (((1...𝐵) ∈ Fin ∧ {𝑥 ∈ ℕ ∣ 𝑥𝐵} ⊆ (1...𝐵)) → {𝑥 ∈ ℕ ∣ 𝑥𝐵} ∈ Fin)
6258, 60, 61syl2anc 694 . . . . . . . . . . 11 (𝜑 → {𝑥 ∈ ℕ ∣ 𝑥𝐵} ∈ Fin)
6362ad2antrr 762 . . . . . . . . . 10 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → {𝑥 ∈ ℕ ∣ 𝑥𝐵} ∈ Fin)
64 ssrab2 3720 . . . . . . . . . . . . 13 {𝑥 ∈ ℕ ∣ 𝑥𝐵} ⊆ ℕ
6564a1i 11 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → {𝑥 ∈ ℕ ∣ 𝑥𝐵} ⊆ ℕ)
6665sselda 3636 . . . . . . . . . . 11 ((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) ∧ 𝑘 ∈ {𝑥 ∈ ℕ ∣ 𝑥𝐵}) → 𝑘 ∈ ℕ)
6766nnred 11073 . . . . . . . . . 10 ((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) ∧ 𝑘 ∈ {𝑥 ∈ ℕ ∣ 𝑥𝐵}) → 𝑘 ∈ ℝ)
6866nnnn0d 11389 . . . . . . . . . . 11 ((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) ∧ 𝑘 ∈ {𝑥 ∈ ℕ ∣ 𝑥𝐵}) → 𝑘 ∈ ℕ0)
6968nn0ge0d 11392 . . . . . . . . . 10 ((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) ∧ 𝑘 ∈ {𝑥 ∈ ℕ ∣ 𝑥𝐵}) → 0 ≤ 𝑘)
70 df-tp 4215 . . . . . . . . . . . 12 {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵, 𝑛} = ({(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵} ∪ {𝑛})
71 prssi 4385 . . . . . . . . . . . . . . 15 (((𝐵 / ((2↑(𝐴 + 1)) − 1)) ∈ ℕ ∧ 𝐵 ∈ ℕ) → {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵} ⊆ ℕ)
727, 1, 71syl2anc 694 . . . . . . . . . . . . . 14 (𝜑 → {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵} ⊆ ℕ)
7372ad2antrr 762 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵} ⊆ ℕ)
74 simplrl 817 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → 𝑛 ∈ ℕ)
7574snssd 4372 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → {𝑛} ⊆ ℕ)
7673, 75unssd 3822 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → ({(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵} ∪ {𝑛}) ⊆ ℕ)
7770, 76syl5eqss 3682 . . . . . . . . . . 11 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵, 𝑛} ⊆ ℕ)
78 eltpi 4261 . . . . . . . . . . . . 13 (𝑥 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵, 𝑛} → (𝑥 = (𝐵 / ((2↑(𝐴 + 1)) − 1)) ∨ 𝑥 = 𝐵𝑥 = 𝑛))
796simp2d 1094 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((2↑(𝐴 + 1)) − 1) ∈ ℕ)
8079nnzd 11519 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((2↑(𝐴 + 1)) − 1) ∈ ℤ)
817nnzd 11519 . . . . . . . . . . . . . . . . . 18 (𝜑 → (𝐵 / ((2↑(𝐴 + 1)) − 1)) ∈ ℤ)
82 dvdsmul2 15051 . . . . . . . . . . . . . . . . . 18 ((((2↑(𝐴 + 1)) − 1) ∈ ℤ ∧ (𝐵 / ((2↑(𝐴 + 1)) − 1)) ∈ ℤ) → (𝐵 / ((2↑(𝐴 + 1)) − 1)) ∥ (((2↑(𝐴 + 1)) − 1) · (𝐵 / ((2↑(𝐴 + 1)) − 1))))
8380, 81, 82syl2anc 694 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝐵 / ((2↑(𝐴 + 1)) − 1)) ∥ (((2↑(𝐴 + 1)) − 1) · (𝐵 / ((2↑(𝐴 + 1)) − 1))))
8479nncnd 11074 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((2↑(𝐴 + 1)) − 1) ∈ ℂ)
8579nnne0d 11103 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((2↑(𝐴 + 1)) − 1) ≠ 0)
8652, 84, 85divcan2d 10841 . . . . . . . . . . . . . . . . 17 (𝜑 → (((2↑(𝐴 + 1)) − 1) · (𝐵 / ((2↑(𝐴 + 1)) − 1))) = 𝐵)
8783, 86breqtrd 4711 . . . . . . . . . . . . . . . 16 (𝜑 → (𝐵 / ((2↑(𝐴 + 1)) − 1)) ∥ 𝐵)
88 breq1 4688 . . . . . . . . . . . . . . . 16 (𝑥 = (𝐵 / ((2↑(𝐴 + 1)) − 1)) → (𝑥𝐵 ↔ (𝐵 / ((2↑(𝐴 + 1)) − 1)) ∥ 𝐵))
8987, 88syl5ibrcom 237 . . . . . . . . . . . . . . 15 (𝜑 → (𝑥 = (𝐵 / ((2↑(𝐴 + 1)) − 1)) → 𝑥𝐵))
9089ad2antrr 762 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → (𝑥 = (𝐵 / ((2↑(𝐴 + 1)) − 1)) → 𝑥𝐵))
911nnzd 11519 . . . . . . . . . . . . . . . . 17 (𝜑𝐵 ∈ ℤ)
92 iddvds 15042 . . . . . . . . . . . . . . . . 17 (𝐵 ∈ ℤ → 𝐵𝐵)
9391, 92syl 17 . . . . . . . . . . . . . . . 16 (𝜑𝐵𝐵)
94 breq1 4688 . . . . . . . . . . . . . . . 16 (𝑥 = 𝐵 → (𝑥𝐵𝐵𝐵))
9593, 94syl5ibrcom 237 . . . . . . . . . . . . . . 15 (𝜑 → (𝑥 = 𝐵𝑥𝐵))
9695ad2antrr 762 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → (𝑥 = 𝐵𝑥𝐵))
97 simplrr 818 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → 𝑛𝐵)
98 breq1 4688 . . . . . . . . . . . . . . 15 (𝑥 = 𝑛 → (𝑥𝐵𝑛𝐵))
9997, 98syl5ibrcom 237 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → (𝑥 = 𝑛𝑥𝐵))
10090, 96, 993jaod 1432 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → ((𝑥 = (𝐵 / ((2↑(𝐴 + 1)) − 1)) ∨ 𝑥 = 𝐵𝑥 = 𝑛) → 𝑥𝐵))
10178, 100syl5 34 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → (𝑥 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵, 𝑛} → 𝑥𝐵))
102101imp 444 . . . . . . . . . . 11 ((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) ∧ 𝑥 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵, 𝑛}) → 𝑥𝐵)
10377, 102ssrabdv 3714 . . . . . . . . . 10 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵, 𝑛} ⊆ {𝑥 ∈ ℕ ∣ 𝑥𝐵})
10463, 67, 69, 103fsumless 14572 . . . . . . . . 9 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → Σ𝑘 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵, 𝑛}𝑘 ≤ Σ𝑘 ∈ {𝑥 ∈ ℕ ∣ 𝑥𝐵}𝑘)
105 simpr 476 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵})
106 disjsn 4278 . . . . . . . . . . . 12 (({(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵} ∩ {𝑛}) = ∅ ↔ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵})
107105, 106sylibr 224 . . . . . . . . . . 11 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → ({(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵} ∩ {𝑛}) = ∅)
10870a1i 11 . . . . . . . . . . 11 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵, 𝑛} = ({(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵} ∪ {𝑛}))
109 tpfi 8277 . . . . . . . . . . . 12 {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵, 𝑛} ∈ Fin
110109a1i 11 . . . . . . . . . . 11 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵, 𝑛} ∈ Fin)
11177sselda 3636 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) ∧ 𝑘 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵, 𝑛}) → 𝑘 ∈ ℕ)
112111nncnd 11074 . . . . . . . . . . 11 ((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) ∧ 𝑘 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵, 𝑛}) → 𝑘 ∈ ℂ)
113107, 108, 110, 112fsumsplit 14515 . . . . . . . . . 10 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → Σ𝑘 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵, 𝑛}𝑘 = (Σ𝑘 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}𝑘 + Σ𝑘 ∈ {𝑛}𝑘))
1147nncnd 11074 . . . . . . . . . . . . . . 15 (𝜑 → (𝐵 / ((2↑(𝐴 + 1)) − 1)) ∈ ℂ)
115 id 22 . . . . . . . . . . . . . . . 16 (𝑘 = (𝐵 / ((2↑(𝐴 + 1)) − 1)) → 𝑘 = (𝐵 / ((2↑(𝐴 + 1)) − 1)))
116115sumsn 14519 . . . . . . . . . . . . . . 15 (((𝐵 / ((2↑(𝐴 + 1)) − 1)) ∈ ℕ ∧ (𝐵 / ((2↑(𝐴 + 1)) − 1)) ∈ ℂ) → Σ𝑘 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1))}𝑘 = (𝐵 / ((2↑(𝐴 + 1)) − 1)))
1177, 114, 116syl2anc 694 . . . . . . . . . . . . . 14 (𝜑 → Σ𝑘 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1))}𝑘 = (𝐵 / ((2↑(𝐴 + 1)) − 1)))
118 id 22 . . . . . . . . . . . . . . . 16 (𝑘 = 𝐵𝑘 = 𝐵)
119118sumsn 14519 . . . . . . . . . . . . . . 15 ((𝐵 ∈ ℕ ∧ 𝐵 ∈ ℂ) → Σ𝑘 ∈ {𝐵}𝑘 = 𝐵)
1201, 52, 119syl2anc 694 . . . . . . . . . . . . . 14 (𝜑 → Σ𝑘 ∈ {𝐵}𝑘 = 𝐵)
121117, 120oveq12d 6708 . . . . . . . . . . . . 13 (𝜑 → (Σ𝑘 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1))}𝑘 + Σ𝑘 ∈ {𝐵}𝑘) = ((𝐵 / ((2↑(𝐴 + 1)) − 1)) + 𝐵))
122 incom 3838 . . . . . . . . . . . . . . 15 ({𝐵} ∩ {(𝐵 / ((2↑(𝐴 + 1)) − 1))}) = ({(𝐵 / ((2↑(𝐴 + 1)) − 1))} ∩ {𝐵})
1238, 54gtned 10210 . . . . . . . . . . . . . . . 16 (𝜑𝐵 ≠ (𝐵 / ((2↑(𝐴 + 1)) − 1)))
124 disjsn2 4279 . . . . . . . . . . . . . . . 16 (𝐵 ≠ (𝐵 / ((2↑(𝐴 + 1)) − 1)) → ({𝐵} ∩ {(𝐵 / ((2↑(𝐴 + 1)) − 1))}) = ∅)
125123, 124syl 17 . . . . . . . . . . . . . . 15 (𝜑 → ({𝐵} ∩ {(𝐵 / ((2↑(𝐴 + 1)) − 1))}) = ∅)
126122, 125syl5eqr 2699 . . . . . . . . . . . . . 14 (𝜑 → ({(𝐵 / ((2↑(𝐴 + 1)) − 1))} ∩ {𝐵}) = ∅)
127 df-pr 4213 . . . . . . . . . . . . . . 15 {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵} = ({(𝐵 / ((2↑(𝐴 + 1)) − 1))} ∪ {𝐵})
128127a1i 11 . . . . . . . . . . . . . 14 (𝜑 → {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵} = ({(𝐵 / ((2↑(𝐴 + 1)) − 1))} ∪ {𝐵}))
129 prfi 8276 . . . . . . . . . . . . . . 15 {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵} ∈ Fin
130129a1i 11 . . . . . . . . . . . . . 14 (𝜑 → {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵} ∈ Fin)
13172sselda 3636 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → 𝑘 ∈ ℕ)
132131nncnd 11074 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → 𝑘 ∈ ℂ)
133126, 128, 130, 132fsumsplit 14515 . . . . . . . . . . . . 13 (𝜑 → Σ𝑘 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}𝑘 = (Σ𝑘 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1))}𝑘 + Σ𝑘 ∈ {𝐵}𝑘))
13484, 52mulcld 10098 . . . . . . . . . . . . . . 15 (𝜑 → (((2↑(𝐴 + 1)) − 1) · 𝐵) ∈ ℂ)
13552, 134, 84, 85divdird 10877 . . . . . . . . . . . . . 14 (𝜑 → ((𝐵 + (((2↑(𝐴 + 1)) − 1) · 𝐵)) / ((2↑(𝐴 + 1)) − 1)) = ((𝐵 / ((2↑(𝐴 + 1)) − 1)) + ((((2↑(𝐴 + 1)) − 1) · 𝐵) / ((2↑(𝐴 + 1)) − 1))))
13635nncnd 11074 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (2↑(𝐴 + 1)) ∈ ℂ)
137 1cnd 10094 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → 1 ∈ ℂ)
138136, 137, 52subdird 10525 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (((2↑(𝐴 + 1)) − 1) · 𝐵) = (((2↑(𝐴 + 1)) · 𝐵) − (1 · 𝐵)))
13952mulid2d 10096 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (1 · 𝐵) = 𝐵)
140139oveq2d 6706 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (((2↑(𝐴 + 1)) · 𝐵) − (1 · 𝐵)) = (((2↑(𝐴 + 1)) · 𝐵) − 𝐵))
141138, 140eqtrd 2685 . . . . . . . . . . . . . . . . . 18 (𝜑 → (((2↑(𝐴 + 1)) − 1) · 𝐵) = (((2↑(𝐴 + 1)) · 𝐵) − 𝐵))
142141oveq2d 6706 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝐵 + (((2↑(𝐴 + 1)) − 1) · 𝐵)) = (𝐵 + (((2↑(𝐴 + 1)) · 𝐵) − 𝐵)))
143136, 52mulcld 10098 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((2↑(𝐴 + 1)) · 𝐵) ∈ ℂ)
14452, 143pncan3d 10433 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝐵 + (((2↑(𝐴 + 1)) · 𝐵) − 𝐵)) = ((2↑(𝐴 + 1)) · 𝐵))
145142, 144eqtrd 2685 . . . . . . . . . . . . . . . 16 (𝜑 → (𝐵 + (((2↑(𝐴 + 1)) − 1) · 𝐵)) = ((2↑(𝐴 + 1)) · 𝐵))
146145oveq1d 6705 . . . . . . . . . . . . . . 15 (𝜑 → ((𝐵 + (((2↑(𝐴 + 1)) − 1) · 𝐵)) / ((2↑(𝐴 + 1)) − 1)) = (((2↑(𝐴 + 1)) · 𝐵) / ((2↑(𝐴 + 1)) − 1)))
147136, 52, 84, 85divassd 10874 . . . . . . . . . . . . . . 15 (𝜑 → (((2↑(𝐴 + 1)) · 𝐵) / ((2↑(𝐴 + 1)) − 1)) = ((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))))
148146, 147eqtrd 2685 . . . . . . . . . . . . . 14 (𝜑 → ((𝐵 + (((2↑(𝐴 + 1)) − 1) · 𝐵)) / ((2↑(𝐴 + 1)) − 1)) = ((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))))
14952, 84, 85divcan3d 10844 . . . . . . . . . . . . . . 15 (𝜑 → ((((2↑(𝐴 + 1)) − 1) · 𝐵) / ((2↑(𝐴 + 1)) − 1)) = 𝐵)
150149oveq2d 6706 . . . . . . . . . . . . . 14 (𝜑 → ((𝐵 / ((2↑(𝐴 + 1)) − 1)) + ((((2↑(𝐴 + 1)) − 1) · 𝐵) / ((2↑(𝐴 + 1)) − 1))) = ((𝐵 / ((2↑(𝐴 + 1)) − 1)) + 𝐵))
151135, 148, 1503eqtr3d 2693 . . . . . . . . . . . . 13 (𝜑 → ((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))) = ((𝐵 / ((2↑(𝐴 + 1)) − 1)) + 𝐵))
152121, 133, 1513eqtr4d 2695 . . . . . . . . . . . 12 (𝜑 → Σ𝑘 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}𝑘 = ((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))))
153152ad2antrr 762 . . . . . . . . . . 11 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → Σ𝑘 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}𝑘 = ((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))))
15474nncnd 11074 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → 𝑛 ∈ ℂ)
155 id 22 . . . . . . . . . . . . 13 (𝑘 = 𝑛𝑘 = 𝑛)
156155sumsn 14519 . . . . . . . . . . . 12 ((𝑛 ∈ ℂ ∧ 𝑛 ∈ ℂ) → Σ𝑘 ∈ {𝑛}𝑘 = 𝑛)
157154, 154, 156syl2anc 694 . . . . . . . . . . 11 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → Σ𝑘 ∈ {𝑛}𝑘 = 𝑛)
158153, 157oveq12d 6708 . . . . . . . . . 10 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → (Σ𝑘 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}𝑘 + Σ𝑘 ∈ {𝑛}𝑘) = (((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))) + 𝑛))
159113, 158eqtrd 2685 . . . . . . . . 9 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → Σ𝑘 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵, 𝑛}𝑘 = (((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))) + 𝑛))
1603nnnn0d 11389 . . . . . . . . . . . . . . . . 17 (𝜑𝐴 ∈ ℕ0)
161 expp1 12907 . . . . . . . . . . . . . . . . 17 ((2 ∈ ℂ ∧ 𝐴 ∈ ℕ0) → (2↑(𝐴 + 1)) = ((2↑𝐴) · 2))
16211, 160, 161sylancr 696 . . . . . . . . . . . . . . . 16 (𝜑 → (2↑(𝐴 + 1)) = ((2↑𝐴) · 2))
163 2nn 11223 . . . . . . . . . . . . . . . . . . 19 2 ∈ ℕ
164 nnexpcl 12913 . . . . . . . . . . . . . . . . . . 19 ((2 ∈ ℕ ∧ 𝐴 ∈ ℕ0) → (2↑𝐴) ∈ ℕ)
165163, 160, 164sylancr 696 . . . . . . . . . . . . . . . . . 18 (𝜑 → (2↑𝐴) ∈ ℕ)
166165nncnd 11074 . . . . . . . . . . . . . . . . 17 (𝜑 → (2↑𝐴) ∈ ℂ)
167 mulcom 10060 . . . . . . . . . . . . . . . . 17 (((2↑𝐴) ∈ ℂ ∧ 2 ∈ ℂ) → ((2↑𝐴) · 2) = (2 · (2↑𝐴)))
168166, 11, 167sylancl 695 . . . . . . . . . . . . . . . 16 (𝜑 → ((2↑𝐴) · 2) = (2 · (2↑𝐴)))
169162, 168eqtrd 2685 . . . . . . . . . . . . . . 15 (𝜑 → (2↑(𝐴 + 1)) = (2 · (2↑𝐴)))
170169oveq1d 6705 . . . . . . . . . . . . . 14 (𝜑 → ((2↑(𝐴 + 1)) · 𝐵) = ((2 · (2↑𝐴)) · 𝐵))
171 2cnd 11131 . . . . . . . . . . . . . . 15 (𝜑 → 2 ∈ ℂ)
172171, 166, 52mulassd 10101 . . . . . . . . . . . . . 14 (𝜑 → ((2 · (2↑𝐴)) · 𝐵) = (2 · ((2↑𝐴) · 𝐵)))
173 2prm 15452 . . . . . . . . . . . . . . . . . . 19 2 ∈ ℙ
174 coprm 15470 . . . . . . . . . . . . . . . . . . 19 ((2 ∈ ℙ ∧ 𝐵 ∈ ℤ) → (¬ 2 ∥ 𝐵 ↔ (2 gcd 𝐵) = 1))
175173, 91, 174sylancr 696 . . . . . . . . . . . . . . . . . 18 (𝜑 → (¬ 2 ∥ 𝐵 ↔ (2 gcd 𝐵) = 1))
1764, 175mpbid 222 . . . . . . . . . . . . . . . . 17 (𝜑 → (2 gcd 𝐵) = 1)
177 2z 11447 . . . . . . . . . . . . . . . . . . 19 2 ∈ ℤ
178177a1i 11 . . . . . . . . . . . . . . . . . 18 (𝜑 → 2 ∈ ℤ)
179 rpexp1i 15480 . . . . . . . . . . . . . . . . . 18 ((2 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝐴 ∈ ℕ0) → ((2 gcd 𝐵) = 1 → ((2↑𝐴) gcd 𝐵) = 1))
180178, 91, 160, 179syl3anc 1366 . . . . . . . . . . . . . . . . 17 (𝜑 → ((2 gcd 𝐵) = 1 → ((2↑𝐴) gcd 𝐵) = 1))
181176, 180mpd 15 . . . . . . . . . . . . . . . 16 (𝜑 → ((2↑𝐴) gcd 𝐵) = 1)
182 sgmmul 24971 . . . . . . . . . . . . . . . 16 ((1 ∈ ℂ ∧ ((2↑𝐴) ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ ((2↑𝐴) gcd 𝐵) = 1)) → (1 σ ((2↑𝐴) · 𝐵)) = ((1 σ (2↑𝐴)) · (1 σ 𝐵)))
183137, 165, 1, 181, 182syl13anc 1368 . . . . . . . . . . . . . . 15 (𝜑 → (1 σ ((2↑𝐴) · 𝐵)) = ((1 σ (2↑𝐴)) · (1 σ 𝐵)))
184 pncan 10325 . . . . . . . . . . . . . . . . . . . 20 ((𝐴 ∈ ℂ ∧ 1 ∈ ℂ) → ((𝐴 + 1) − 1) = 𝐴)
18528, 27, 184sylancl 695 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((𝐴 + 1) − 1) = 𝐴)
186185oveq2d 6706 . . . . . . . . . . . . . . . . . 18 (𝜑 → (2↑((𝐴 + 1) − 1)) = (2↑𝐴))
187186oveq2d 6706 . . . . . . . . . . . . . . . . 17 (𝜑 → (1 σ (2↑((𝐴 + 1) − 1))) = (1 σ (2↑𝐴)))
188 1sgm2ppw 24970 . . . . . . . . . . . . . . . . . 18 ((𝐴 + 1) ∈ ℕ → (1 σ (2↑((𝐴 + 1) − 1))) = ((2↑(𝐴 + 1)) − 1))
18919, 188syl 17 . . . . . . . . . . . . . . . . 17 (𝜑 → (1 σ (2↑((𝐴 + 1) − 1))) = ((2↑(𝐴 + 1)) − 1))
190187, 189eqtr3d 2687 . . . . . . . . . . . . . . . 16 (𝜑 → (1 σ (2↑𝐴)) = ((2↑(𝐴 + 1)) − 1))
191190oveq1d 6705 . . . . . . . . . . . . . . 15 (𝜑 → ((1 σ (2↑𝐴)) · (1 σ 𝐵)) = (((2↑(𝐴 + 1)) − 1) · (1 σ 𝐵)))
192183, 5, 1913eqtr3d 2693 . . . . . . . . . . . . . 14 (𝜑 → (2 · ((2↑𝐴) · 𝐵)) = (((2↑(𝐴 + 1)) − 1) · (1 σ 𝐵)))
193170, 172, 1923eqtrd 2689 . . . . . . . . . . . . 13 (𝜑 → ((2↑(𝐴 + 1)) · 𝐵) = (((2↑(𝐴 + 1)) − 1) · (1 σ 𝐵)))
194193oveq1d 6705 . . . . . . . . . . . 12 (𝜑 → (((2↑(𝐴 + 1)) · 𝐵) / ((2↑(𝐴 + 1)) − 1)) = ((((2↑(𝐴 + 1)) − 1) · (1 σ 𝐵)) / ((2↑(𝐴 + 1)) − 1)))
195 1nn0 11346 . . . . . . . . . . . . . . 15 1 ∈ ℕ0
196 sgmnncl 24918 . . . . . . . . . . . . . . 15 ((1 ∈ ℕ0𝐵 ∈ ℕ) → (1 σ 𝐵) ∈ ℕ)
197195, 1, 196sylancr 696 . . . . . . . . . . . . . 14 (𝜑 → (1 σ 𝐵) ∈ ℕ)
198197nncnd 11074 . . . . . . . . . . . . 13 (𝜑 → (1 σ 𝐵) ∈ ℂ)
199198, 84, 85divcan3d 10844 . . . . . . . . . . . 12 (𝜑 → ((((2↑(𝐴 + 1)) − 1) · (1 σ 𝐵)) / ((2↑(𝐴 + 1)) − 1)) = (1 σ 𝐵))
200194, 147, 1993eqtr3d 2693 . . . . . . . . . . 11 (𝜑 → ((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))) = (1 σ 𝐵))
201 sgmval 24913 . . . . . . . . . . . 12 ((1 ∈ ℂ ∧ 𝐵 ∈ ℕ) → (1 σ 𝐵) = Σ𝑘 ∈ {𝑥 ∈ ℕ ∣ 𝑥𝐵} (𝑘𝑐1))
20227, 1, 201sylancr 696 . . . . . . . . . . 11 (𝜑 → (1 σ 𝐵) = Σ𝑘 ∈ {𝑥 ∈ ℕ ∣ 𝑥𝐵} (𝑘𝑐1))
203 simpr 476 . . . . . . . . . . . . . . 15 ((𝜑𝑘 ∈ {𝑥 ∈ ℕ ∣ 𝑥𝐵}) → 𝑘 ∈ {𝑥 ∈ ℕ ∣ 𝑥𝐵})
20464, 203sseldi 3634 . . . . . . . . . . . . . 14 ((𝜑𝑘 ∈ {𝑥 ∈ ℕ ∣ 𝑥𝐵}) → 𝑘 ∈ ℕ)
205204nncnd 11074 . . . . . . . . . . . . 13 ((𝜑𝑘 ∈ {𝑥 ∈ ℕ ∣ 𝑥𝐵}) → 𝑘 ∈ ℂ)
206205cxp1d 24497 . . . . . . . . . . . 12 ((𝜑𝑘 ∈ {𝑥 ∈ ℕ ∣ 𝑥𝐵}) → (𝑘𝑐1) = 𝑘)
207206sumeq2dv 14477 . . . . . . . . . . 11 (𝜑 → Σ𝑘 ∈ {𝑥 ∈ ℕ ∣ 𝑥𝐵} (𝑘𝑐1) = Σ𝑘 ∈ {𝑥 ∈ ℕ ∣ 𝑥𝐵}𝑘)
208200, 202, 2073eqtrrd 2690 . . . . . . . . . 10 (𝜑 → Σ𝑘 ∈ {𝑥 ∈ ℕ ∣ 𝑥𝐵}𝑘 = ((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))))
209208ad2antrr 762 . . . . . . . . 9 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → Σ𝑘 ∈ {𝑥 ∈ ℕ ∣ 𝑥𝐵}𝑘 = ((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))))
210104, 159, 2093brtr3d 4716 . . . . . . . 8 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → (((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))) + 𝑛) ≤ ((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))))
21136, 8remulcld 10108 . . . . . . . . . . 11 (𝜑 → ((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))) ∈ ℝ)
212211ad2antrr 762 . . . . . . . . . 10 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → ((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))) ∈ ℝ)
21374nnrpd 11908 . . . . . . . . . 10 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → 𝑛 ∈ ℝ+)
214212, 213ltaddrpd 11943 . . . . . . . . 9 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → ((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))) < (((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))) + 𝑛))
21574nnred 11073 . . . . . . . . . . 11 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → 𝑛 ∈ ℝ)
216212, 215readdcld 10107 . . . . . . . . . 10 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → (((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))) + 𝑛) ∈ ℝ)
217212, 216ltnled 10222 . . . . . . . . 9 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → (((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))) < (((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))) + 𝑛) ↔ ¬ (((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))) + 𝑛) ≤ ((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1)))))
218214, 217mpbid 222 . . . . . . . 8 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) ∧ ¬ 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}) → ¬ (((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))) + 𝑛) ≤ ((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))))
219210, 218condan 852 . . . . . . 7 ((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) → 𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵})
220 elpri 4230 . . . . . . 7 (𝑛 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵} → (𝑛 = (𝐵 / ((2↑(𝐴 + 1)) − 1)) ∨ 𝑛 = 𝐵))
221219, 220syl 17 . . . . . 6 ((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑛𝐵)) → (𝑛 = (𝐵 / ((2↑(𝐴 + 1)) − 1)) ∨ 𝑛 = 𝐵))
222221expr 642 . . . . 5 ((𝜑𝑛 ∈ ℕ) → (𝑛𝐵 → (𝑛 = (𝐵 / ((2↑(𝐴 + 1)) − 1)) ∨ 𝑛 = 𝐵)))
223222ralrimiva 2995 . . . 4 (𝜑 → ∀𝑛 ∈ ℕ (𝑛𝐵 → (𝑛 = (𝐵 / ((2↑(𝐴 + 1)) − 1)) ∨ 𝑛 = 𝐵)))
2242, 55gtned 10210 . . . . . . . . . 10 (𝜑𝐵 ≠ 1)
225224necomd 2878 . . . . . . . . 9 (𝜑 → 1 ≠ 𝐵)
226 1nn 11069 . . . . . . . . . . . . 13 1 ∈ ℕ
227226a1i 11 . . . . . . . . . . . 12 (𝜑 → 1 ∈ ℕ)
228 1dvds 15043 . . . . . . . . . . . . 13 (𝐵 ∈ ℤ → 1 ∥ 𝐵)
22991, 228syl 17 . . . . . . . . . . . 12 (𝜑 → 1 ∥ 𝐵)
230 breq1 4688 . . . . . . . . . . . . . 14 (𝑛 = 1 → (𝑛𝐵 ↔ 1 ∥ 𝐵))
231 eqeq1 2655 . . . . . . . . . . . . . . 15 (𝑛 = 1 → (𝑛 = (𝐵 / ((2↑(𝐴 + 1)) − 1)) ↔ 1 = (𝐵 / ((2↑(𝐴 + 1)) − 1))))
232 eqeq1 2655 . . . . . . . . . . . . . . 15 (𝑛 = 1 → (𝑛 = 𝐵 ↔ 1 = 𝐵))
233231, 232orbi12d 746 . . . . . . . . . . . . . 14 (𝑛 = 1 → ((𝑛 = (𝐵 / ((2↑(𝐴 + 1)) − 1)) ∨ 𝑛 = 𝐵) ↔ (1 = (𝐵 / ((2↑(𝐴 + 1)) − 1)) ∨ 1 = 𝐵)))
234230, 233imbi12d 333 . . . . . . . . . . . . 13 (𝑛 = 1 → ((𝑛𝐵 → (𝑛 = (𝐵 / ((2↑(𝐴 + 1)) − 1)) ∨ 𝑛 = 𝐵)) ↔ (1 ∥ 𝐵 → (1 = (𝐵 / ((2↑(𝐴 + 1)) − 1)) ∨ 1 = 𝐵))))
235234rspcv 3336 . . . . . . . . . . . 12 (1 ∈ ℕ → (∀𝑛 ∈ ℕ (𝑛𝐵 → (𝑛 = (𝐵 / ((2↑(𝐴 + 1)) − 1)) ∨ 𝑛 = 𝐵)) → (1 ∥ 𝐵 → (1 = (𝐵 / ((2↑(𝐴 + 1)) − 1)) ∨ 1 = 𝐵))))
236227, 223, 229, 235syl3c 66 . . . . . . . . . . 11 (𝜑 → (1 = (𝐵 / ((2↑(𝐴 + 1)) − 1)) ∨ 1 = 𝐵))
237236ord 391 . . . . . . . . . 10 (𝜑 → (¬ 1 = (𝐵 / ((2↑(𝐴 + 1)) − 1)) → 1 = 𝐵))
238237necon1ad 2840 . . . . . . . . 9 (𝜑 → (1 ≠ 𝐵 → 1 = (𝐵 / ((2↑(𝐴 + 1)) − 1))))
239225, 238mpd 15 . . . . . . . 8 (𝜑 → 1 = (𝐵 / ((2↑(𝐴 + 1)) − 1)))
240239eqeq2d 2661 . . . . . . 7 (𝜑 → (𝑛 = 1 ↔ 𝑛 = (𝐵 / ((2↑(𝐴 + 1)) − 1))))
241240orbi1d 739 . . . . . 6 (𝜑 → ((𝑛 = 1 ∨ 𝑛 = 𝐵) ↔ (𝑛 = (𝐵 / ((2↑(𝐴 + 1)) − 1)) ∨ 𝑛 = 𝐵)))
242241imbi2d 329 . . . . 5 (𝜑 → ((𝑛𝐵 → (𝑛 = 1 ∨ 𝑛 = 𝐵)) ↔ (𝑛𝐵 → (𝑛 = (𝐵 / ((2↑(𝐴 + 1)) − 1)) ∨ 𝑛 = 𝐵))))
243242ralbidv 3015 . . . 4 (𝜑 → (∀𝑛 ∈ ℕ (𝑛𝐵 → (𝑛 = 1 ∨ 𝑛 = 𝐵)) ↔ ∀𝑛 ∈ ℕ (𝑛𝐵 → (𝑛 = (𝐵 / ((2↑(𝐴 + 1)) − 1)) ∨ 𝑛 = 𝐵))))
244223, 243mpbird 247 . . 3 (𝜑 → ∀𝑛 ∈ ℕ (𝑛𝐵 → (𝑛 = 1 ∨ 𝑛 = 𝐵)))
245 isprm2 15442 . . 3 (𝐵 ∈ ℙ ↔ (𝐵 ∈ (ℤ‘2) ∧ ∀𝑛 ∈ ℕ (𝑛𝐵 → (𝑛 = 1 ∨ 𝑛 = 𝐵))))
24657, 244, 245sylanbrc 699 . 2 (𝜑𝐵 ∈ ℙ)
247211ltp1d 10992 . . . 4 (𝜑 → ((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))) < (((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))) + 1))
248 peano2re 10247 . . . . . 6 (((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))) ∈ ℝ → (((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))) + 1) ∈ ℝ)
249211, 248syl 17 . . . . 5 (𝜑 → (((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))) + 1) ∈ ℝ)
250211, 249ltnled 10222 . . . 4 (𝜑 → (((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))) < (((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))) + 1) ↔ ¬ (((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))) + 1) ≤ ((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1)))))
251247, 250mpbid 222 . . 3 (𝜑 → ¬ (((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))) + 1) ≤ ((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))))
252204nnred 11073 . . . . . . . 8 ((𝜑𝑘 ∈ {𝑥 ∈ ℕ ∣ 𝑥𝐵}) → 𝑘 ∈ ℝ)
253204nnnn0d 11389 . . . . . . . . 9 ((𝜑𝑘 ∈ {𝑥 ∈ ℕ ∣ 𝑥𝐵}) → 𝑘 ∈ ℕ0)
254253nn0ge0d 11392 . . . . . . . 8 ((𝜑𝑘 ∈ {𝑥 ∈ ℕ ∣ 𝑥𝐵}) → 0 ≤ 𝑘)
255 df-tp 4215 . . . . . . . . . 10 {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵, 1} = ({(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵} ∪ {1})
256 snssi 4371 . . . . . . . . . . . 12 (1 ∈ ℕ → {1} ⊆ ℕ)
257226, 256mp1i 13 . . . . . . . . . . 11 (𝜑 → {1} ⊆ ℕ)
25872, 257unssd 3822 . . . . . . . . . 10 (𝜑 → ({(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵} ∪ {1}) ⊆ ℕ)
259255, 258syl5eqss 3682 . . . . . . . . 9 (𝜑 → {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵, 1} ⊆ ℕ)
260 eltpi 4261 . . . . . . . . . . 11 (𝑥 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵, 1} → (𝑥 = (𝐵 / ((2↑(𝐴 + 1)) − 1)) ∨ 𝑥 = 𝐵𝑥 = 1))
261 breq1 4688 . . . . . . . . . . . . 13 (𝑥 = 1 → (𝑥𝐵 ↔ 1 ∥ 𝐵))
262229, 261syl5ibrcom 237 . . . . . . . . . . . 12 (𝜑 → (𝑥 = 1 → 𝑥𝐵))
26389, 95, 2623jaod 1432 . . . . . . . . . . 11 (𝜑 → ((𝑥 = (𝐵 / ((2↑(𝐴 + 1)) − 1)) ∨ 𝑥 = 𝐵𝑥 = 1) → 𝑥𝐵))
264260, 263syl5 34 . . . . . . . . . 10 (𝜑 → (𝑥 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵, 1} → 𝑥𝐵))
265264imp 444 . . . . . . . . 9 ((𝜑𝑥 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵, 1}) → 𝑥𝐵)
266259, 265ssrabdv 3714 . . . . . . . 8 (𝜑 → {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵, 1} ⊆ {𝑥 ∈ ℕ ∣ 𝑥𝐵})
26762, 252, 254, 266fsumless 14572 . . . . . . 7 (𝜑 → Σ𝑘 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵, 1}𝑘 ≤ Σ𝑘 ∈ {𝑥 ∈ ℕ ∣ 𝑥𝐵}𝑘)
268267adantr 480 . . . . . 6 ((𝜑𝐵 ≠ ((2↑(𝐴 + 1)) − 1)) → Σ𝑘 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵, 1}𝑘 ≤ Σ𝑘 ∈ {𝑥 ∈ ℕ ∣ 𝑥𝐵}𝑘)
26952, 84, 85diveq1ad 10848 . . . . . . . . . . . . 13 (𝜑 → ((𝐵 / ((2↑(𝐴 + 1)) − 1)) = 1 ↔ 𝐵 = ((2↑(𝐴 + 1)) − 1)))
270269necon3bid 2867 . . . . . . . . . . . 12 (𝜑 → ((𝐵 / ((2↑(𝐴 + 1)) − 1)) ≠ 1 ↔ 𝐵 ≠ ((2↑(𝐴 + 1)) − 1)))
271270biimpar 501 . . . . . . . . . . 11 ((𝜑𝐵 ≠ ((2↑(𝐴 + 1)) − 1)) → (𝐵 / ((2↑(𝐴 + 1)) − 1)) ≠ 1)
272271necomd 2878 . . . . . . . . . 10 ((𝜑𝐵 ≠ ((2↑(𝐴 + 1)) − 1)) → 1 ≠ (𝐵 / ((2↑(𝐴 + 1)) − 1)))
273225adantr 480 . . . . . . . . . 10 ((𝜑𝐵 ≠ ((2↑(𝐴 + 1)) − 1)) → 1 ≠ 𝐵)
274272, 273nelprd 4236 . . . . . . . . 9 ((𝜑𝐵 ≠ ((2↑(𝐴 + 1)) − 1)) → ¬ 1 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵})
275 disjsn 4278 . . . . . . . . 9 (({(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵} ∩ {1}) = ∅ ↔ ¬ 1 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵})
276274, 275sylibr 224 . . . . . . . 8 ((𝜑𝐵 ≠ ((2↑(𝐴 + 1)) − 1)) → ({(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵} ∩ {1}) = ∅)
277255a1i 11 . . . . . . . 8 ((𝜑𝐵 ≠ ((2↑(𝐴 + 1)) − 1)) → {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵, 1} = ({(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵} ∪ {1}))
278 tpfi 8277 . . . . . . . . 9 {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵, 1} ∈ Fin
279278a1i 11 . . . . . . . 8 ((𝜑𝐵 ≠ ((2↑(𝐴 + 1)) − 1)) → {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵, 1} ∈ Fin)
280259adantr 480 . . . . . . . . . 10 ((𝜑𝐵 ≠ ((2↑(𝐴 + 1)) − 1)) → {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵, 1} ⊆ ℕ)
281280sselda 3636 . . . . . . . . 9 (((𝜑𝐵 ≠ ((2↑(𝐴 + 1)) − 1)) ∧ 𝑘 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵, 1}) → 𝑘 ∈ ℕ)
282281nncnd 11074 . . . . . . . 8 (((𝜑𝐵 ≠ ((2↑(𝐴 + 1)) − 1)) ∧ 𝑘 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵, 1}) → 𝑘 ∈ ℂ)
283276, 277, 279, 282fsumsplit 14515 . . . . . . 7 ((𝜑𝐵 ≠ ((2↑(𝐴 + 1)) − 1)) → Σ𝑘 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵, 1}𝑘 = (Σ𝑘 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}𝑘 + Σ𝑘 ∈ {1}𝑘))
284 id 22 . . . . . . . . . . 11 (𝑘 = 1 → 𝑘 = 1)
285284sumsn 14519 . . . . . . . . . 10 ((1 ∈ ℝ ∧ 1 ∈ ℂ) → Σ𝑘 ∈ {1}𝑘 = 1)
2862, 27, 285sylancl 695 . . . . . . . . 9 (𝜑 → Σ𝑘 ∈ {1}𝑘 = 1)
287152, 286oveq12d 6708 . . . . . . . 8 (𝜑 → (Σ𝑘 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}𝑘 + Σ𝑘 ∈ {1}𝑘) = (((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))) + 1))
288287adantr 480 . . . . . . 7 ((𝜑𝐵 ≠ ((2↑(𝐴 + 1)) − 1)) → (Σ𝑘 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵}𝑘 + Σ𝑘 ∈ {1}𝑘) = (((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))) + 1))
289283, 288eqtrd 2685 . . . . . 6 ((𝜑𝐵 ≠ ((2↑(𝐴 + 1)) − 1)) → Σ𝑘 ∈ {(𝐵 / ((2↑(𝐴 + 1)) − 1)), 𝐵, 1}𝑘 = (((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))) + 1))
290208adantr 480 . . . . . 6 ((𝜑𝐵 ≠ ((2↑(𝐴 + 1)) − 1)) → Σ𝑘 ∈ {𝑥 ∈ ℕ ∣ 𝑥𝐵}𝑘 = ((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))))
291268, 289, 2903brtr3d 4716 . . . . 5 ((𝜑𝐵 ≠ ((2↑(𝐴 + 1)) − 1)) → (((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))) + 1) ≤ ((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))))
292291ex 449 . . . 4 (𝜑 → (𝐵 ≠ ((2↑(𝐴 + 1)) − 1) → (((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))) + 1) ≤ ((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1)))))
293292necon1bd 2841 . . 3 (𝜑 → (¬ (((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))) + 1) ≤ ((2↑(𝐴 + 1)) · (𝐵 / ((2↑(𝐴 + 1)) − 1))) → 𝐵 = ((2↑(𝐴 + 1)) − 1)))
294251, 293mpd 15 . 2 (𝜑𝐵 = ((2↑(𝐴 + 1)) − 1))
295246, 294jca 553 1 (𝜑 → (𝐵 ∈ ℙ ∧ 𝐵 = ((2↑(𝐴 + 1)) − 1)))
 Colors of variables: wff setvar class Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 196   ∨ wo 382   ∧ wa 383   ∨ w3o 1053   = wceq 1523   ∈ wcel 2030   ≠ wne 2823  ∀wral 2941  {crab 2945   ∪ cun 3605   ∩ cin 3606   ⊆ wss 3607  ∅c0 3948  {csn 4210  {cpr 4212  {ctp 4214   class class class wbr 4685  ‘cfv 5926  (class class class)co 6690  Fincfn 7997  ℂcc 9972  ℝcr 9973  0cc0 9974  1c1 9975   + caddc 9977   · cmul 9979   < clt 10112   ≤ cle 10113   − cmin 10304   / cdiv 10722  ℕcn 11058  2c2 11108  ℕ0cn0 11330  ℤcz 11415  ℤ≥cuz 11725  ℝ+crp 11870  ...cfz 12364  ↑cexp 12900  Σcsu 14460   ∥ cdvds 15027   gcd cgcd 15263  ℙcprime 15432  ↑𝑐ccxp 24347   σ csgm 24867 This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1762  ax-4 1777  ax-5 1879  ax-6 1945  ax-7 1981  ax-8 2032  ax-9 2039  ax-10 2059  ax-11 2074  ax-12 2087  ax-13 2282  ax-ext 2631  ax-rep 4804  ax-sep 4814  ax-nul 4822  ax-pow 4873  ax-pr 4936  ax-un 6991  ax-inf2 8576  ax-cnex 10030  ax-resscn 10031  ax-1cn 10032  ax-icn 10033  ax-addcl 10034  ax-addrcl 10035  ax-mulcl 10036  ax-mulrcl 10037  ax-mulcom 10038  ax-addass 10039  ax-mulass 10040  ax-distr 10041  ax-i2m1 10042  ax-1ne0 10043  ax-1rid 10044  ax-rnegex 10045  ax-rrecex 10046  ax-cnre 10047  ax-pre-lttri 10048  ax-pre-lttrn 10049  ax-pre-ltadd 10050  ax-pre-mulgt0 10051  ax-pre-sup 10052  ax-addf 10053  ax-mulf 10054 This theorem depends on definitions:  df-bi 197  df-or 384  df-an 385  df-3or 1055  df-3an 1056  df-tru 1526  df-fal 1529  df-ex 1745  df-nf 1750  df-sb 1938  df-eu 2502  df-mo 2503  df-clab 2638  df-cleq 2644  df-clel 2647  df-nfc 2782  df-ne 2824  df-nel 2927  df-ral 2946  df-rex 2947  df-reu 2948  df-rmo 2949  df-rab 2950  df-v 3233  df-sbc 3469  df-csb 3567  df-dif 3610  df-un 3612  df-in 3614  df-ss 3621  df-pss 3623  df-nul 3949  df-if 4120  df-pw 4193  df-sn 4211  df-pr 4213  df-tp 4215  df-op 4217  df-uni 4469  df-int 4508  df-iun 4554  df-iin 4555  df-br 4686  df-opab 4746  df-mpt 4763  df-tr 4786  df-id 5053  df-eprel 5058  df-po 5064  df-so 5065  df-fr 5102  df-se 5103  df-we 5104  df-xp 5149  df-rel 5150  df-cnv 5151  df-co 5152  df-dm 5153  df-rn 5154  df-res 5155  df-ima 5156  df-pred 5718  df-ord 5764  df-on 5765  df-lim 5766  df-suc 5767  df-iota 5889  df-fun 5928  df-fn 5929  df-f 5930  df-f1 5931  df-fo 5932  df-f1o 5933  df-fv 5934  df-isom 5935  df-riota 6651  df-ov 6693  df-oprab 6694  df-mpt2 6695  df-of 6939  df-om 7108  df-1st 7210  df-2nd 7211  df-supp 7341  df-wrecs 7452  df-recs 7513  df-rdg 7551  df-1o 7605  df-2o 7606  df-oadd 7609  df-er 7787  df-map 7901  df-pm 7902  df-ixp 7951  df-en 7998  df-dom 7999  df-sdom 8000  df-fin 8001  df-fsupp 8317  df-fi 8358  df-sup 8389  df-inf 8390  df-oi 8456  df-card 8803  df-cda 9028  df-pnf 10114  df-mnf 10115  df-xr 10116  df-ltxr 10117  df-le 10118  df-sub 10306  df-neg 10307  df-div 10723  df-nn 11059  df-2 11117  df-3 11118  df-4 11119  df-5 11120  df-6 11121  df-7 11122  df-8 11123  df-9 11124  df-n0 11331  df-z 11416  df-dec 11532  df-uz 11726  df-q 11827  df-rp 11871  df-xneg 11984  df-xadd 11985  df-xmul 11986  df-ioo 12217  df-ioc 12218  df-ico 12219  df-icc 12220  df-fz 12365  df-fzo 12505  df-fl 12633  df-mod 12709  df-seq 12842  df-exp 12901  df-fac 13101  df-bc 13130  df-hash 13158  df-shft 13851  df-cj 13883  df-re 13884  df-im 13885  df-sqrt 14019  df-abs 14020  df-limsup 14246  df-clim 14263  df-rlim 14264  df-sum 14461  df-ef 14842  df-sin 14844  df-cos 14845  df-pi 14847  df-dvds 15028  df-gcd 15264  df-prm 15433  df-pc 15589  df-struct 15906  df-ndx 15907  df-slot 15908  df-base 15910  df-sets 15911  df-ress 15912  df-plusg 16001  df-mulr 16002  df-starv 16003  df-sca 16004  df-vsca 16005  df-ip 16006  df-tset 16007  df-ple 16008  df-ds 16011  df-unif 16012  df-hom 16013  df-cco 16014  df-rest 16130  df-topn 16131  df-0g 16149  df-gsum 16150  df-topgen 16151  df-pt 16152  df-prds 16155  df-xrs 16209  df-qtop 16214  df-imas 16215  df-xps 16217  df-mre 16293  df-mrc 16294  df-acs 16296  df-mgm 17289  df-sgrp 17331  df-mnd 17342  df-submnd 17383  df-mulg 17588  df-cntz 17796  df-cmn 18241  df-psmet 19786  df-xmet 19787  df-met 19788  df-bl 19789  df-mopn 19790  df-fbas 19791  df-fg 19792  df-cnfld 19795  df-top 20747  df-topon 20764  df-topsp 20785  df-bases 20798  df-cld 20871  df-ntr 20872  df-cls 20873  df-nei 20950  df-lp 20988  df-perf 20989  df-cn 21079  df-cnp 21080  df-haus 21167  df-tx 21413  df-hmeo 21606  df-fil 21697  df-fm 21789  df-flim 21790  df-flf 21791  df-xms 22172  df-ms 22173  df-tms 22174  df-cncf 22728  df-limc 23675  df-dv 23676  df-log 24348  df-cxp 24349  df-sgm 24873 This theorem is referenced by:  perfect  25001
 Copyright terms: Public domain W3C validator