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 48867
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 ) → ∃𝑓 ∈ (ℙ ↑m (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 48865 . . . 4 (∀𝑚 ∈ Odd (5 < 𝑚 → 𝑚 ∈ GoldbachOddW ) → ((𝑁 ∈ (ℤ≥‘9) ∧ 𝑁 ∈ Even ) → ∃𝑜 ∈ GoldbachOddW 𝑁 = (𝑜 + 3)))
21imp 412 . . 3 ((∀𝑚 ∈ Odd (5 < 𝑚 → 𝑚 ∈ GoldbachOddW ) ∧ (𝑁 ∈ (ℤ≥‘9) ∧ 𝑁 ∈ Even )) → ∃𝑜 ∈ GoldbachOddW 𝑁 = (𝑜 + 3))
3 simplll 787 . . . . . 6 ((((∀𝑚 ∈ Odd (5 < 𝑚 → 𝑚 ∈ GoldbachOddW ) ∧ (𝑁 ∈ (ℤ≥‘9) ∧ 𝑁 ∈ Even )) ∧ 𝑜 ∈ GoldbachOddW ) ∧ 𝑁 = (𝑜 + 3)) → ∀𝑚 ∈ Odd (5 < 𝑚 → 𝑚 ∈ GoldbachOddW ))
4 6nn 12425 . . . . . . . . . . 11 6 ∈ ℕ
54nnzi 12713 . . . . . . . . . 10 6 ∈ ℤ
65a1i 11 . . . . . . . . 9 (𝑁 ∈ (ℤ≥‘9) → 6 ∈ ℤ)
7 3z 12722 . . . . . . . . . 10 3 ∈ ℤ
87a1i 11 . . . . . . . . 9 (𝑁 ∈ (ℤ≥‘9) → 3 ∈ ℤ)
9 6p3e9 12495 . . . . . . . . . . . . 13 (6 + 3) = 9
109eqcomi 2770 . . . . . . . . . . . 12 9 = (6 + 3)
1110fveq2i 6886 . . . . . . . . . . 11 (ℤ≥‘9) = (ℤ≥‘(6 + 3))
1211eleq2i 2853 . . . . . . . . . 10 (𝑁 ∈ (ℤ≥‘9) ↔ 𝑁 ∈ (ℤ≥‘(6 + 3)))
1312biimpi 219 . . . . . . . . 9 (𝑁 ∈ (ℤ≥‘9) → 𝑁 ∈ (ℤ≥‘(6 + 3)))
14 eluzsub 12988 . . . . . . . . 9 ((6 ∈ ℤ ∧ 3 ∈ ℤ ∧ 𝑁 ∈ (ℤ≥‘(6 + 3))) → (𝑁 − 3) ∈ (ℤ≥‘6))
156, 8, 13, 14syl3anc 1398 . . . . . . . 8 (𝑁 ∈ (ℤ≥‘9) → (𝑁 − 3) ∈ (ℤ≥‘6))
1615adantr 486 . . . . . . 7 ((𝑁 ∈ (ℤ≥‘9) ∧ 𝑁 ∈ Even ) → (𝑁 − 3) ∈ (ℤ≥‘6))
1716ad3antlr 744 . . . . . 6 ((((∀𝑚 ∈ Odd (5 < 𝑚 → 𝑚 ∈ GoldbachOddW ) ∧ (𝑁 ∈ (ℤ≥‘9) ∧ 𝑁 ∈ Even )) ∧ 𝑜 ∈ GoldbachOddW ) ∧ 𝑁 = (𝑜 + 3)) → (𝑁 − 3) ∈ (ℤ≥‘6))
18 3odd 48775 . . . . . . . . . . . . 13 3 ∈ Odd
1918a1i 11 . . . . . . . . . . . 12 (𝑁 ∈ (ℤ≥‘9) → 3 ∈ Odd )
2019anim1i 627 . . . . . . . . . . 11 ((𝑁 ∈ (ℤ≥‘9) ∧ 𝑁 ∈ Even ) → (3 ∈ Odd ∧ 𝑁 ∈ Even ))
2120adantl 487 . . . . . . . . . 10 ((∀𝑚 ∈ Odd (5 < 𝑚 → 𝑚 ∈ GoldbachOddW ) ∧ (𝑁 ∈ (ℤ≥‘9) ∧ 𝑁 ∈ Even )) → (3 ∈ Odd ∧ 𝑁 ∈ Even ))
2221ancomd 467 . . . . . . . . 9 ((∀𝑚 ∈ Odd (5 < 𝑚 → 𝑚 ∈ GoldbachOddW ) ∧ (𝑁 ∈ (ℤ≥‘9) ∧ 𝑁 ∈ Even )) → (𝑁 ∈ Even ∧ 3 ∈ Odd ))
2322adantr 486 . . . . . . . 8 (((∀𝑚 ∈ Odd (5 < 𝑚 → 𝑚 ∈ GoldbachOddW ) ∧ (𝑁 ∈ (ℤ≥‘9) ∧ 𝑁 ∈ Even )) ∧ 𝑜 ∈ GoldbachOddW ) → (𝑁 ∈ Even ∧ 3 ∈ Odd ))
2423adantr 486 . . . . . . 7 ((((∀𝑚 ∈ Odd (5 < 𝑚 → 𝑚 ∈ GoldbachOddW ) ∧ (𝑁 ∈ (ℤ≥‘9) ∧ 𝑁 ∈ Even )) ∧ 𝑜 ∈ GoldbachOddW ) ∧ 𝑁 = (𝑜 + 3)) → (𝑁 ∈ Even ∧ 3 ∈ Odd ))
25 emoo 48771 . . . . . . 7 ((𝑁 ∈ Even ∧ 3 ∈ Odd ) → (𝑁 − 3) ∈ Odd )
2624, 25syl 18 . . . . . 6 ((((∀𝑚 ∈ Odd (5 < 𝑚 → 𝑚 ∈ GoldbachOddW ) ∧ (𝑁 ∈ (ℤ≥‘9) ∧ 𝑁 ∈ Even )) ∧ 𝑜 ∈ GoldbachOddW ) ∧ 𝑁 = (𝑜 + 3)) → (𝑁 − 3) ∈ Odd )
27 nnsum4primesodd 48863 . . . . . . 7 (∀𝑚 ∈ Odd (5 < 𝑚 → 𝑚 ∈ GoldbachOddW ) → (((𝑁 − 3) ∈ (ℤ≥‘6) ∧ (𝑁 − 3) ∈ Odd ) → ∃𝑔 ∈ (ℙ ↑m (1...3))(𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔‘𝑘)))
2827imp 412 . . . . . 6 ((∀𝑚 ∈ Odd (5 < 𝑚 → 𝑚 ∈ GoldbachOddW ) ∧ ((𝑁 − 3) ∈ (ℤ≥‘6) ∧ (𝑁 − 3) ∈ Odd )) → ∃𝑔 ∈ (ℙ ↑m (1...3))(𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔‘𝑘))
293, 17, 26, 28syl12anc 850 . . . . 5 ((((∀𝑚 ∈ Odd (5 < 𝑚 → 𝑚 ∈ GoldbachOddW ) ∧ (𝑁 ∈ (ℤ≥‘9) ∧ 𝑁 ∈ Even )) ∧ 𝑜 ∈ GoldbachOddW ) ∧ 𝑁 = (𝑜 + 3)) → ∃𝑔 ∈ (ℙ ↑m (1...3))(𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔‘𝑘))
30 simpr 490 . . . . . . . . . . . . . . . 16 ((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) → 𝑔:(1...3)⟶ℙ)
31 4z 12723 . . . . . . . . . . . . . . . . . 18 4 ∈ ℤ
32 fzonel 13801 . . . . . . . . . . . . . . . . . . 19 ¬ 4 ∈ (1..^4)
33 fzoval 13787 . . . . . . . . . . . . . . . . . . . . . . 23 (4 ∈ ℤ → (1..^4) = (1...(4 − 1)))
3431, 33ax-mp 5 . . . . . . . . . . . . . . . . . . . . . 22 (1..^4) = (1...(4 − 1))
35 4cn 12421 . . . . . . . . . . . . . . . . . . . . . . . . 25 4 ∈ ℂ
36 ax-1cn 11251 . . . . . . . . . . . . . . . . . . . . . . . . 25 1 ∈ ℂ
37 3cn 12417 . . . . . . . . . . . . . . . . . . . . . . . . 25 3 ∈ ℂ
3835, 36, 373pm3.2i 1358 . . . . . . . . . . . . . . . . . . . . . . . 24 (4 ∈ ℂ ∧ 1 ∈ ℂ ∧ 3 ∈ ℂ)
39 3p1e4 12480 . . . . . . . . . . . . . . . . . . . . . . . . 25 (3 + 1) = 4
40 subadd2 11554 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((4 ∈ ℂ ∧ 1 ∈ ℂ ∧ 3 ∈ ℂ) → ((4 − 1) = 3 ↔ (3 + 1) = 4))
4139, 40mpbiri 261 . . . . . . . . . . . . . . . . . . . . . . . 24 ((4 ∈ ℂ ∧ 1 ∈ ℂ ∧ 3 ∈ ℂ) → (4 − 1) = 3)
4238, 41ax-mp 5 . . . . . . . . . . . . . . . . . . . . . . 23 (4 − 1) = 3
4342oveq2i 7429 . . . . . . . . . . . . . . . . . . . . . 22 (1...(4 − 1)) = (1...3)
4434, 43eqtri 2784 . . . . . . . . . . . . . . . . . . . . 21 (1..^4) = (1...3)
4544eqcomi 2770 . . . . . . . . . . . . . . . . . . . 20 (1...3) = (1..^4)
4645eleq2i 2853 . . . . . . . . . . . . . . . . . . 19 (4 ∈ (1...3) ↔ 4 ∈ (1..^4))
4732, 46mtbir 326 . . . . . . . . . . . . . . . . . 18 ¬ 4 ∈ (1...3)
4831, 47pm3.2i 476 . . . . . . . . . . . . . . . . 17 (4 ∈ ℤ ∧ ¬ 4 ∈ (1...3))
4948a1i 11 . . . . . . . . . . . . . . . 16 ((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) → (4 ∈ ℤ ∧ ¬ 4 ∈ (1...3)))
50 3prm 16862 . . . . . . . . . . . . . . . . 17 3 ∈ ℙ
5150a1i 11 . . . . . . . . . . . . . . . 16 ((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) → 3 ∈ ℙ)
52 fsnunf 7188 . . . . . . . . . . . . . . . 16 ((𝑔:(1...3)⟶ℙ ∧ (4 ∈ ℤ ∧ ¬ 4 ∈ (1...3)) ∧ 3 ∈ ℙ) → (𝑔 ∪ {⟨4, 3⟩}):((1...3) ∪ {4})⟶ℙ)
5330, 49, 51, 52syl3anc 1398 . . . . . . . . . . . . . . 15 ((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) → (𝑔 ∪ {⟨4, 3⟩}):((1...3) ∪ {4})⟶ℙ)
54 fzval3 13862 . . . . . . . . . . . . . . . . . 18 (4 ∈ ℤ → (1...4) = (1..^(4 + 1)))
5531, 54ax-mp 5 . . . . . . . . . . . . . . . . 17 (1...4) = (1..^(4 + 1))
56 1z 12719 . . . . . . . . . . . . . . . . . . 19 1 ∈ ℤ
57 1re 11301 . . . . . . . . . . . . . . . . . . . 20 1 ∈ ℝ
58 4re 12420 . . . . . . . . . . . . . . . . . . . 20 4 ∈ ℝ
59 1lt4 12514 . . . . . . . . . . . . . . . . . . . 20 1 < 4
6057, 58, 59ltleii 11426 . . . . . . . . . . . . . . . . . . 19 1 ≤ 4
61 eluz2 12964 . . . . . . . . . . . . . . . . . . 19 (4 ∈ (ℤ≥‘1) ↔ (1 ∈ ℤ ∧ 4 ∈ ℤ ∧ 1 ≤ 4))
6256, 31, 60, 61mpbir3an 1360 . . . . . . . . . . . . . . . . . 18 4 ∈ (ℤ≥‘1)
63 fzosplitsn 13904 . . . . . . . . . . . . . . . . . 18 (4 ∈ (ℤ≥‘1) → (1..^(4 + 1)) = ((1..^4) ∪ {4}))
6462, 63ax-mp 5 . . . . . . . . . . . . . . . . 17 (1..^(4 + 1)) = ((1..^4) ∪ {4})
6544uneq1i 4111 . . . . . . . . . . . . . . . . 17 ((1..^4) ∪ {4}) = ((1...3) ∪ {4})
6655, 64, 653eqtri 2788 . . . . . . . . . . . . . . . 16 (1...4) = ((1...3) ∪ {4})
6766feq2i 6699 . . . . . . . . . . . . . . 15 ((𝑔 ∪ {⟨4, 3⟩}):(1...4)⟶ℙ ↔ (𝑔 ∪ {⟨4, 3⟩}):((1...3) ∪ {4})⟶ℙ)
6853, 67sylibr 237 . . . . . . . . . . . . . 14 ((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) → (𝑔 ∪ {⟨4, 3⟩}):(1...4)⟶ℙ)
69 prmex 16845 . . . . . . . . . . . . . . . 16 ℙ ∈ V
70 ovex 7451 . . . . . . . . . . . . . . . 16 (1...4) ∈ V
7169, 70pm3.2i 476 . . . . . . . . . . . . . . 15 (ℙ ∈ V ∧ (1...4) ∈ V)
72 elmapg 8852 . . . . . . . . . . . . . . 15 ((ℙ ∈ V ∧ (1...4) ∈ V) → ((𝑔 ∪ {⟨4, 3⟩}) ∈ (ℙ ↑m (1...4)) ↔ (𝑔 ∪ {⟨4, 3⟩}):(1...4)⟶ℙ))
7371, 72mp1i 14 . . . . . . . . . . . . . 14 ((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) → ((𝑔 ∪ {⟨4, 3⟩}) ∈ (ℙ ↑m (1...4)) ↔ (𝑔 ∪ {⟨4, 3⟩}):(1...4)⟶ℙ))
7468, 73mpbird 260 . . . . . . . . . . . . 13 ((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) → (𝑔 ∪ {⟨4, 3⟩}) ∈ (ℙ ↑m (1...4)))
7574adantr 486 . . . . . . . . . . . 12 (((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) ∧ (𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔‘𝑘)) → (𝑔 ∪ {⟨4, 3⟩}) ∈ (ℙ ↑m (1...4)))
76 fveq1 6882 . . . . . . . . . . . . . . . 16 (𝑓 = (𝑔 ∪ {⟨4, 3⟩}) → (𝑓‘𝑘) = ((𝑔 ∪ {⟨4, 3⟩})‘𝑘))
7776adantr 486 . . . . . . . . . . . . . . 15 ((𝑓 = (𝑔 ∪ {⟨4, 3⟩}) ∧ 𝑘 ∈ (1...4)) → (𝑓‘𝑘) = ((𝑔 ∪ {⟨4, 3⟩})‘𝑘))
7877sumeq2dv 15862 . . . . . . . . . . . . . 14 (𝑓 = (𝑔 ∪ {⟨4, 3⟩}) → Σ𝑘 ∈ (1...4)(𝑓‘𝑘) = Σ𝑘 ∈ (1...4)((𝑔 ∪ {⟨4, 3⟩})‘𝑘))
7978eqeq2d 2772 . . . . . . . . . . . . 13 (𝑓 = (𝑔 ∪ {⟨4, 3⟩}) → (𝑁 = Σ𝑘 ∈ (1...4)(𝑓‘𝑘) ↔ 𝑁 = Σ𝑘 ∈ (1...4)((𝑔 ∪ {⟨4, 3⟩})‘𝑘)))
8079adantl 487 . . . . . . . . . . . 12 ((((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) ∧ (𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔‘𝑘)) ∧ 𝑓 = (𝑔 ∪ {⟨4, 3⟩})) → (𝑁 = Σ𝑘 ∈ (1...4)(𝑓‘𝑘) ↔ 𝑁 = Σ𝑘 ∈ (1...4)((𝑔 ∪ {⟨4, 3⟩})‘𝑘)))
8162a1i 11 . . . . . . . . . . . . . . 15 ((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) → 4 ∈ (ℤ≥‘1))
8266eleq2i 2853 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ (1...4) ↔ 𝑘 ∈ ((1...3) ∪ {4}))
83 elun 4100 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ ((1...3) ∪ {4}) ↔ (𝑘 ∈ (1...3) ∨ 𝑘 ∈ {4}))
84 velsn 4600 . . . . . . . . . . . . . . . . . . 19 (𝑘 ∈ {4} ↔ 𝑘 = 4)
8584orbi2i 926 . . . . . . . . . . . . . . . . . 18 ((𝑘 ∈ (1...3) ∨ 𝑘 ∈ {4}) ↔ (𝑘 ∈ (1...3) ∨ 𝑘 = 4))
8682, 83, 853bitri 300 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ (1...4) ↔ (𝑘 ∈ (1...3) ∨ 𝑘 = 4))
87 elfz2 13639 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑘 ∈ (1...3) ↔ ((1 ∈ ℤ ∧ 3 ∈ ℤ ∧ 𝑘 ∈ ℤ) ∧ (1 ≤ 𝑘 ∧ 𝑘 ≤ 3)))
88 3re 12416 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 3 ∈ ℝ
8988, 58pm3.2i 476 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (3 ∈ ℝ ∧ 4 ∈ ℝ)
90 3lt4 12512 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 3 < 4
91 ltnle 11382 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ((3 ∈ ℝ ∧ 4 ∈ ℝ) → (3 < 4 ↔ ¬ 4 ≤ 3))
9290, 91mpbii 236 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ((3 ∈ ℝ ∧ 4 ∈ ℝ) → ¬ 4 ≤ 3)
9389, 92ax-mp 5 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ¬ 4 ≤ 3
94 breq1 5106 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑘 = 4 → (𝑘 ≤ 3 ↔ 4 ≤ 3))
9594eqcoms 2769 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (4 = 𝑘 → (𝑘 ≤ 3 ↔ 4 ≤ 3))
9693, 95mtbiri 330 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (4 = 𝑘 → ¬ 𝑘 ≤ 3)
9796a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑘 ∈ ℤ → (4 = 𝑘 → ¬ 𝑘 ≤ 3))
9897necon2ad 2971 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑘 ∈ ℤ → (𝑘 ≤ 3 → 4 ≠ 𝑘))
9998adantld 496 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑘 ∈ ℤ → ((1 ≤ 𝑘 ∧ 𝑘 ≤ 3) → 4 ≠ 𝑘))
100993ad2ant3 1153 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((1 ∈ ℤ ∧ 3 ∈ ℤ ∧ 𝑘 ∈ ℤ) → ((1 ≤ 𝑘 ∧ 𝑘 ≤ 3) → 4 ≠ 𝑘))
101100imp 412 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((1 ∈ ℤ ∧ 3 ∈ ℤ ∧ 𝑘 ∈ ℤ) ∧ (1 ≤ 𝑘 ∧ 𝑘 ≤ 3)) → 4 ≠ 𝑘)
10287, 101sylbi 220 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑘 ∈ (1...3) → 4 ≠ 𝑘)
103102adantr 486 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑘 ∈ (1...3) ∧ 𝑔:(1...3)⟶ℙ) → 4 ≠ 𝑘)
104 fvunsn 7182 . . . . . . . . . . . . . . . . . . . . . . 23 (4 ≠ 𝑘 → ((𝑔 ∪ {⟨4, 3⟩})‘𝑘) = (𝑔‘𝑘))
105103, 104syl 18 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑘 ∈ (1...3) ∧ 𝑔:(1...3)⟶ℙ) → ((𝑔 ∪ {⟨4, 3⟩})‘𝑘) = (𝑔‘𝑘))
106 ffvelcdm 7079 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑔:(1...3)⟶ℙ ∧ 𝑘 ∈ (1...3)) → (𝑔‘𝑘) ∈ ℙ)
107106ancoms 464 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑘 ∈ (1...3) ∧ 𝑔:(1...3)⟶ℙ) → (𝑔‘𝑘) ∈ ℙ)
108 prmz 16843 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑔‘𝑘) ∈ ℙ → (𝑔‘𝑘) ∈ ℤ)
109107, 108syl 18 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑘 ∈ (1...3) ∧ 𝑔:(1...3)⟶ℙ) → (𝑔‘𝑘) ∈ ℤ)
110109zcnd 12797 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑘 ∈ (1...3) ∧ 𝑔:(1...3)⟶ℙ) → (𝑔‘𝑘) ∈ ℂ)
111105, 110eqeltrd 2861 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 ∈ (1...3) ∧ 𝑔:(1...3)⟶ℙ) → ((𝑔 ∪ {⟨4, 3⟩})‘𝑘) ∈ ℂ)
112111ex 418 . . . . . . . . . . . . . . . . . . . 20 (𝑘 ∈ (1...3) → (𝑔:(1...3)⟶ℙ → ((𝑔 ∪ {⟨4, 3⟩})‘𝑘) ∈ ℂ))
113112adantld 496 . . . . . . . . . . . . . . . . . . 19 (𝑘 ∈ (1...3) → ((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) → ((𝑔 ∪ {⟨4, 3⟩})‘𝑘) ∈ ℂ))
114 fveq2 6883 . . . . . . . . . . . . . . . . . . . . . 22 (𝑘 = 4 → ((𝑔 ∪ {⟨4, 3⟩})‘𝑘) = ((𝑔 ∪ {⟨4, 3⟩})‘4))
11531a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑔:(1...3)⟶ℙ → 4 ∈ ℤ)
1167a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑔:(1...3)⟶ℙ → 3 ∈ ℤ)
117 fdm 6717 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑔:(1...3)⟶ℙ → dom 𝑔 = (1...3))
118 eleq2 2850 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (dom 𝑔 = (1...3) → (4 ∈ dom 𝑔 ↔ 4 ∈ (1...3)))
11947, 118mtbiri 330 . . . . . . . . . . . . . . . . . . . . . . . . 25 (dom 𝑔 = (1...3) → ¬ 4 ∈ dom 𝑔)
120117, 119syl 18 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑔:(1...3)⟶ℙ → ¬ 4 ∈ dom 𝑔)
121 fsnunfv 7190 . . . . . . . . . . . . . . . . . . . . . . . 24 ((4 ∈ ℤ ∧ 3 ∈ ℤ ∧ ¬ 4 ∈ dom 𝑔) → ((𝑔 ∪ {⟨4, 3⟩})‘4) = 3)
122115, 116, 120, 121syl3anc 1398 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑔:(1...3)⟶ℙ → ((𝑔 ∪ {⟨4, 3⟩})‘4) = 3)
123122adantl 487 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) → ((𝑔 ∪ {⟨4, 3⟩})‘4) = 3)
124114, 123sylan9eq 2816 . . . . . . . . . . . . . . . . . . . . 21 ((𝑘 = 4 ∧ (𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ)) → ((𝑔 ∪ {⟨4, 3⟩})‘𝑘) = 3)
125124, 37eqeltrdi 2869 . . . . . . . . . . . . . . . . . . . 20 ((𝑘 = 4 ∧ (𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ)) → ((𝑔 ∪ {⟨4, 3⟩})‘𝑘) ∈ ℂ)
126125ex 418 . . . . . . . . . . . . . . . . . . 19 (𝑘 = 4 → ((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) → ((𝑔 ∪ {⟨4, 3⟩})‘𝑘) ∈ ℂ))
127113, 126jaoi 871 . . . . . . . . . . . . . . . . . 18 ((𝑘 ∈ (1...3) ∨ 𝑘 = 4) → ((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) → ((𝑔 ∪ {⟨4, 3⟩})‘𝑘) ∈ ℂ))
128127com12 33 . . . . . . . . . . . . . . . . 17 ((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) → ((𝑘 ∈ (1...3) ∨ 𝑘 = 4) → ((𝑔 ∪ {⟨4, 3⟩})‘𝑘) ∈ ℂ))
12986, 128biimtrid 245 . . . . . . . . . . . . . . . 16 ((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) → (𝑘 ∈ (1...4) → ((𝑔 ∪ {⟨4, 3⟩})‘𝑘) ∈ ℂ))
130129imp 412 . . . . . . . . . . . . . . 15 (((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) ∧ 𝑘 ∈ (1...4)) → ((𝑔 ∪ {⟨4, 3⟩})‘𝑘) ∈ ℂ)
13181, 130, 114fsumm1 15910 . . . . . . . . . . . . . 14 ((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) → Σ𝑘 ∈ (1...4)((𝑔 ∪ {⟨4, 3⟩})‘𝑘) = (Σ𝑘 ∈ (1...(4 − 1))((𝑔 ∪ {⟨4, 3⟩})‘𝑘) + ((𝑔 ∪ {⟨4, 3⟩})‘4)))
132131adantr 486 . . . . . . . . . . . . 13 (((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) ∧ (𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔‘𝑘)) → Σ𝑘 ∈ (1...4)((𝑔 ∪ {⟨4, 3⟩})‘𝑘) = (Σ𝑘 ∈ (1...(4 − 1))((𝑔 ∪ {⟨4, 3⟩})‘𝑘) + ((𝑔 ∪ {⟨4, 3⟩})‘4)))
13342eqcomi 2770 . . . . . . . . . . . . . . . . . . . 20 3 = (4 − 1)
134133oveq2i 7429 . . . . . . . . . . . . . . . . . . 19 (1...3) = (1...(4 − 1))
135134a1i 11 . . . . . . . . . . . . . . . . . 18 ((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) → (1...3) = (1...(4 − 1)))
136102adantl 487 . . . . . . . . . . . . . . . . . . . 20 (((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) ∧ 𝑘 ∈ (1...3)) → 4 ≠ 𝑘)
137136, 104syl 18 . . . . . . . . . . . . . . . . . . 19 (((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) ∧ 𝑘 ∈ (1...3)) → ((𝑔 ∪ {⟨4, 3⟩})‘𝑘) = (𝑔‘𝑘))
138137eqcomd 2767 . . . . . . . . . . . . . . . . . 18 (((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) ∧ 𝑘 ∈ (1...3)) → (𝑔‘𝑘) = ((𝑔 ∪ {⟨4, 3⟩})‘𝑘))
139135, 138sumeq12dv 15865 . . . . . . . . . . . . . . . . 17 ((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) → Σ𝑘 ∈ (1...3)(𝑔‘𝑘) = Σ𝑘 ∈ (1...(4 − 1))((𝑔 ∪ {⟨4, 3⟩})‘𝑘))
140139eqeq2d 2772 . . . . . . . . . . . . . . . 16 ((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) → ((𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔‘𝑘) ↔ (𝑁 − 3) = Σ𝑘 ∈ (1...(4 − 1))((𝑔 ∪ {⟨4, 3⟩})‘𝑘)))
141140biimpa 482 . . . . . . . . . . . . . . 15 (((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) ∧ (𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔‘𝑘)) → (𝑁 − 3) = Σ𝑘 ∈ (1...(4 − 1))((𝑔 ∪ {⟨4, 3⟩})‘𝑘))
142141eqcomd 2767 . . . . . . . . . . . . . 14 (((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) ∧ (𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔‘𝑘)) → Σ𝑘 ∈ (1...(4 − 1))((𝑔 ∪ {⟨4, 3⟩})‘𝑘) = (𝑁 − 3))
143142oveq1d 7433 . . . . . . . . . . . . 13 (((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) ∧ (𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔‘𝑘)) → (Σ𝑘 ∈ (1...(4 − 1))((𝑔 ∪ {⟨4, 3⟩})‘𝑘) + ((𝑔 ∪ {⟨4, 3⟩})‘4)) = ((𝑁 − 3) + ((𝑔 ∪ {⟨4, 3⟩})‘4)))
14431a1i 11 . . . . . . . . . . . . . . . . 17 ((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) → 4 ∈ ℤ)
1457a1i 11 . . . . . . . . . . . . . . . . 17 ((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) → 3 ∈ ℤ)
146120adantl 487 . . . . . . . . . . . . . . . . 17 ((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) → ¬ 4 ∈ dom 𝑔)
147144, 145, 146, 121syl3anc 1398 . . . . . . . . . . . . . . . 16 ((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) → ((𝑔 ∪ {⟨4, 3⟩})‘4) = 3)
148147oveq2d 7434 . . . . . . . . . . . . . . 15 ((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) → ((𝑁 − 3) + ((𝑔 ∪ {⟨4, 3⟩})‘4)) = ((𝑁 − 3) + 3))
149 eluzelcn 12970 . . . . . . . . . . . . . . . . 17 (𝑁 ∈ (ℤ≥‘9) → 𝑁 ∈ ℂ)
15037a1i 11 . . . . . . . . . . . . . . . . 17 (𝑁 ∈ (ℤ≥‘9) → 3 ∈ ℂ)
151149, 150npcand 11666 . . . . . . . . . . . . . . . 16 (𝑁 ∈ (ℤ≥‘9) → ((𝑁 − 3) + 3) = 𝑁)
152151adantr 486 . . . . . . . . . . . . . . 15 ((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) → ((𝑁 − 3) + 3) = 𝑁)
153148, 152eqtrd 2796 . . . . . . . . . . . . . 14 ((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) → ((𝑁 − 3) + ((𝑔 ∪ {⟨4, 3⟩})‘4)) = 𝑁)
154153adantr 486 . . . . . . . . . . . . 13 (((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) ∧ (𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔‘𝑘)) → ((𝑁 − 3) + ((𝑔 ∪ {⟨4, 3⟩})‘4)) = 𝑁)
155132, 143, 1543eqtrrd 2801 . . . . . . . . . . . 12 (((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) ∧ (𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔‘𝑘)) → 𝑁 = Σ𝑘 ∈ (1...4)((𝑔 ∪ {⟨4, 3⟩})‘𝑘))
15675, 80, 155rspcedvd 3579 . . . . . . . . . . 11 (((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) ∧ (𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔‘𝑘)) → ∃𝑓 ∈ (ℙ ↑m (1...4))𝑁 = Σ𝑘 ∈ (1...4)(𝑓‘𝑘))
157156ex 418 . . . . . . . . . 10 ((𝑁 ∈ (ℤ≥‘9) ∧ 𝑔:(1...3)⟶ℙ) → ((𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔‘𝑘) → ∃𝑓 ∈ (ℙ ↑m (1...4))𝑁 = Σ𝑘 ∈ (1...4)(𝑓‘𝑘)))
158157expcom 419 . . . . . . . . 9 (𝑔:(1...3)⟶ℙ → (𝑁 ∈ (ℤ≥‘9) → ((𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔‘𝑘) → ∃𝑓 ∈ (ℙ ↑m (1...4))𝑁 = Σ𝑘 ∈ (1...4)(𝑓‘𝑘))))
159 elmapi 8862 . . . . . . . . 9 (𝑔 ∈ (ℙ ↑m (1...3)) → 𝑔:(1...3)⟶ℙ)
160158, 159syl11 34 . . . . . . . 8 (𝑁 ∈ (ℤ≥‘9) → (𝑔 ∈ (ℙ ↑m (1...3)) → ((𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔‘𝑘) → ∃𝑓 ∈ (ℙ ↑m (1...4))𝑁 = Σ𝑘 ∈ (1...4)(𝑓‘𝑘))))
161160rexlimdv 3162 . . . . . . 7 (𝑁 ∈ (ℤ≥‘9) → (∃𝑔 ∈ (ℙ ↑m (1...3))(𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔‘𝑘) → ∃𝑓 ∈ (ℙ ↑m (1...4))𝑁 = Σ𝑘 ∈ (1...4)(𝑓‘𝑘)))
162161adantr 486 . . . . . 6 ((𝑁 ∈ (ℤ≥‘9) ∧ 𝑁 ∈ Even ) → (∃𝑔 ∈ (ℙ ↑m (1...3))(𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔‘𝑘) → ∃𝑓 ∈ (ℙ ↑m (1...4))𝑁 = Σ𝑘 ∈ (1...4)(𝑓‘𝑘)))
163162ad3antlr 744 . . . . 5 ((((∀𝑚 ∈ Odd (5 < 𝑚 → 𝑚 ∈ GoldbachOddW ) ∧ (𝑁 ∈ (ℤ≥‘9) ∧ 𝑁 ∈ Even )) ∧ 𝑜 ∈ GoldbachOddW ) ∧ 𝑁 = (𝑜 + 3)) → (∃𝑔 ∈ (ℙ ↑m (1...3))(𝑁 − 3) = Σ𝑘 ∈ (1...3)(𝑔‘𝑘) → ∃𝑓 ∈ (ℙ ↑m (1...4))𝑁 = Σ𝑘 ∈ (1...4)(𝑓‘𝑘)))
16429, 163mpd 16 . . . 4 ((((∀𝑚 ∈ Odd (5 < 𝑚 → 𝑚 ∈ GoldbachOddW ) ∧ (𝑁 ∈ (ℤ≥‘9) ∧ 𝑁 ∈ Even )) ∧ 𝑜 ∈ GoldbachOddW ) ∧ 𝑁 = (𝑜 + 3)) → ∃𝑓 ∈ (ℙ ↑m (1...4))𝑁 = Σ𝑘 ∈ (1...4)(𝑓‘𝑘))
165164rexlimdva2 3166 . . 3 ((∀𝑚 ∈ Odd (5 < 𝑚 → 𝑚 ∈ GoldbachOddW ) ∧ (𝑁 ∈ (ℤ≥‘9) ∧ 𝑁 ∈ Even )) → (∃𝑜 ∈ GoldbachOddW 𝑁 = (𝑜 + 3) → ∃𝑓 ∈ (ℙ ↑m (1...4))𝑁 = Σ𝑘 ∈ (1...4)(𝑓‘𝑘)))
1662, 165mpd 16 . 2 ((∀𝑚 ∈ Odd (5 < 𝑚 → 𝑚 ∈ GoldbachOddW ) ∧ (𝑁 ∈ (ℤ≥‘9) ∧ 𝑁 ∈ Even )) → ∃𝑓 ∈ (ℙ ↑m (1...4))𝑁 = Σ𝑘 ∈ (1...4)(𝑓‘𝑘))
167166ex 418 1 (∀𝑚 ∈ Odd (5 < 𝑚 → 𝑚 ∈ GoldbachOddW ) → ((𝑁 ∈ (ℤ≥‘9) ∧ 𝑁 ∈ Even ) → ∃𝑓 ∈ (ℙ ↑m (1...4))𝑁 = Σ𝑘 ∈ (1...4)(𝑓‘𝑘)))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 401   ∨ wo 861   ∧ w3a 1103   = wceq 1570   ∈ wcel 2145   ≠ wne 2956  ∀wral 3077  ∃wrex 3087  Vcvv 3451   ∪ cun 3897  {csn 4584  ⟨cop 4590   class class class wbr 5103  dom cdm 5651  ⟶wf 6533  ‘cfv 6537  (class class class)co 7418   ↑m cmap 8840  ℂcc 11191  ℝcr 11192  1c1 11194   + caddc 11196   < clt 11336   ≤ cle 11337   − cmin 11534  3c3 12391  4c4 12392  5c5 12393  6c6 12394  9c9 12397  ℤcz 12686  ℤ≥cuz 12958  ...cfz 13632  ..^cfzo 13781  Σcsu 15846  ℙcprime 16839   Even ceven 48691   Odd codd 48692   GoldbachOddW cgbow 48813
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2733  ax-rep 5232  ax-sep 5249  ax-nul 5260  ax-pow 5327  ax-pr 5391  ax-un 7749  ax-inf2 9635  ax-cnex 11249  ax-resscn 11250  ax-1cn 11251  ax-icn 11252  ax-addcl 11253  ax-addrcl 11254  ax-mulcl 11255  ax-mulrcl 11256  ax-mulcom 11257  ax-addass 11258  ax-mulass 11259  ax-distr 11260  ax-i2m1 11261  ax-1ne0 11262  ax-1rid 11263  ax-rnegex 11264  ax-rrecex 11265  ax-cnre 11266  ax-pre-lttri 11267  ax-pre-lttrn 11268  ax-pre-ltadd 11269  ax-pre-mulgt0 11270  ax-pre-sup 11271
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-nel 3063  df-ral 3078  df-rex 3088  df-rmo 3366  df-reu 3367  df-rab 3414  df-v 3453  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-tp 4589  df-op 4591  df-uni 4868  df-int 4908  df-iun 4953  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  df-se 5605  df-we 5606  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-pred 6303  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6493  df-fun 6539  df-fn 6540  df-f 6541  df-f1 6542  df-fo 6543  df-f1o 6544  df-fv 6545  df-isom 6546  df-riota 7375  df-ov 7421  df-oprab 7422  df-mpo 7423  df-om 7876  df-1st 7999  df-2nd 8000  df-frecs 8292  df-wrecs 8323  df-recs 8372  df-rdg 8411  df-1o 8469  df-2o 8470  df-er 8710  df-map 8842  df-en 8967  df-dom 8968  df-sdom 8969  df-fin 8970  df-sup 9427  df-oi 9497  df-card 10013  df-pnf 11338  df-mnf 11339  df-xr 11340  df-ltxr 11341  df-le 11342  df-sub 11536  df-neg 11537  df-div 11967  df-nn 12329  df-2 12398  df-3 12399  df-4 12400  df-5 12401  df-6 12402  df-7 12403  df-8 12404  df-9 12405  df-n0 12600  df-z 12687  df-uz 12959  df-rp 13114  df-fz 13633  df-fzo 13782  df-seq 14138  df-exp 14198  df-hash 14468  df-cj 15259  df-re 15260  df-im 15261  df-sqrt 15395  df-abs 15396  df-clim 15648  df-sum 15847  df-dvds 16416  df-prm 16840  df-even 48693  df-odd 48694  df-gbow 48816
This theorem is used by:  wtgoldbnnsum4prm  48869
  Copyright terms: Public domain W3C validator