Metamath Proof Explorer


Theorem tgoldbachgtde

Description: Lemma for tgoldbachgtd . (Contributed by Thierry Arnoux, 15-Dec-2021)

Ref Expression
Hypotheses tgoldbachgtda.o 𝑂 = { 𝑧 ∈ ℤ ∣ ¬ 2 ∥ 𝑧 }
tgoldbachgtda.n ( 𝜑𝑁𝑂 )
tgoldbachgtda.0 ( 𝜑 → ( 1 0 ↑ 2 7 ) ≤ 𝑁 )
tgoldbachgtda.h ( 𝜑𝐻 : ℕ ⟶ ( 0 [,) +∞ ) )
tgoldbachgtda.k ( 𝜑𝐾 : ℕ ⟶ ( 0 [,) +∞ ) )
tgoldbachgtda.1 ( ( 𝜑𝑚 ∈ ℕ ) → ( 𝐾𝑚 ) ≤ ( 1 . 0 7 9 9 5 5 ) )
tgoldbachgtda.2 ( ( 𝜑𝑚 ∈ ℕ ) → ( 𝐻𝑚 ) ≤ ( 1 . 4 1 4 ) )
tgoldbachgtda.3 ( 𝜑 → ( ( 0 . 0 0 0 4 2 2 4 8 ) · ( 𝑁 ↑ 2 ) ) ≤ ∫ ( 0 (,) 1 ) ( ( ( ( ( Λ ∘f · 𝐻 ) vts 𝑁 ) ‘ 𝑥 ) · ( ( ( ( Λ ∘f · 𝐾 ) vts 𝑁 ) ‘ 𝑥 ) ↑ 2 ) ) · ( exp ‘ ( ( i · ( 2 · π ) ) · ( - 𝑁 · 𝑥 ) ) ) ) d 𝑥 )
Assertion tgoldbachgtde ( 𝜑 → 0 < Σ 𝑛 ∈ ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ( ( ( Λ ‘ ( 𝑛 ‘ 0 ) ) · ( 𝐻 ‘ ( 𝑛 ‘ 0 ) ) ) · ( ( ( Λ ‘ ( 𝑛 ‘ 1 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 1 ) ) ) · ( ( Λ ‘ ( 𝑛 ‘ 2 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 2 ) ) ) ) ) )

Proof

Step Hyp Ref Expression
1 tgoldbachgtda.o 𝑂 = { 𝑧 ∈ ℤ ∣ ¬ 2 ∥ 𝑧 }
2 tgoldbachgtda.n ( 𝜑𝑁𝑂 )
3 tgoldbachgtda.0 ( 𝜑 → ( 1 0 ↑ 2 7 ) ≤ 𝑁 )
4 tgoldbachgtda.h ( 𝜑𝐻 : ℕ ⟶ ( 0 [,) +∞ ) )
5 tgoldbachgtda.k ( 𝜑𝐾 : ℕ ⟶ ( 0 [,) +∞ ) )
6 tgoldbachgtda.1 ( ( 𝜑𝑚 ∈ ℕ ) → ( 𝐾𝑚 ) ≤ ( 1 . 0 7 9 9 5 5 ) )
7 tgoldbachgtda.2 ( ( 𝜑𝑚 ∈ ℕ ) → ( 𝐻𝑚 ) ≤ ( 1 . 4 1 4 ) )
8 tgoldbachgtda.3 ( 𝜑 → ( ( 0 . 0 0 0 4 2 2 4 8 ) · ( 𝑁 ↑ 2 ) ) ≤ ∫ ( 0 (,) 1 ) ( ( ( ( ( Λ ∘f · 𝐻 ) vts 𝑁 ) ‘ 𝑥 ) · ( ( ( ( Λ ∘f · 𝐾 ) vts 𝑁 ) ‘ 𝑥 ) ↑ 2 ) ) · ( exp ‘ ( ( i · ( 2 · π ) ) · ( - 𝑁 · 𝑥 ) ) ) ) d 𝑥 )
9 1 2 3 tgoldbachgnn ( 𝜑𝑁 ∈ ℕ )
10 9 nnnn0d ( 𝜑𝑁 ∈ ℕ0 )
11 3nn0 3 ∈ ℕ0
12 11 a1i ( 𝜑 → 3 ∈ ℕ0 )
13 ssidd ( 𝜑 → ℕ ⊆ ℕ )
14 10 12 13 reprfi2 ( 𝜑 → ( ℕ ( repr ‘ 3 ) 𝑁 ) ∈ Fin )
15 diffi ( ( ℕ ( repr ‘ 3 ) 𝑁 ) ∈ Fin → ( ( ℕ ( repr ‘ 3 ) 𝑁 ) ∖ ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ) ∈ Fin )
16 14 15 syl ( 𝜑 → ( ( ℕ ( repr ‘ 3 ) 𝑁 ) ∖ ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ) ∈ Fin )
17 difssd ( 𝜑 → ( ( ℕ ( repr ‘ 3 ) 𝑁 ) ∖ ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ) ⊆ ( ℕ ( repr ‘ 3 ) 𝑁 ) )
18 17 sselda ( ( 𝜑𝑛 ∈ ( ( ℕ ( repr ‘ 3 ) 𝑁 ) ∖ ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ) ) → 𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) )
19 vmaf Λ : ℕ ⟶ ℝ
20 19 a1i ( ( 𝜑𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ) → Λ : ℕ ⟶ ℝ )
21 ssidd ( ( 𝜑𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ) → ℕ ⊆ ℕ )
22 10 nn0zd ( 𝜑𝑁 ∈ ℤ )
23 22 adantr ( ( 𝜑𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ) → 𝑁 ∈ ℤ )
24 11 a1i ( ( 𝜑𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ) → 3 ∈ ℕ0 )
25 simpr ( ( 𝜑𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ) → 𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) )
26 21 23 24 25 reprf ( ( 𝜑𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ) → 𝑛 : ( 0 ..^ 3 ) ⟶ ℕ )
27 c0ex 0 ∈ V
28 27 tpid1 0 ∈ { 0 , 1 , 2 }
29 fzo0to3tp ( 0 ..^ 3 ) = { 0 , 1 , 2 }
30 28 29 eleqtrri 0 ∈ ( 0 ..^ 3 )
31 30 a1i ( ( 𝜑𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ) → 0 ∈ ( 0 ..^ 3 ) )
32 26 31 ffvelcdmd ( ( 𝜑𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ) → ( 𝑛 ‘ 0 ) ∈ ℕ )
33 20 32 ffvelcdmd ( ( 𝜑𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ) → ( Λ ‘ ( 𝑛 ‘ 0 ) ) ∈ ℝ )
34 rge0ssre ( 0 [,) +∞ ) ⊆ ℝ
35 fss ( ( 𝐻 : ℕ ⟶ ( 0 [,) +∞ ) ∧ ( 0 [,) +∞ ) ⊆ ℝ ) → 𝐻 : ℕ ⟶ ℝ )
36 4 34 35 sylancl ( 𝜑𝐻 : ℕ ⟶ ℝ )
37 36 adantr ( ( 𝜑𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ) → 𝐻 : ℕ ⟶ ℝ )
38 37 32 ffvelcdmd ( ( 𝜑𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ) → ( 𝐻 ‘ ( 𝑛 ‘ 0 ) ) ∈ ℝ )
39 33 38 remulcld ( ( 𝜑𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ) → ( ( Λ ‘ ( 𝑛 ‘ 0 ) ) · ( 𝐻 ‘ ( 𝑛 ‘ 0 ) ) ) ∈ ℝ )
40 1eltp012 1 ∈ { 0 , 1 , 2 }
41 40 29 eleqtrri 1 ∈ ( 0 ..^ 3 )
42 41 a1i ( ( 𝜑𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ) → 1 ∈ ( 0 ..^ 3 ) )
43 26 42 ffvelcdmd ( ( 𝜑𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ) → ( 𝑛 ‘ 1 ) ∈ ℕ )
44 20 43 ffvelcdmd ( ( 𝜑𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ) → ( Λ ‘ ( 𝑛 ‘ 1 ) ) ∈ ℝ )
45 fss ( ( 𝐾 : ℕ ⟶ ( 0 [,) +∞ ) ∧ ( 0 [,) +∞ ) ⊆ ℝ ) → 𝐾 : ℕ ⟶ ℝ )
46 5 34 45 sylancl ( 𝜑𝐾 : ℕ ⟶ ℝ )
47 46 adantr ( ( 𝜑𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ) → 𝐾 : ℕ ⟶ ℝ )
48 47 43 ffvelcdmd ( ( 𝜑𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ) → ( 𝐾 ‘ ( 𝑛 ‘ 1 ) ) ∈ ℝ )
49 44 48 remulcld ( ( 𝜑𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ) → ( ( Λ ‘ ( 𝑛 ‘ 1 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 1 ) ) ) ∈ ℝ )
50 2ex 2 ∈ V
51 50 tpid3 2 ∈ { 0 , 1 , 2 }
52 51 29 eleqtrri 2 ∈ ( 0 ..^ 3 )
53 52 a1i ( ( 𝜑𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ) → 2 ∈ ( 0 ..^ 3 ) )
54 26 53 ffvelcdmd ( ( 𝜑𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ) → ( 𝑛 ‘ 2 ) ∈ ℕ )
55 20 54 ffvelcdmd ( ( 𝜑𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ) → ( Λ ‘ ( 𝑛 ‘ 2 ) ) ∈ ℝ )
56 47 54 ffvelcdmd ( ( 𝜑𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ) → ( 𝐾 ‘ ( 𝑛 ‘ 2 ) ) ∈ ℝ )
57 55 56 remulcld ( ( 𝜑𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ) → ( ( Λ ‘ ( 𝑛 ‘ 2 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 2 ) ) ) ∈ ℝ )
58 49 57 remulcld ( ( 𝜑𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ) → ( ( ( Λ ‘ ( 𝑛 ‘ 1 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 1 ) ) ) · ( ( Λ ‘ ( 𝑛 ‘ 2 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 2 ) ) ) ) ∈ ℝ )
59 39 58 remulcld ( ( 𝜑𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ) → ( ( ( Λ ‘ ( 𝑛 ‘ 0 ) ) · ( 𝐻 ‘ ( 𝑛 ‘ 0 ) ) ) · ( ( ( Λ ‘ ( 𝑛 ‘ 1 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 1 ) ) ) · ( ( Λ ‘ ( 𝑛 ‘ 2 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 2 ) ) ) ) ) ∈ ℝ )
60 18 59 syldan ( ( 𝜑𝑛 ∈ ( ( ℕ ( repr ‘ 3 ) 𝑁 ) ∖ ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ) ) → ( ( ( Λ ‘ ( 𝑛 ‘ 0 ) ) · ( 𝐻 ‘ ( 𝑛 ‘ 0 ) ) ) · ( ( ( Λ ‘ ( 𝑛 ‘ 1 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 1 ) ) ) · ( ( Λ ‘ ( 𝑛 ‘ 2 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 2 ) ) ) ) ) ∈ ℝ )
61 16 60 fsumrecl ( 𝜑 → Σ 𝑛 ∈ ( ( ℕ ( repr ‘ 3 ) 𝑁 ) ∖ ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ) ( ( ( Λ ‘ ( 𝑛 ‘ 0 ) ) · ( 𝐻 ‘ ( 𝑛 ‘ 0 ) ) ) · ( ( ( Λ ‘ ( 𝑛 ‘ 1 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 1 ) ) ) · ( ( Λ ‘ ( 𝑛 ‘ 2 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 2 ) ) ) ) ) ∈ ℝ )
62 0nn0 0 ∈ ℕ0
63 qssre ℚ ⊆ ℝ
64 4nn0 4 ∈ ℕ0
65 2nn0 2 ∈ ℕ0
66 nn0ssq 0 ⊆ ℚ
67 8nn0 8 ∈ ℕ0
68 66 67 sselii 8 ∈ ℚ
69 64 68 dp2clq 4 8 ∈ ℚ
70 65 69 dp2clq 2 4 8 ∈ ℚ
71 65 70 dp2clq 2 2 4 8 ∈ ℚ
72 64 71 dp2clq 4 2 2 4 8 ∈ ℚ
73 62 72 dp2clq 0 4 2 2 4 8 ∈ ℚ
74 62 73 dp2clq 0 0 4 2 2 4 8 ∈ ℚ
75 62 74 dp2clq 0 0 0 4 2 2 4 8 ∈ ℚ
76 63 75 sselii 0 0 0 4 2 2 4 8 ∈ ℝ
77 dpcl ( ( 0 ∈ ℕ0 0 0 0 4 2 2 4 8 ∈ ℝ ) → ( 0 . 0 0 0 4 2 2 4 8 ) ∈ ℝ )
78 62 76 77 mp2an ( 0 . 0 0 0 4 2 2 4 8 ) ∈ ℝ
79 78 a1i ( 𝜑 → ( 0 . 0 0 0 4 2 2 4 8 ) ∈ ℝ )
80 9 nnred ( 𝜑𝑁 ∈ ℝ )
81 80 resqcld ( 𝜑 → ( 𝑁 ↑ 2 ) ∈ ℝ )
82 79 81 remulcld ( 𝜑 → ( ( 0 . 0 0 0 4 2 2 4 8 ) · ( 𝑁 ↑ 2 ) ) ∈ ℝ )
83 14 59 fsumrecl ( 𝜑 → Σ 𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ( ( ( Λ ‘ ( 𝑛 ‘ 0 ) ) · ( 𝐻 ‘ ( 𝑛 ‘ 0 ) ) ) · ( ( ( Λ ‘ ( 𝑛 ‘ 1 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 1 ) ) ) · ( ( Λ ‘ ( 𝑛 ‘ 2 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 2 ) ) ) ) ) ∈ ℝ )
84 7nn0 7 ∈ ℕ0
85 11 69 dp2clq 3 4 8 ∈ ℚ
86 63 85 sselii 3 4 8 ∈ ℝ
87 dpcl ( ( 7 ∈ ℕ0 3 4 8 ∈ ℝ ) → ( 7 . 3 4 8 ) ∈ ℝ )
88 84 86 87 mp2an ( 7 . 3 4 8 ) ∈ ℝ
89 88 a1i ( 𝜑 → ( 7 . 3 4 8 ) ∈ ℝ )
90 9 nnrpd ( 𝜑𝑁 ∈ ℝ+ )
91 90 relogcld ( 𝜑 → ( log ‘ 𝑁 ) ∈ ℝ )
92 10 nn0ge0d ( 𝜑 → 0 ≤ 𝑁 )
93 80 92 resqrtcld ( 𝜑 → ( √ ‘ 𝑁 ) ∈ ℝ )
94 90 sqrtgt0d ( 𝜑 → 0 < ( √ ‘ 𝑁 ) )
95 94 gt0ne0d ( 𝜑 → ( √ ‘ 𝑁 ) ≠ 0 )
96 91 93 95 redivcld ( 𝜑 → ( ( log ‘ 𝑁 ) / ( √ ‘ 𝑁 ) ) ∈ ℝ )
97 89 96 remulcld ( 𝜑 → ( ( 7 . 3 4 8 ) · ( ( log ‘ 𝑁 ) / ( √ ‘ 𝑁 ) ) ) ∈ ℝ )
98 97 81 remulcld ( 𝜑 → ( ( ( 7 . 3 4 8 ) · ( ( log ‘ 𝑁 ) / ( √ ‘ 𝑁 ) ) ) · ( 𝑁 ↑ 2 ) ) ∈ ℝ )
99 1 9 3 4 5 6 7 hgt750leme ( 𝜑 → Σ 𝑛 ∈ ( ( ℕ ( repr ‘ 3 ) 𝑁 ) ∖ ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ) ( ( ( Λ ‘ ( 𝑛 ‘ 0 ) ) · ( 𝐻 ‘ ( 𝑛 ‘ 0 ) ) ) · ( ( ( Λ ‘ ( 𝑛 ‘ 1 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 1 ) ) ) · ( ( Λ ‘ ( 𝑛 ‘ 2 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 2 ) ) ) ) ) ≤ ( ( ( 7 . 3 4 8 ) · ( ( log ‘ 𝑁 ) / ( √ ‘ 𝑁 ) ) ) · ( 𝑁 ↑ 2 ) ) )
100 2z 2 ∈ ℤ
101 100 a1i ( 𝜑 → 2 ∈ ℤ )
102 90 101 rpexpcld ( 𝜑 → ( 𝑁 ↑ 2 ) ∈ ℝ+ )
103 hgt750lem ( ( 𝑁 ∈ ℕ0 ∧ ( 1 0 ↑ 2 7 ) ≤ 𝑁 ) → ( ( 7 . 3 4 8 ) · ( ( log ‘ 𝑁 ) / ( √ ‘ 𝑁 ) ) ) < ( 0 . 0 0 0 4 2 2 4 8 ) )
104 10 3 103 syl2anc ( 𝜑 → ( ( 7 . 3 4 8 ) · ( ( log ‘ 𝑁 ) / ( √ ‘ 𝑁 ) ) ) < ( 0 . 0 0 0 4 2 2 4 8 ) )
105 97 79 102 104 ltmul1dd ( 𝜑 → ( ( ( 7 . 3 4 8 ) · ( ( log ‘ 𝑁 ) / ( √ ‘ 𝑁 ) ) ) · ( 𝑁 ↑ 2 ) ) < ( ( 0 . 0 0 0 4 2 2 4 8 ) · ( 𝑁 ↑ 2 ) ) )
106 61 98 82 99 105 lelttrd ( 𝜑 → Σ 𝑛 ∈ ( ( ℕ ( repr ‘ 3 ) 𝑁 ) ∖ ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ) ( ( ( Λ ‘ ( 𝑛 ‘ 0 ) ) · ( 𝐻 ‘ ( 𝑛 ‘ 0 ) ) ) · ( ( ( Λ ‘ ( 𝑛 ‘ 1 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 1 ) ) ) · ( ( Λ ‘ ( 𝑛 ‘ 2 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 2 ) ) ) ) ) < ( ( 0 . 0 0 0 4 2 2 4 8 ) · ( 𝑁 ↑ 2 ) ) )
107 36 46 10 circlemethhgt ( 𝜑 → Σ 𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ( ( ( Λ ‘ ( 𝑛 ‘ 0 ) ) · ( 𝐻 ‘ ( 𝑛 ‘ 0 ) ) ) · ( ( ( Λ ‘ ( 𝑛 ‘ 1 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 1 ) ) ) · ( ( Λ ‘ ( 𝑛 ‘ 2 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 2 ) ) ) ) ) = ∫ ( 0 (,) 1 ) ( ( ( ( ( Λ ∘f · 𝐻 ) vts 𝑁 ) ‘ 𝑥 ) · ( ( ( ( Λ ∘f · 𝐾 ) vts 𝑁 ) ‘ 𝑥 ) ↑ 2 ) ) · ( exp ‘ ( ( i · ( 2 · π ) ) · ( - 𝑁 · 𝑥 ) ) ) ) d 𝑥 )
108 8 107 breqtrrd ( 𝜑 → ( ( 0 . 0 0 0 4 2 2 4 8 ) · ( 𝑁 ↑ 2 ) ) ≤ Σ 𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ( ( ( Λ ‘ ( 𝑛 ‘ 0 ) ) · ( 𝐻 ‘ ( 𝑛 ‘ 0 ) ) ) · ( ( ( Λ ‘ ( 𝑛 ‘ 1 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 1 ) ) ) · ( ( Λ ‘ ( 𝑛 ‘ 2 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 2 ) ) ) ) ) )
109 61 82 83 106 108 ltletrd ( 𝜑 → Σ 𝑛 ∈ ( ( ℕ ( repr ‘ 3 ) 𝑁 ) ∖ ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ) ( ( ( Λ ‘ ( 𝑛 ‘ 0 ) ) · ( 𝐻 ‘ ( 𝑛 ‘ 0 ) ) ) · ( ( ( Λ ‘ ( 𝑛 ‘ 1 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 1 ) ) ) · ( ( Λ ‘ ( 𝑛 ‘ 2 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 2 ) ) ) ) ) < Σ 𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ( ( ( Λ ‘ ( 𝑛 ‘ 0 ) ) · ( 𝐻 ‘ ( 𝑛 ‘ 0 ) ) ) · ( ( ( Λ ‘ ( 𝑛 ‘ 1 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 1 ) ) ) · ( ( Λ ‘ ( 𝑛 ‘ 2 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 2 ) ) ) ) ) )
110 61 83 posdifd ( 𝜑 → ( Σ 𝑛 ∈ ( ( ℕ ( repr ‘ 3 ) 𝑁 ) ∖ ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ) ( ( ( Λ ‘ ( 𝑛 ‘ 0 ) ) · ( 𝐻 ‘ ( 𝑛 ‘ 0 ) ) ) · ( ( ( Λ ‘ ( 𝑛 ‘ 1 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 1 ) ) ) · ( ( Λ ‘ ( 𝑛 ‘ 2 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 2 ) ) ) ) ) < Σ 𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ( ( ( Λ ‘ ( 𝑛 ‘ 0 ) ) · ( 𝐻 ‘ ( 𝑛 ‘ 0 ) ) ) · ( ( ( Λ ‘ ( 𝑛 ‘ 1 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 1 ) ) ) · ( ( Λ ‘ ( 𝑛 ‘ 2 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 2 ) ) ) ) ) ↔ 0 < ( Σ 𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ( ( ( Λ ‘ ( 𝑛 ‘ 0 ) ) · ( 𝐻 ‘ ( 𝑛 ‘ 0 ) ) ) · ( ( ( Λ ‘ ( 𝑛 ‘ 1 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 1 ) ) ) · ( ( Λ ‘ ( 𝑛 ‘ 2 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 2 ) ) ) ) ) − Σ 𝑛 ∈ ( ( ℕ ( repr ‘ 3 ) 𝑁 ) ∖ ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ) ( ( ( Λ ‘ ( 𝑛 ‘ 0 ) ) · ( 𝐻 ‘ ( 𝑛 ‘ 0 ) ) ) · ( ( ( Λ ‘ ( 𝑛 ‘ 1 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 1 ) ) ) · ( ( Λ ‘ ( 𝑛 ‘ 2 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 2 ) ) ) ) ) ) ) )
111 109 110 mpbid ( 𝜑 → 0 < ( Σ 𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ( ( ( Λ ‘ ( 𝑛 ‘ 0 ) ) · ( 𝐻 ‘ ( 𝑛 ‘ 0 ) ) ) · ( ( ( Λ ‘ ( 𝑛 ‘ 1 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 1 ) ) ) · ( ( Λ ‘ ( 𝑛 ‘ 2 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 2 ) ) ) ) ) − Σ 𝑛 ∈ ( ( ℕ ( repr ‘ 3 ) 𝑁 ) ∖ ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ) ( ( ( Λ ‘ ( 𝑛 ‘ 0 ) ) · ( 𝐻 ‘ ( 𝑛 ‘ 0 ) ) ) · ( ( ( Λ ‘ ( 𝑛 ‘ 1 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 1 ) ) ) · ( ( Λ ‘ ( 𝑛 ‘ 2 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 2 ) ) ) ) ) ) )
112 inss2 ( 𝑂 ∩ ℙ ) ⊆ ℙ
113 prmssnn ℙ ⊆ ℕ
114 112 113 sstri ( 𝑂 ∩ ℙ ) ⊆ ℕ
115 114 a1i ( 𝜑 → ( 𝑂 ∩ ℙ ) ⊆ ℕ )
116 13 22 12 115 reprss ( 𝜑 → ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ⊆ ( ℕ ( repr ‘ 3 ) 𝑁 ) )
117 14 116 ssfid ( 𝜑 → ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ∈ Fin )
118 116 sselda ( ( 𝜑𝑛 ∈ ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ) → 𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) )
119 59 recnd ( ( 𝜑𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ) → ( ( ( Λ ‘ ( 𝑛 ‘ 0 ) ) · ( 𝐻 ‘ ( 𝑛 ‘ 0 ) ) ) · ( ( ( Λ ‘ ( 𝑛 ‘ 1 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 1 ) ) ) · ( ( Λ ‘ ( 𝑛 ‘ 2 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 2 ) ) ) ) ) ∈ ℂ )
120 118 119 syldan ( ( 𝜑𝑛 ∈ ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ) → ( ( ( Λ ‘ ( 𝑛 ‘ 0 ) ) · ( 𝐻 ‘ ( 𝑛 ‘ 0 ) ) ) · ( ( ( Λ ‘ ( 𝑛 ‘ 1 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 1 ) ) ) · ( ( Λ ‘ ( 𝑛 ‘ 2 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 2 ) ) ) ) ) ∈ ℂ )
121 117 120 fsumcl ( 𝜑 → Σ 𝑛 ∈ ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ( ( ( Λ ‘ ( 𝑛 ‘ 0 ) ) · ( 𝐻 ‘ ( 𝑛 ‘ 0 ) ) ) · ( ( ( Λ ‘ ( 𝑛 ‘ 1 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 1 ) ) ) · ( ( Λ ‘ ( 𝑛 ‘ 2 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 2 ) ) ) ) ) ∈ ℂ )
122 61 recnd ( 𝜑 → Σ 𝑛 ∈ ( ( ℕ ( repr ‘ 3 ) 𝑁 ) ∖ ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ) ( ( ( Λ ‘ ( 𝑛 ‘ 0 ) ) · ( 𝐻 ‘ ( 𝑛 ‘ 0 ) ) ) · ( ( ( Λ ‘ ( 𝑛 ‘ 1 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 1 ) ) ) · ( ( Λ ‘ ( 𝑛 ‘ 2 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 2 ) ) ) ) ) ∈ ℂ )
123 disjdif ( ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ∩ ( ( ℕ ( repr ‘ 3 ) 𝑁 ) ∖ ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ) ) = ∅
124 123 a1i ( 𝜑 → ( ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ∩ ( ( ℕ ( repr ‘ 3 ) 𝑁 ) ∖ ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ) ) = ∅ )
125 undif ( ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ⊆ ( ℕ ( repr ‘ 3 ) 𝑁 ) ↔ ( ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ∪ ( ( ℕ ( repr ‘ 3 ) 𝑁 ) ∖ ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ) ) = ( ℕ ( repr ‘ 3 ) 𝑁 ) )
126 116 125 sylib ( 𝜑 → ( ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ∪ ( ( ℕ ( repr ‘ 3 ) 𝑁 ) ∖ ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ) ) = ( ℕ ( repr ‘ 3 ) 𝑁 ) )
127 126 eqcomd ( 𝜑 → ( ℕ ( repr ‘ 3 ) 𝑁 ) = ( ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ∪ ( ( ℕ ( repr ‘ 3 ) 𝑁 ) ∖ ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ) ) )
128 124 127 14 119 fsumsplit ( 𝜑 → Σ 𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ( ( ( Λ ‘ ( 𝑛 ‘ 0 ) ) · ( 𝐻 ‘ ( 𝑛 ‘ 0 ) ) ) · ( ( ( Λ ‘ ( 𝑛 ‘ 1 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 1 ) ) ) · ( ( Λ ‘ ( 𝑛 ‘ 2 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 2 ) ) ) ) ) = ( Σ 𝑛 ∈ ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ( ( ( Λ ‘ ( 𝑛 ‘ 0 ) ) · ( 𝐻 ‘ ( 𝑛 ‘ 0 ) ) ) · ( ( ( Λ ‘ ( 𝑛 ‘ 1 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 1 ) ) ) · ( ( Λ ‘ ( 𝑛 ‘ 2 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 2 ) ) ) ) ) + Σ 𝑛 ∈ ( ( ℕ ( repr ‘ 3 ) 𝑁 ) ∖ ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ) ( ( ( Λ ‘ ( 𝑛 ‘ 0 ) ) · ( 𝐻 ‘ ( 𝑛 ‘ 0 ) ) ) · ( ( ( Λ ‘ ( 𝑛 ‘ 1 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 1 ) ) ) · ( ( Λ ‘ ( 𝑛 ‘ 2 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 2 ) ) ) ) ) ) )
129 121 122 128 mvrraddd ( 𝜑 → ( Σ 𝑛 ∈ ( ℕ ( repr ‘ 3 ) 𝑁 ) ( ( ( Λ ‘ ( 𝑛 ‘ 0 ) ) · ( 𝐻 ‘ ( 𝑛 ‘ 0 ) ) ) · ( ( ( Λ ‘ ( 𝑛 ‘ 1 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 1 ) ) ) · ( ( Λ ‘ ( 𝑛 ‘ 2 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 2 ) ) ) ) ) − Σ 𝑛 ∈ ( ( ℕ ( repr ‘ 3 ) 𝑁 ) ∖ ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ) ( ( ( Λ ‘ ( 𝑛 ‘ 0 ) ) · ( 𝐻 ‘ ( 𝑛 ‘ 0 ) ) ) · ( ( ( Λ ‘ ( 𝑛 ‘ 1 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 1 ) ) ) · ( ( Λ ‘ ( 𝑛 ‘ 2 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 2 ) ) ) ) ) ) = Σ 𝑛 ∈ ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ( ( ( Λ ‘ ( 𝑛 ‘ 0 ) ) · ( 𝐻 ‘ ( 𝑛 ‘ 0 ) ) ) · ( ( ( Λ ‘ ( 𝑛 ‘ 1 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 1 ) ) ) · ( ( Λ ‘ ( 𝑛 ‘ 2 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 2 ) ) ) ) ) )
130 111 129 breqtrd ( 𝜑 → 0 < Σ 𝑛 ∈ ( ( 𝑂 ∩ ℙ ) ( repr ‘ 3 ) 𝑁 ) ( ( ( Λ ‘ ( 𝑛 ‘ 0 ) ) · ( 𝐻 ‘ ( 𝑛 ‘ 0 ) ) ) · ( ( ( Λ ‘ ( 𝑛 ‘ 1 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 1 ) ) ) · ( ( Λ ‘ ( 𝑛 ‘ 2 ) ) · ( 𝐾 ‘ ( 𝑛 ‘ 2 ) ) ) ) ) )