Users' Mathboxes Mathbox for Alexander van der Vekens < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  nnsum4primeseven Structured version   Visualization version   GIF version

Theorem nnsum4primeseven 41688
Description: If the (weak) ternary Goldbach conjecture is valid, then every even integer greater than 8 is the sum of 4 primes. (Contributed by AV, 25-Jul-2020.)
Assertion
Ref Expression
nnsum4primeseven (∀𝑚 ∈ Odd (5 < 𝑚𝑚 ∈ GoldbachOddW ) → ((𝑁 ∈ (ℤ‘9) ∧ 𝑁 ∈ Even ) → ∃𝑓 ∈ (ℙ ↑𝑚 (1...4))𝑁 = Σ𝑘 ∈ (1...4)(𝑓𝑘)))
Distinct variable group:   𝑓,𝑁,𝑘,𝑚

Proof of Theorem nnsum4primeseven
Dummy variables 𝑜 𝑔 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 evengpop3 41686 . . . 4 (∀𝑚 ∈ Odd (5 < 𝑚𝑚 ∈ GoldbachOddW ) → ((𝑁 ∈ (ℤ‘9) ∧ 𝑁 ∈ Even ) → ∃𝑜 ∈ GoldbachOddW 𝑁 = (𝑜 + 3)))
21imp 445 . . 3 ((∀𝑚 ∈ Odd (5 < 𝑚𝑚 ∈ GoldbachOddW ) ∧ (𝑁 ∈ (ℤ‘9) ∧ 𝑁 ∈ Even )) → ∃𝑜 ∈ GoldbachOddW 𝑁 = (𝑜 + 3))
3 simplll 798 . . . . . . 7 ((((∀𝑚 ∈ Odd (5 < 𝑚𝑚 ∈ GoldbachOddW ) ∧ (𝑁 ∈ (ℤ‘9) ∧ 𝑁 ∈ Even )) ∧ 𝑜 ∈ GoldbachOddW ) ∧ 𝑁 = (𝑜 + 3)) → ∀𝑚 ∈ Odd (5 < 𝑚𝑚 ∈ GoldbachOddW ))
4 6nn 11189 . . . . . . . . . . . 12 6 ∈ ℕ
54nnzi 11401 . . . . . . . . . . 11 6 ∈ ℤ
65a1i 11 . . . . . . . . . 10 (𝑁 ∈ (ℤ‘9) → 6 ∈ ℤ)
7 3z 11410 . . . . . . . . . . 11 3 ∈ ℤ
87a1i 11 . . . . . . . . . 10 (𝑁 ∈ (ℤ‘9) → 3 ∈ ℤ)
9 6p3e9 11170 . . . . . . . . . . . . . 14 (6 + 3) = 9
109eqcomi 2631 . . . . . . . . . . . . 13 9 = (6 + 3)
1110fveq2i 6194 . . . . . . . . . . . 12 (ℤ‘9) = (ℤ‘(6 + 3))
1211eleq2i 2693 . . . . . . . . . . 11 (𝑁 ∈ (ℤ‘9) ↔ 𝑁 ∈ (ℤ‘(6 + 3)))
1312biimpi 206 . . . . . . . . . 10 (𝑁 ∈ (ℤ‘9) → 𝑁 ∈ (ℤ‘(6 + 3)))
14 eluzsub 11717 . . . . . . . . . 10 ((6 ∈ ℤ ∧ 3 ∈ ℤ ∧ 𝑁 ∈ (ℤ‘(6 + 3))) → (𝑁 − 3) ∈ (ℤ‘6))
156, 8, 13, 14syl3anc 1326 . . . . . . . . 9 (𝑁 ∈ (ℤ‘9) → (𝑁 − 3) ∈ (ℤ‘6))
1615adantr 481 . . . . . . . 8 ((𝑁 ∈ (ℤ‘9) ∧ 𝑁 ∈ Even ) → (𝑁 − 3) ∈ (ℤ‘6))
1716ad3antlr 767 . . . . . . 7 ((((∀𝑚 ∈ Odd (5 < 𝑚𝑚 ∈ GoldbachOddW ) ∧ (𝑁 ∈ (ℤ‘9) ∧ 𝑁 ∈ Even )) ∧ 𝑜 ∈ GoldbachOddW ) ∧ 𝑁 = (𝑜 + 3)) → (𝑁 − 3) ∈ (ℤ‘6))
18 3odd 41617 . . . . . . . . . . . . . 14 3 ∈ Odd
1918a1i 11 . . . . . . . . . . . . 13 (𝑁 ∈ (ℤ‘9) → 3 ∈ Odd )
2019anim1i 592 . . . . . . . . . . . 12 ((𝑁 ∈ (ℤ‘9) ∧ 𝑁 ∈ Even ) → (3 ∈ Odd ∧ 𝑁 ∈ Even ))
2120adantl 482 . . . . . . . . . . 11 ((∀𝑚 ∈ Odd (5 < 𝑚𝑚 ∈ GoldbachOddW ) ∧ (𝑁 ∈ (ℤ‘9) ∧ 𝑁 ∈ Even )) → (3 ∈ Odd ∧ 𝑁 ∈ Even ))
2221ancomd 467 . . . . . . . . . 10 ((∀𝑚 ∈ Odd (5 < 𝑚𝑚 ∈ GoldbachOddW ) ∧ (𝑁 ∈ (ℤ‘9) ∧ 𝑁 ∈ Even )) → (𝑁 ∈ Even ∧ 3 ∈ Odd ))
2322adantr 481 . . . . . . . . 9 (((∀𝑚 ∈ Odd (5 < 𝑚𝑚 ∈ GoldbachOddW ) ∧ (𝑁 ∈ (ℤ‘9) ∧ 𝑁 ∈ Even )) ∧ 𝑜 ∈ GoldbachOddW ) → (𝑁 ∈ Even ∧ 3 ∈ Odd ))
2423adantr 481 . . . . . . . 8 ((((∀𝑚 ∈ Odd (5 < 𝑚𝑚 ∈ GoldbachOddW ) ∧ (𝑁 ∈ (ℤ‘9) ∧ 𝑁 ∈ Even )) ∧ 𝑜 ∈ GoldbachOddW ) ∧ 𝑁 = (𝑜 + 3)) → (𝑁 ∈ Even ∧ 3 ∈ Odd ))
25 emoo 41613 . . . . . . . 8 ((𝑁 ∈ Even ∧ 3 ∈ Odd ) → (𝑁 − 3) ∈ Odd )
2624, 25syl 17 . . . . . . 7 ((((∀𝑚 ∈ Odd (5 < 𝑚𝑚 ∈ GoldbachOddW ) ∧ (𝑁 ∈ (ℤ‘9) ∧ 𝑁 ∈ Even )) ∧ 𝑜 ∈ GoldbachOddW ) ∧ 𝑁 = (𝑜 + 3)) → (𝑁 − 3) ∈ Odd )
27 nnsum4primesodd 41684 . . . . . . . 8 (∀𝑚 ∈ Odd (5 < 𝑚𝑚 ∈ GoldbachOddW ) → (((𝑁 − 3) ∈ (ℤ‘6) ∧ (𝑁 − 3) ∈ Odd ) → ∃𝑔 ∈ (ℙ ↑𝑚 (1...3))(𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔𝑘)))
2827imp 445 . . . . . . 7 ((∀𝑚 ∈ Odd (5 < 𝑚𝑚 ∈ GoldbachOddW ) ∧ ((𝑁 − 3) ∈ (ℤ‘6) ∧ (𝑁 − 3) ∈ Odd )) → ∃𝑔 ∈ (ℙ ↑𝑚 (1...3))(𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔𝑘))
293, 17, 26, 28syl12anc 1324 . . . . . 6 ((((∀𝑚 ∈ Odd (5 < 𝑚𝑚 ∈ GoldbachOddW ) ∧ (𝑁 ∈ (ℤ‘9) ∧ 𝑁 ∈ Even )) ∧ 𝑜 ∈ GoldbachOddW ) ∧ 𝑁 = (𝑜 + 3)) → ∃𝑔 ∈ (ℙ ↑𝑚 (1...3))(𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔𝑘))
30 simpr 477 . . . . . . . . . . . . . . . . 17 ((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) → 𝑔:(1...3)⟶ℙ)
31 4z 11411 . . . . . . . . . . . . . . . . . . 19 4 ∈ ℤ
32 fzonel 12483 . . . . . . . . . . . . . . . . . . . 20 ¬ 4 ∈ (1..^4)
33 fzoval 12471 . . . . . . . . . . . . . . . . . . . . . . . 24 (4 ∈ ℤ → (1..^4) = (1...(4 − 1)))
3431, 33ax-mp 5 . . . . . . . . . . . . . . . . . . . . . . 23 (1..^4) = (1...(4 − 1))
35 4cn 11098 . . . . . . . . . . . . . . . . . . . . . . . . . 26 4 ∈ ℂ
36 ax-1cn 9994 . . . . . . . . . . . . . . . . . . . . . . . . . 26 1 ∈ ℂ
37 3cn 11095 . . . . . . . . . . . . . . . . . . . . . . . . . 26 3 ∈ ℂ
3835, 36, 373pm3.2i 1239 . . . . . . . . . . . . . . . . . . . . . . . . 25 (4 ∈ ℂ ∧ 1 ∈ ℂ ∧ 3 ∈ ℂ)
39 3p1e4 11153 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (3 + 1) = 4
40 subadd2 10285 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((4 ∈ ℂ ∧ 1 ∈ ℂ ∧ 3 ∈ ℂ) → ((4 − 1) = 3 ↔ (3 + 1) = 4))
4139, 40mpbiri 248 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((4 ∈ ℂ ∧ 1 ∈ ℂ ∧ 3 ∈ ℂ) → (4 − 1) = 3)
4238, 41ax-mp 5 . . . . . . . . . . . . . . . . . . . . . . . 24 (4 − 1) = 3
4342oveq2i 6661 . . . . . . . . . . . . . . . . . . . . . . 23 (1...(4 − 1)) = (1...3)
4434, 43eqtri 2644 . . . . . . . . . . . . . . . . . . . . . 22 (1..^4) = (1...3)
4544eqcomi 2631 . . . . . . . . . . . . . . . . . . . . 21 (1...3) = (1..^4)
4645eleq2i 2693 . . . . . . . . . . . . . . . . . . . 20 (4 ∈ (1...3) ↔ 4 ∈ (1..^4))
4732, 46mtbir 313 . . . . . . . . . . . . . . . . . . 19 ¬ 4 ∈ (1...3)
4831, 47pm3.2i 471 . . . . . . . . . . . . . . . . . 18 (4 ∈ ℤ ∧ ¬ 4 ∈ (1...3))
4948a1i 11 . . . . . . . . . . . . . . . . 17 ((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) → (4 ∈ ℤ ∧ ¬ 4 ∈ (1...3)))
50 3prm 15406 . . . . . . . . . . . . . . . . . 18 3 ∈ ℙ
5150a1i 11 . . . . . . . . . . . . . . . . 17 ((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) → 3 ∈ ℙ)
52 fsnunf 6451 . . . . . . . . . . . . . . . . 17 ((𝑔:(1...3)⟶ℙ ∧ (4 ∈ ℤ ∧ ¬ 4 ∈ (1...3)) ∧ 3 ∈ ℙ) → (𝑔 ∪ {⟨4, 3⟩}):((1...3) ∪ {4})⟶ℙ)
5330, 49, 51, 52syl3anc 1326 . . . . . . . . . . . . . . . 16 ((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) → (𝑔 ∪ {⟨4, 3⟩}):((1...3) ∪ {4})⟶ℙ)
54 fzval3 12536 . . . . . . . . . . . . . . . . . . 19 (4 ∈ ℤ → (1...4) = (1..^(4 + 1)))
5531, 54ax-mp 5 . . . . . . . . . . . . . . . . . 18 (1...4) = (1..^(4 + 1))
56 1z 11407 . . . . . . . . . . . . . . . . . . . 20 1 ∈ ℤ
57 1re 10039 . . . . . . . . . . . . . . . . . . . . 21 1 ∈ ℝ
58 4re 11097 . . . . . . . . . . . . . . . . . . . . 21 4 ∈ ℝ
59 1lt4 11199 . . . . . . . . . . . . . . . . . . . . 21 1 < 4
6057, 58, 59ltleii 10160 . . . . . . . . . . . . . . . . . . . 20 1 ≤ 4
61 eluz2 11693 . . . . . . . . . . . . . . . . . . . 20 (4 ∈ (ℤ‘1) ↔ (1 ∈ ℤ ∧ 4 ∈ ℤ ∧ 1 ≤ 4))
6256, 31, 60, 61mpbir3an 1244 . . . . . . . . . . . . . . . . . . 19 4 ∈ (ℤ‘1)
63 fzosplitsn 12576 . . . . . . . . . . . . . . . . . . 19 (4 ∈ (ℤ‘1) → (1..^(4 + 1)) = ((1..^4) ∪ {4}))
6462, 63ax-mp 5 . . . . . . . . . . . . . . . . . 18 (1..^(4 + 1)) = ((1..^4) ∪ {4})
6544uneq1i 3763 . . . . . . . . . . . . . . . . . 18 ((1..^4) ∪ {4}) = ((1...3) ∪ {4})
6655, 64, 653eqtri 2648 . . . . . . . . . . . . . . . . 17 (1...4) = ((1...3) ∪ {4})
6766feq2i 6037 . . . . . . . . . . . . . . . 16 ((𝑔 ∪ {⟨4, 3⟩}):(1...4)⟶ℙ ↔ (𝑔 ∪ {⟨4, 3⟩}):((1...3) ∪ {4})⟶ℙ)
6853, 67sylibr 224 . . . . . . . . . . . . . . 15 ((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) → (𝑔 ∪ {⟨4, 3⟩}):(1...4)⟶ℙ)
69 prmex 15391 . . . . . . . . . . . . . . . . 17 ℙ ∈ V
70 ovex 6678 . . . . . . . . . . . . . . . . 17 (1...4) ∈ V
7169, 70pm3.2i 471 . . . . . . . . . . . . . . . 16 (ℙ ∈ V ∧ (1...4) ∈ V)
72 elmapg 7870 . . . . . . . . . . . . . . . 16 ((ℙ ∈ V ∧ (1...4) ∈ V) → ((𝑔 ∪ {⟨4, 3⟩}) ∈ (ℙ ↑𝑚 (1...4)) ↔ (𝑔 ∪ {⟨4, 3⟩}):(1...4)⟶ℙ))
7371, 72mp1i 13 . . . . . . . . . . . . . . 15 ((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) → ((𝑔 ∪ {⟨4, 3⟩}) ∈ (ℙ ↑𝑚 (1...4)) ↔ (𝑔 ∪ {⟨4, 3⟩}):(1...4)⟶ℙ))
7468, 73mpbird 247 . . . . . . . . . . . . . 14 ((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) → (𝑔 ∪ {⟨4, 3⟩}) ∈ (ℙ ↑𝑚 (1...4)))
7574adantr 481 . . . . . . . . . . . . 13 (((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) ∧ (𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔𝑘)) → (𝑔 ∪ {⟨4, 3⟩}) ∈ (ℙ ↑𝑚 (1...4)))
76 fveq1 6190 . . . . . . . . . . . . . . . . 17 (𝑓 = (𝑔 ∪ {⟨4, 3⟩}) → (𝑓𝑘) = ((𝑔 ∪ {⟨4, 3⟩})‘𝑘))
7776adantr 481 . . . . . . . . . . . . . . . 16 ((𝑓 = (𝑔 ∪ {⟨4, 3⟩}) ∧ 𝑘 ∈ (1...4)) → (𝑓𝑘) = ((𝑔 ∪ {⟨4, 3⟩})‘𝑘))
7877sumeq2dv 14433 . . . . . . . . . . . . . . 15 (𝑓 = (𝑔 ∪ {⟨4, 3⟩}) → Σ𝑘 ∈ (1...4)(𝑓𝑘) = Σ𝑘 ∈ (1...4)((𝑔 ∪ {⟨4, 3⟩})‘𝑘))
7978eqeq2d 2632 . . . . . . . . . . . . . 14 (𝑓 = (𝑔 ∪ {⟨4, 3⟩}) → (𝑁 = Σ𝑘 ∈ (1...4)(𝑓𝑘) ↔ 𝑁 = Σ𝑘 ∈ (1...4)((𝑔 ∪ {⟨4, 3⟩})‘𝑘)))
8079adantl 482 . . . . . . . . . . . . 13 ((((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) ∧ (𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔𝑘)) ∧ 𝑓 = (𝑔 ∪ {⟨4, 3⟩})) → (𝑁 = Σ𝑘 ∈ (1...4)(𝑓𝑘) ↔ 𝑁 = Σ𝑘 ∈ (1...4)((𝑔 ∪ {⟨4, 3⟩})‘𝑘)))
8162a1i 11 . . . . . . . . . . . . . . . 16 ((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) → 4 ∈ (ℤ‘1))
8266eleq2i 2693 . . . . . . . . . . . . . . . . . . 19 (𝑘 ∈ (1...4) ↔ 𝑘 ∈ ((1...3) ∪ {4}))
83 elun 3753 . . . . . . . . . . . . . . . . . . 19 (𝑘 ∈ ((1...3) ∪ {4}) ↔ (𝑘 ∈ (1...3) ∨ 𝑘 ∈ {4}))
84 velsn 4193 . . . . . . . . . . . . . . . . . . . 20 (𝑘 ∈ {4} ↔ 𝑘 = 4)
8584orbi2i 541 . . . . . . . . . . . . . . . . . . 19 ((𝑘 ∈ (1...3) ∨ 𝑘 ∈ {4}) ↔ (𝑘 ∈ (1...3) ∨ 𝑘 = 4))
8682, 83, 853bitri 286 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ (1...4) ↔ (𝑘 ∈ (1...3) ∨ 𝑘 = 4))
87 elfz2 12333 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑘 ∈ (1...3) ↔ ((1 ∈ ℤ ∧ 3 ∈ ℤ ∧ 𝑘 ∈ ℤ) ∧ (1 ≤ 𝑘𝑘 ≤ 3)))
88 3re 11094 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 3 ∈ ℝ
8988, 58pm3.2i 471 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (3 ∈ ℝ ∧ 4 ∈ ℝ)
90 3lt4 11197 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 3 < 4
91 ltnle 10117 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ((3 ∈ ℝ ∧ 4 ∈ ℝ) → (3 < 4 ↔ ¬ 4 ≤ 3))
9290, 91mpbii 223 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ((3 ∈ ℝ ∧ 4 ∈ ℝ) → ¬ 4 ≤ 3)
9389, 92ax-mp 5 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ¬ 4 ≤ 3
94 breq1 4656 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑘 = 4 → (𝑘 ≤ 3 ↔ 4 ≤ 3))
9594eqcoms 2630 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (4 = 𝑘 → (𝑘 ≤ 3 ↔ 4 ≤ 3))
9693, 95mtbiri 317 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (4 = 𝑘 → ¬ 𝑘 ≤ 3)
9796a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑘 ∈ ℤ → (4 = 𝑘 → ¬ 𝑘 ≤ 3))
9897necon2ad 2809 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑘 ∈ ℤ → (𝑘 ≤ 3 → 4 ≠ 𝑘))
9998adantld 483 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑘 ∈ ℤ → ((1 ≤ 𝑘𝑘 ≤ 3) → 4 ≠ 𝑘))
100993ad2ant3 1084 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((1 ∈ ℤ ∧ 3 ∈ ℤ ∧ 𝑘 ∈ ℤ) → ((1 ≤ 𝑘𝑘 ≤ 3) → 4 ≠ 𝑘))
101100imp 445 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((1 ∈ ℤ ∧ 3 ∈ ℤ ∧ 𝑘 ∈ ℤ) ∧ (1 ≤ 𝑘𝑘 ≤ 3)) → 4 ≠ 𝑘)
10287, 101sylbi 207 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑘 ∈ (1...3) → 4 ≠ 𝑘)
103102adantr 481 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑘 ∈ (1...3) ∧ 𝑔:(1...3)⟶ℙ) → 4 ≠ 𝑘)
104 fvunsn 6445 . . . . . . . . . . . . . . . . . . . . . . . 24 (4 ≠ 𝑘 → ((𝑔 ∪ {⟨4, 3⟩})‘𝑘) = (𝑔𝑘))
105103, 104syl 17 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑘 ∈ (1...3) ∧ 𝑔:(1...3)⟶ℙ) → ((𝑔 ∪ {⟨4, 3⟩})‘𝑘) = (𝑔𝑘))
106 ffvelrn 6357 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑔:(1...3)⟶ℙ ∧ 𝑘 ∈ (1...3)) → (𝑔𝑘) ∈ ℙ)
107106ancoms 469 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑘 ∈ (1...3) ∧ 𝑔:(1...3)⟶ℙ) → (𝑔𝑘) ∈ ℙ)
108 prmz 15389 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑔𝑘) ∈ ℙ → (𝑔𝑘) ∈ ℤ)
109107, 108syl 17 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑘 ∈ (1...3) ∧ 𝑔:(1...3)⟶ℙ) → (𝑔𝑘) ∈ ℤ)
110109zcnd 11483 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑘 ∈ (1...3) ∧ 𝑔:(1...3)⟶ℙ) → (𝑔𝑘) ∈ ℂ)
111105, 110eqeltrd 2701 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑘 ∈ (1...3) ∧ 𝑔:(1...3)⟶ℙ) → ((𝑔 ∪ {⟨4, 3⟩})‘𝑘) ∈ ℂ)
112111ex 450 . . . . . . . . . . . . . . . . . . . . 21 (𝑘 ∈ (1...3) → (𝑔:(1...3)⟶ℙ → ((𝑔 ∪ {⟨4, 3⟩})‘𝑘) ∈ ℂ))
113112adantld 483 . . . . . . . . . . . . . . . . . . . 20 (𝑘 ∈ (1...3) → ((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) → ((𝑔 ∪ {⟨4, 3⟩})‘𝑘) ∈ ℂ))
114 fveq2 6191 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑘 = 4 → ((𝑔 ∪ {⟨4, 3⟩})‘𝑘) = ((𝑔 ∪ {⟨4, 3⟩})‘4))
11531a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑔:(1...3)⟶ℙ → 4 ∈ ℤ)
1167a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑔:(1...3)⟶ℙ → 3 ∈ ℤ)
117 fdm 6051 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑔:(1...3)⟶ℙ → dom 𝑔 = (1...3))
118 eleq2 2690 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (dom 𝑔 = (1...3) → (4 ∈ dom 𝑔 ↔ 4 ∈ (1...3)))
11947, 118mtbiri 317 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (dom 𝑔 = (1...3) → ¬ 4 ∈ dom 𝑔)
120117, 119syl 17 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑔:(1...3)⟶ℙ → ¬ 4 ∈ dom 𝑔)
121 fsnunfv 6453 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((4 ∈ ℤ ∧ 3 ∈ ℤ ∧ ¬ 4 ∈ dom 𝑔) → ((𝑔 ∪ {⟨4, 3⟩})‘4) = 3)
122115, 116, 120, 121syl3anc 1326 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑔:(1...3)⟶ℙ → ((𝑔 ∪ {⟨4, 3⟩})‘4) = 3)
123122adantl 482 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) → ((𝑔 ∪ {⟨4, 3⟩})‘4) = 3)
124114, 123sylan9eq 2676 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑘 = 4 ∧ (𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ)) → ((𝑔 ∪ {⟨4, 3⟩})‘𝑘) = 3)
125124, 37syl6eqel 2709 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 = 4 ∧ (𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ)) → ((𝑔 ∪ {⟨4, 3⟩})‘𝑘) ∈ ℂ)
126125ex 450 . . . . . . . . . . . . . . . . . . . 20 (𝑘 = 4 → ((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) → ((𝑔 ∪ {⟨4, 3⟩})‘𝑘) ∈ ℂ))
127113, 126jaoi 394 . . . . . . . . . . . . . . . . . . 19 ((𝑘 ∈ (1...3) ∨ 𝑘 = 4) → ((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) → ((𝑔 ∪ {⟨4, 3⟩})‘𝑘) ∈ ℂ))
128127com12 32 . . . . . . . . . . . . . . . . . 18 ((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) → ((𝑘 ∈ (1...3) ∨ 𝑘 = 4) → ((𝑔 ∪ {⟨4, 3⟩})‘𝑘) ∈ ℂ))
12986, 128syl5bi 232 . . . . . . . . . . . . . . . . 17 ((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) → (𝑘 ∈ (1...4) → ((𝑔 ∪ {⟨4, 3⟩})‘𝑘) ∈ ℂ))
130129imp 445 . . . . . . . . . . . . . . . 16 (((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) ∧ 𝑘 ∈ (1...4)) → ((𝑔 ∪ {⟨4, 3⟩})‘𝑘) ∈ ℂ)
13181, 130, 114fsumm1 14480 . . . . . . . . . . . . . . 15 ((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) → Σ𝑘 ∈ (1...4)((𝑔 ∪ {⟨4, 3⟩})‘𝑘) = (Σ𝑘 ∈ (1...(4 − 1))((𝑔 ∪ {⟨4, 3⟩})‘𝑘) + ((𝑔 ∪ {⟨4, 3⟩})‘4)))
132131adantr 481 . . . . . . . . . . . . . 14 (((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) ∧ (𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔𝑘)) → Σ𝑘 ∈ (1...4)((𝑔 ∪ {⟨4, 3⟩})‘𝑘) = (Σ𝑘 ∈ (1...(4 − 1))((𝑔 ∪ {⟨4, 3⟩})‘𝑘) + ((𝑔 ∪ {⟨4, 3⟩})‘4)))
13342eqcomi 2631 . . . . . . . . . . . . . . . . . . . . 21 3 = (4 − 1)
134133oveq2i 6661 . . . . . . . . . . . . . . . . . . . 20 (1...3) = (1...(4 − 1))
135134a1i 11 . . . . . . . . . . . . . . . . . . 19 ((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) → (1...3) = (1...(4 − 1)))
136102adantl 482 . . . . . . . . . . . . . . . . . . . . 21 (((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) ∧ 𝑘 ∈ (1...3)) → 4 ≠ 𝑘)
137136, 104syl 17 . . . . . . . . . . . . . . . . . . . 20 (((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) ∧ 𝑘 ∈ (1...3)) → ((𝑔 ∪ {⟨4, 3⟩})‘𝑘) = (𝑔𝑘))
138137eqcomd 2628 . . . . . . . . . . . . . . . . . . 19 (((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) ∧ 𝑘 ∈ (1...3)) → (𝑔𝑘) = ((𝑔 ∪ {⟨4, 3⟩})‘𝑘))
139135, 138sumeq12dv 14437 . . . . . . . . . . . . . . . . . 18 ((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) → Σ𝑘 ∈ (1...3)(𝑔𝑘) = Σ𝑘 ∈ (1...(4 − 1))((𝑔 ∪ {⟨4, 3⟩})‘𝑘))
140139eqeq2d 2632 . . . . . . . . . . . . . . . . 17 ((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) → ((𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔𝑘) ↔ (𝑁 − 3) = Σ𝑘 ∈ (1...(4 − 1))((𝑔 ∪ {⟨4, 3⟩})‘𝑘)))
141140biimpa 501 . . . . . . . . . . . . . . . 16 (((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) ∧ (𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔𝑘)) → (𝑁 − 3) = Σ𝑘 ∈ (1...(4 − 1))((𝑔 ∪ {⟨4, 3⟩})‘𝑘))
142141eqcomd 2628 . . . . . . . . . . . . . . 15 (((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) ∧ (𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔𝑘)) → Σ𝑘 ∈ (1...(4 − 1))((𝑔 ∪ {⟨4, 3⟩})‘𝑘) = (𝑁 − 3))
143142oveq1d 6665 . . . . . . . . . . . . . 14 (((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) ∧ (𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔𝑘)) → (Σ𝑘 ∈ (1...(4 − 1))((𝑔 ∪ {⟨4, 3⟩})‘𝑘) + ((𝑔 ∪ {⟨4, 3⟩})‘4)) = ((𝑁 − 3) + ((𝑔 ∪ {⟨4, 3⟩})‘4)))
14431a1i 11 . . . . . . . . . . . . . . . . . 18 ((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) → 4 ∈ ℤ)
1457a1i 11 . . . . . . . . . . . . . . . . . 18 ((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) → 3 ∈ ℤ)
146120adantl 482 . . . . . . . . . . . . . . . . . 18 ((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) → ¬ 4 ∈ dom 𝑔)
147144, 145, 146, 121syl3anc 1326 . . . . . . . . . . . . . . . . 17 ((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) → ((𝑔 ∪ {⟨4, 3⟩})‘4) = 3)
148147oveq2d 6666 . . . . . . . . . . . . . . . 16 ((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) → ((𝑁 − 3) + ((𝑔 ∪ {⟨4, 3⟩})‘4)) = ((𝑁 − 3) + 3))
149 eluzelcn 11699 . . . . . . . . . . . . . . . . . 18 (𝑁 ∈ (ℤ‘9) → 𝑁 ∈ ℂ)
15037a1i 11 . . . . . . . . . . . . . . . . . 18 (𝑁 ∈ (ℤ‘9) → 3 ∈ ℂ)
151149, 150npcand 10396 . . . . . . . . . . . . . . . . 17 (𝑁 ∈ (ℤ‘9) → ((𝑁 − 3) + 3) = 𝑁)
152151adantr 481 . . . . . . . . . . . . . . . 16 ((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) → ((𝑁 − 3) + 3) = 𝑁)
153148, 152eqtrd 2656 . . . . . . . . . . . . . . 15 ((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) → ((𝑁 − 3) + ((𝑔 ∪ {⟨4, 3⟩})‘4)) = 𝑁)
154153adantr 481 . . . . . . . . . . . . . 14 (((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) ∧ (𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔𝑘)) → ((𝑁 − 3) + ((𝑔 ∪ {⟨4, 3⟩})‘4)) = 𝑁)
155132, 143, 1543eqtrrd 2661 . . . . . . . . . . . . 13 (((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) ∧ (𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔𝑘)) → 𝑁 = Σ𝑘 ∈ (1...4)((𝑔 ∪ {⟨4, 3⟩})‘𝑘))
15675, 80, 155rspcedvd 3317 . . . . . . . . . . . 12 (((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) ∧ (𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔𝑘)) → ∃𝑓 ∈ (ℙ ↑𝑚 (1...4))𝑁 = Σ𝑘 ∈ (1...4)(𝑓𝑘))
157156ex 450 . . . . . . . . . . 11 ((𝑁 ∈ (ℤ‘9) ∧ 𝑔:(1...3)⟶ℙ) → ((𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔𝑘) → ∃𝑓 ∈ (ℙ ↑𝑚 (1...4))𝑁 = Σ𝑘 ∈ (1...4)(𝑓𝑘)))
158157expcom 451 . . . . . . . . . 10 (𝑔:(1...3)⟶ℙ → (𝑁 ∈ (ℤ‘9) → ((𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔𝑘) → ∃𝑓 ∈ (ℙ ↑𝑚 (1...4))𝑁 = Σ𝑘 ∈ (1...4)(𝑓𝑘))))
159 elmapi 7879 . . . . . . . . . 10 (𝑔 ∈ (ℙ ↑𝑚 (1...3)) → 𝑔:(1...3)⟶ℙ)
160158, 159syl11 33 . . . . . . . . 9 (𝑁 ∈ (ℤ‘9) → (𝑔 ∈ (ℙ ↑𝑚 (1...3)) → ((𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔𝑘) → ∃𝑓 ∈ (ℙ ↑𝑚 (1...4))𝑁 = Σ𝑘 ∈ (1...4)(𝑓𝑘))))
161160rexlimdv 3030 . . . . . . . 8 (𝑁 ∈ (ℤ‘9) → (∃𝑔 ∈ (ℙ ↑𝑚 (1...3))(𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔𝑘) → ∃𝑓 ∈ (ℙ ↑𝑚 (1...4))𝑁 = Σ𝑘 ∈ (1...4)(𝑓𝑘)))
162161adantr 481 . . . . . . 7 ((𝑁 ∈ (ℤ‘9) ∧ 𝑁 ∈ Even ) → (∃𝑔 ∈ (ℙ ↑𝑚 (1...3))(𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔𝑘) → ∃𝑓 ∈ (ℙ ↑𝑚 (1...4))𝑁 = Σ𝑘 ∈ (1...4)(𝑓𝑘)))
163162ad3antlr 767 . . . . . 6 ((((∀𝑚 ∈ Odd (5 < 𝑚𝑚 ∈ GoldbachOddW ) ∧ (𝑁 ∈ (ℤ‘9) ∧ 𝑁 ∈ Even )) ∧ 𝑜 ∈ GoldbachOddW ) ∧ 𝑁 = (𝑜 + 3)) → (∃𝑔 ∈ (ℙ ↑𝑚 (1...3))(𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔𝑘) → ∃𝑓 ∈ (ℙ ↑𝑚 (1...4))𝑁 = Σ𝑘 ∈ (1...4)(𝑓𝑘)))
16429, 163mpd 15 . . . . 5 ((((∀𝑚 ∈ Odd (5 < 𝑚𝑚 ∈ GoldbachOddW ) ∧ (𝑁 ∈ (ℤ‘9) ∧ 𝑁 ∈ Even )) ∧ 𝑜 ∈ GoldbachOddW ) ∧ 𝑁 = (𝑜 + 3)) → ∃𝑓 ∈ (ℙ ↑𝑚 (1...4))𝑁 = Σ𝑘 ∈ (1...4)(𝑓𝑘))
165164ex 450 . . . 4 (((∀𝑚 ∈ Odd (5 < 𝑚𝑚 ∈ GoldbachOddW ) ∧ (𝑁 ∈ (ℤ‘9) ∧ 𝑁 ∈ Even )) ∧ 𝑜 ∈ GoldbachOddW ) → (𝑁 = (𝑜 + 3) → ∃𝑓 ∈ (ℙ ↑𝑚 (1...4))𝑁 = Σ𝑘 ∈ (1...4)(𝑓𝑘)))
166165rexlimdva 3031 . . 3 ((∀𝑚 ∈ Odd (5 < 𝑚𝑚 ∈ GoldbachOddW ) ∧ (𝑁 ∈ (ℤ‘9) ∧ 𝑁 ∈ Even )) → (∃𝑜 ∈ GoldbachOddW 𝑁 = (𝑜 + 3) → ∃𝑓 ∈ (ℙ ↑𝑚 (1...4))𝑁 = Σ𝑘 ∈ (1...4)(𝑓𝑘)))
1672, 166mpd 15 . 2 ((∀𝑚 ∈ Odd (5 < 𝑚𝑚 ∈ GoldbachOddW ) ∧ (𝑁 ∈ (ℤ‘9) ∧ 𝑁 ∈ Even )) → ∃𝑓 ∈ (ℙ ↑𝑚 (1...4))𝑁 = Σ𝑘 ∈ (1...4)(𝑓𝑘))
168167ex 450 1 (∀𝑚 ∈ Odd (5 < 𝑚𝑚 ∈ GoldbachOddW ) → ((𝑁 ∈ (ℤ‘9) ∧ 𝑁 ∈ Even ) → ∃𝑓 ∈ (ℙ ↑𝑚 (1...4))𝑁 = Σ𝑘 ∈ (1...4)(𝑓𝑘)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 196  wo 383  wa 384  w3a 1037   = wceq 1483  wcel 1990  wne 2794  wral 2912  wrex 2913  Vcvv 3200  cun 3572  {csn 4177  cop 4183   class class class wbr 4653  dom cdm 5114  wf 5884  cfv 5888  (class class class)co 6650  𝑚 cmap 7857  cc 9934  cr 9935  1c1 9937   + caddc 9939   < clt 10074  cle 10075  cmin 10266  3c3 11071  4c4 11072  5c5 11073  6c6 11074  9c9 11077  cz 11377  cuz 11687  ...cfz 12326  ..^cfzo 12465  Σcsu 14416  cprime 15385   Even ceven 41537   Odd codd 41538   GoldbachOddW cgbow 41634
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1722  ax-4 1737  ax-5 1839  ax-6 1888  ax-7 1935  ax-8 1992  ax-9 1999  ax-10 2019  ax-11 2034  ax-12 2047  ax-13 2246  ax-ext 2602  ax-rep 4771  ax-sep 4781  ax-nul 4789  ax-pow 4843  ax-pr 4906  ax-un 6949  ax-inf2 8538  ax-cnex 9992  ax-resscn 9993  ax-1cn 9994  ax-icn 9995  ax-addcl 9996  ax-addrcl 9997  ax-mulcl 9998  ax-mulrcl 9999  ax-mulcom 10000  ax-addass 10001  ax-mulass 10002  ax-distr 10003  ax-i2m1 10004  ax-1ne0 10005  ax-1rid 10006  ax-rnegex 10007  ax-rrecex 10008  ax-cnre 10009  ax-pre-lttri 10010  ax-pre-lttrn 10011  ax-pre-ltadd 10012  ax-pre-mulgt0 10013  ax-pre-sup 10014
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3or 1038  df-3an 1039  df-tru 1486  df-fal 1489  df-ex 1705  df-nf 1710  df-sb 1881  df-eu 2474  df-mo 2475  df-clab 2609  df-cleq 2615  df-clel 2618  df-nfc 2753  df-ne 2795  df-nel 2898  df-ral 2917  df-rex 2918  df-reu 2919  df-rmo 2920  df-rab 2921  df-v 3202  df-sbc 3436  df-csb 3534  df-dif 3577  df-un 3579  df-in 3581  df-ss 3588  df-pss 3590  df-nul 3916  df-if 4087  df-pw 4160  df-sn 4178  df-pr 4180  df-tp 4182  df-op 4184  df-uni 4437  df-int 4476  df-iun 4522  df-br 4654  df-opab 4713  df-mpt 4730  df-tr 4753  df-id 5024  df-eprel 5029  df-po 5035  df-so 5036  df-fr 5073  df-se 5074  df-we 5075  df-xp 5120  df-rel 5121  df-cnv 5122  df-co 5123  df-dm 5124  df-rn 5125  df-res 5126  df-ima 5127  df-pred 5680  df-ord 5726  df-on 5727  df-lim 5728  df-suc 5729  df-iota 5851  df-fun 5890  df-fn 5891  df-f 5892  df-f1 5893  df-fo 5894  df-f1o 5895  df-fv 5896  df-isom 5897  df-riota 6611  df-ov 6653  df-oprab 6654  df-mpt2 6655  df-om 7066  df-1st 7168  df-2nd 7169  df-wrecs 7407  df-recs 7468  df-rdg 7506  df-1o 7560  df-2o 7561  df-oadd 7564  df-er 7742  df-map 7859  df-en 7956  df-dom 7957  df-sdom 7958  df-fin 7959  df-sup 8348  df-inf 8349  df-oi 8415  df-card 8765  df-pnf 10076  df-mnf 10077  df-xr 10078  df-ltxr 10079  df-le 10080  df-sub 10268  df-neg 10269  df-div 10685  df-nn 11021  df-2 11079  df-3 11080  df-4 11081  df-5 11082  df-6 11083  df-7 11084  df-8 11085  df-9 11086  df-n0 11293  df-z 11378  df-uz 11688  df-rp 11833  df-fz 12327  df-fzo 12466  df-seq 12802  df-exp 12861  df-hash 13118  df-cj 13839  df-re 13840  df-im 13841  df-sqrt 13975  df-abs 13976  df-clim 14219  df-sum 14417  df-dvds 14984  df-prm 15386  df-even 41539  df-odd 41540  df-gbow 41637
This theorem is referenced by:  wtgoldbnnsum4prm  41690
  Copyright terms: Public domain W3C validator