Metamath Proof Explorer


Theorem gausslemma2dlem1a

Description: Lemma for gausslemma2dlem1 . (Contributed by AV, 1-Jul-2021)

Ref Expression
Hypotheses gausslemma2d.p ⊢ φ → P ∈ ℙ ∖ 2
gausslemma2d.h ⊢ H = P − 1 2
gausslemma2d.r ⊢ R = x ∈ 1 … H ⟼ if x ⋅ 2 < P 2 x ⋅ 2 P − x ⋅ 2
Assertion gausslemma2dlem1a ⊢ φ → ran ⁡ R = 1 … H

Proof

Step Hyp Ref Expression
1 gausslemma2d.p ⊢ φ → P ∈ ℙ ∖ 2
2 gausslemma2d.h ⊢ H = P − 1 2
3 gausslemma2d.r ⊢ R = x ∈ 1 … H ⟼ if x ⋅ 2 < P 2 x ⋅ 2 P − x ⋅ 2
4 3 elrnmpt ⊢ y ∈ V → y ∈ ran ⁡ R ↔ ∃ x ∈ 1 … H y = if x ⋅ 2 < P 2 x ⋅ 2 P − x ⋅ 2
5 4 elv ⊢ y ∈ ran ⁡ R ↔ ∃ x ∈ 1 … H y = if x ⋅ 2 < P 2 x ⋅ 2 P − x ⋅ 2
6 iftrue ⊢ x ⋅ 2 < P 2 → if x ⋅ 2 < P 2 x ⋅ 2 P − x ⋅ 2 = x ⋅ 2
7 6 eqeq2d ⊢ x ⋅ 2 < P 2 → y = if x ⋅ 2 < P 2 x ⋅ 2 P − x ⋅ 2 ↔ y = x ⋅ 2
8 7 adantr ⊢ x ⋅ 2 < P 2 ∧ φ ∧ x ∈ 1 … H → y = if x ⋅ 2 < P 2 x ⋅ 2 P − x ⋅ 2 ↔ y = x ⋅ 2
9 elfz1b ⊢ x ∈ 1 … H ↔ x ∈ ℕ ∧ H ∈ ℕ ∧ x ≤ H
10 id ⊢ x ∈ ℕ → x ∈ ℕ
11 2nn ⊢ 2 ∈ ℕ
12 11 a1i ⊢ x ∈ ℕ → 2 ∈ ℕ
13 10 12 nnmulcld ⊢ x ∈ ℕ → x ⋅ 2 ∈ ℕ
14 13 3ad2ant1 ⊢ x ∈ ℕ ∧ H ∈ ℕ ∧ x ≤ H → x ⋅ 2 ∈ ℕ
15 14 3ad2ant1 ⊢ x ∈ ℕ ∧ H ∈ ℕ ∧ x ≤ H ∧ φ ∧ x ⋅ 2 < P 2 → x ⋅ 2 ∈ ℕ
16 2 eleq1i ⊢ H ∈ ℕ ↔ P − 1 2 ∈ ℕ
17 16 biimpi ⊢ H ∈ ℕ → P − 1 2 ∈ ℕ
18 17 3ad2ant2 ⊢ x ∈ ℕ ∧ H ∈ ℕ ∧ x ≤ H → P − 1 2 ∈ ℕ
19 18 3ad2ant1 ⊢ x ∈ ℕ ∧ H ∈ ℕ ∧ x ≤ H ∧ φ ∧ x ⋅ 2 < P 2 → P − 1 2 ∈ ℕ
20 nnoddn2prm ⊢ P ∈ ℙ ∖ 2 → P ∈ ℕ ∧ ¬ 2 ∥ P
21 nnz ⊢ P ∈ ℕ → P ∈ ℤ
22 21 anim1i ⊢ P ∈ ℕ ∧ ¬ 2 ∥ P → P ∈ ℤ ∧ ¬ 2 ∥ P
23 20 22 syl ⊢ P ∈ ℙ ∖ 2 → P ∈ ℤ ∧ ¬ 2 ∥ P
24 nnz ⊢ x ∈ ℕ → x ∈ ℤ
25 2z ⊢ 2 ∈ ℤ
26 25 a1i ⊢ x ∈ ℕ → 2 ∈ ℤ
27 24 26 zmulcld ⊢ x ∈ ℕ → x ⋅ 2 ∈ ℤ
28 27 3ad2ant1 ⊢ x ∈ ℕ ∧ H ∈ ℕ ∧ x ≤ H → x ⋅ 2 ∈ ℤ
29 23 28 anim12i ⊢ P ∈ ℙ ∖ 2 ∧ x ∈ ℕ ∧ H ∈ ℕ ∧ x ≤ H → P ∈ ℤ ∧ ¬ 2 ∥ P ∧ x ⋅ 2 ∈ ℤ
30 df-3an ⊢ P ∈ ℤ ∧ ¬ 2 ∥ P ∧ x ⋅ 2 ∈ ℤ ↔ P ∈ ℤ ∧ ¬ 2 ∥ P ∧ x ⋅ 2 ∈ ℤ
31 29 30 sylibr ⊢ P ∈ ℙ ∖ 2 ∧ x ∈ ℕ ∧ H ∈ ℕ ∧ x ≤ H → P ∈ ℤ ∧ ¬ 2 ∥ P ∧ x ⋅ 2 ∈ ℤ
32 31 ex ⊢ P ∈ ℙ ∖ 2 → x ∈ ℕ ∧ H ∈ ℕ ∧ x ≤ H → P ∈ ℤ ∧ ¬ 2 ∥ P ∧ x ⋅ 2 ∈ ℤ
33 1 32 syl ⊢ φ → x ∈ ℕ ∧ H ∈ ℕ ∧ x ≤ H → P ∈ ℤ ∧ ¬ 2 ∥ P ∧ x ⋅ 2 ∈ ℤ
34 33 impcom ⊢ x ∈ ℕ ∧ H ∈ ℕ ∧ x ≤ H ∧ φ → P ∈ ℤ ∧ ¬ 2 ∥ P ∧ x ⋅ 2 ∈ ℤ
35 ltoddhalfle ⊢ P ∈ ℤ ∧ ¬ 2 ∥ P ∧ x ⋅ 2 ∈ ℤ → x ⋅ 2 < P 2 ↔ x ⋅ 2 ≤ P − 1 2
36 34 35 syl ⊢ x ∈ ℕ ∧ H ∈ ℕ ∧ x ≤ H ∧ φ → x ⋅ 2 < P 2 ↔ x ⋅ 2 ≤ P − 1 2
37 36 biimp3a ⊢ x ∈ ℕ ∧ H ∈ ℕ ∧ x ≤ H ∧ φ ∧ x ⋅ 2 < P 2 → x ⋅ 2 ≤ P − 1 2
38 15 19 37 3jca ⊢ x ∈ ℕ ∧ H ∈ ℕ ∧ x ≤ H ∧ φ ∧ x ⋅ 2 < P 2 → x ⋅ 2 ∈ ℕ ∧ P − 1 2 ∈ ℕ ∧ x ⋅ 2 ≤ P − 1 2
39 38 3exp ⊢ x ∈ ℕ ∧ H ∈ ℕ ∧ x ≤ H → φ → x ⋅ 2 < P 2 → x ⋅ 2 ∈ ℕ ∧ P − 1 2 ∈ ℕ ∧ x ⋅ 2 ≤ P − 1 2
40 9 39 sylbi ⊢ x ∈ 1 … H → φ → x ⋅ 2 < P 2 → x ⋅ 2 ∈ ℕ ∧ P − 1 2 ∈ ℕ ∧ x ⋅ 2 ≤ P − 1 2
41 40 impcom ⊢ φ ∧ x ∈ 1 … H → x ⋅ 2 < P 2 → x ⋅ 2 ∈ ℕ ∧ P − 1 2 ∈ ℕ ∧ x ⋅ 2 ≤ P − 1 2
42 41 impcom ⊢ x ⋅ 2 < P 2 ∧ φ ∧ x ∈ 1 … H → x ⋅ 2 ∈ ℕ ∧ P − 1 2 ∈ ℕ ∧ x ⋅ 2 ≤ P − 1 2
43 2 oveq2i ⊢ 1 … H = 1 … P − 1 2
44 43 eleq2i ⊢ x ⋅ 2 ∈ 1 … H ↔ x ⋅ 2 ∈ 1 … P − 1 2
45 elfz1b ⊢ x ⋅ 2 ∈ 1 … P − 1 2 ↔ x ⋅ 2 ∈ ℕ ∧ P − 1 2 ∈ ℕ ∧ x ⋅ 2 ≤ P − 1 2
46 44 45 bitri ⊢ x ⋅ 2 ∈ 1 … H ↔ x ⋅ 2 ∈ ℕ ∧ P − 1 2 ∈ ℕ ∧ x ⋅ 2 ≤ P − 1 2
47 42 46 sylibr ⊢ x ⋅ 2 < P 2 ∧ φ ∧ x ∈ 1 … H → x ⋅ 2 ∈ 1 … H
48 eleq1 ⊢ y = x ⋅ 2 → y ∈ 1 … H ↔ x ⋅ 2 ∈ 1 … H
49 47 48 syl5ibrcom ⊢ x ⋅ 2 < P 2 ∧ φ ∧ x ∈ 1 … H → y = x ⋅ 2 → y ∈ 1 … H
50 8 49 sylbid ⊢ x ⋅ 2 < P 2 ∧ φ ∧ x ∈ 1 … H → y = if x ⋅ 2 < P 2 x ⋅ 2 P − x ⋅ 2 → y ∈ 1 … H
51 iffalse ⊢ ¬ x ⋅ 2 < P 2 → if x ⋅ 2 < P 2 x ⋅ 2 P − x ⋅ 2 = P − x ⋅ 2
52 51 eqeq2d ⊢ ¬ x ⋅ 2 < P 2 → y = if x ⋅ 2 < P 2 x ⋅ 2 P − x ⋅ 2 ↔ y = P − x ⋅ 2
53 52 adantr ⊢ ¬ x ⋅ 2 < P 2 ∧ φ ∧ x ∈ 1 … H → y = if x ⋅ 2 < P 2 x ⋅ 2 P − x ⋅ 2 ↔ y = P − x ⋅ 2
54 eldifi ⊢ P ∈ ℙ ∖ 2 → P ∈ ℙ
55 prmz ⊢ P ∈ ℙ → P ∈ ℤ
56 1 54 55 3syl ⊢ φ → P ∈ ℤ
57 56 ad2antrl ⊢ ¬ x ⋅ 2 < P 2 ∧ φ ∧ x ∈ 1 … H → P ∈ ℤ
58 elfzelz ⊢ x ∈ 1 … H → x ∈ ℤ
59 25 a1i ⊢ x ∈ 1 … H → 2 ∈ ℤ
60 58 59 zmulcld ⊢ x ∈ 1 … H → x ⋅ 2 ∈ ℤ
61 60 ad2antll ⊢ ¬ x ⋅ 2 < P 2 ∧ φ ∧ x ∈ 1 … H → x ⋅ 2 ∈ ℤ
62 57 61 zsubcld ⊢ ¬ x ⋅ 2 < P 2 ∧ φ ∧ x ∈ 1 … H → P − x ⋅ 2 ∈ ℤ
63 55 zred ⊢ P ∈ ℙ → P ∈ ℝ
64 2 breq2i ⊢ x ≤ H ↔ x ≤ P − 1 2
65 nnre ⊢ x ∈ ℕ → x ∈ ℝ
66 65 adantr ⊢ x ∈ ℕ ∧ P ∈ ℝ → x ∈ ℝ
67 peano2rem ⊢ P ∈ ℝ → P − 1 ∈ ℝ
68 67 adantl ⊢ x ∈ ℕ ∧ P ∈ ℝ → P − 1 ∈ ℝ
69 2re ⊢ 2 ∈ ℝ
70 2pos ⊢ 0 < 2
71 69 70 pm3.2i ⊢ 2 ∈ ℝ ∧ 0 < 2
72 71 a1i ⊢ x ∈ ℕ ∧ P ∈ ℝ → 2 ∈ ℝ ∧ 0 < 2
73 lemuldiv ⊢ x ∈ ℝ ∧ P − 1 ∈ ℝ ∧ 2 ∈ ℝ ∧ 0 < 2 → x ⋅ 2 ≤ P − 1 ↔ x ≤ P − 1 2
74 66 68 72 73 syl3anc ⊢ x ∈ ℕ ∧ P ∈ ℝ → x ⋅ 2 ≤ P − 1 ↔ x ≤ P − 1 2
75 64 74 bitr4id ⊢ x ∈ ℕ ∧ P ∈ ℝ → x ≤ H ↔ x ⋅ 2 ≤ P − 1
76 13 nnred ⊢ x ∈ ℕ → x ⋅ 2 ∈ ℝ
77 76 adantr ⊢ x ∈ ℕ ∧ P ∈ ℝ → x ⋅ 2 ∈ ℝ
78 simpr ⊢ x ∈ ℕ ∧ P ∈ ℝ → P ∈ ℝ
79 77 68 78 lesub2d ⊢ x ∈ ℕ ∧ P ∈ ℝ → x ⋅ 2 ≤ P − 1 ↔ P − P − 1 ≤ P − x ⋅ 2
80 recn ⊢ P ∈ ℝ → P ∈ ℂ
81 1cnd ⊢ P ∈ ℝ → 1 ∈ ℂ
82 80 81 nncand ⊢ P ∈ ℝ → P − P − 1 = 1
83 82 adantl ⊢ x ∈ ℕ ∧ P ∈ ℝ → P − P − 1 = 1
84 83 breq1d ⊢ x ∈ ℕ ∧ P ∈ ℝ → P − P − 1 ≤ P − x ⋅ 2 ↔ 1 ≤ P − x ⋅ 2
85 84 biimpd ⊢ x ∈ ℕ ∧ P ∈ ℝ → P − P − 1 ≤ P − x ⋅ 2 → 1 ≤ P − x ⋅ 2
86 79 85 sylbid ⊢ x ∈ ℕ ∧ P ∈ ℝ → x ⋅ 2 ≤ P − 1 → 1 ≤ P − x ⋅ 2
87 75 86 sylbid ⊢ x ∈ ℕ ∧ P ∈ ℝ → x ≤ H → 1 ≤ P − x ⋅ 2
88 87 impancom ⊢ x ∈ ℕ ∧ x ≤ H → P ∈ ℝ → 1 ≤ P − x ⋅ 2
89 88 3adant2 ⊢ x ∈ ℕ ∧ H ∈ ℕ ∧ x ≤ H → P ∈ ℝ → 1 ≤ P − x ⋅ 2
90 9 89 sylbi ⊢ x ∈ 1 … H → P ∈ ℝ → 1 ≤ P − x ⋅ 2
91 90 com12 ⊢ P ∈ ℝ → x ∈ 1 … H → 1 ≤ P − x ⋅ 2
92 1 54 63 91 4syl ⊢ φ → x ∈ 1 … H → 1 ≤ P − x ⋅ 2
93 92 imp ⊢ φ ∧ x ∈ 1 … H → 1 ≤ P − x ⋅ 2
94 93 adantl ⊢ ¬ x ⋅ 2 < P 2 ∧ φ ∧ x ∈ 1 … H → 1 ≤ P − x ⋅ 2
95 elnnz1 ⊢ P − x ⋅ 2 ∈ ℕ ↔ P − x ⋅ 2 ∈ ℤ ∧ 1 ≤ P − x ⋅ 2
96 62 94 95 sylanbrc ⊢ ¬ x ⋅ 2 < P 2 ∧ φ ∧ x ∈ 1 … H → P − x ⋅ 2 ∈ ℕ
97 9 simp2bi ⊢ x ∈ 1 … H → H ∈ ℕ
98 97 ad2antll ⊢ ¬ x ⋅ 2 < P 2 ∧ φ ∧ x ∈ 1 … H → H ∈ ℕ
99 nnre ⊢ P ∈ ℕ → P ∈ ℝ
100 99 rehalfcld ⊢ P ∈ ℕ → P 2 ∈ ℝ
101 100 adantr ⊢ P ∈ ℕ ∧ ¬ 2 ∥ P → P 2 ∈ ℝ
102 60 zred ⊢ x ∈ 1 … H → x ⋅ 2 ∈ ℝ
103 lenlt ⊢ P 2 ∈ ℝ ∧ x ⋅ 2 ∈ ℝ → P 2 ≤ x ⋅ 2 ↔ ¬ x ⋅ 2 < P 2
104 101 102 103 syl2an ⊢ P ∈ ℕ ∧ ¬ 2 ∥ P ∧ x ∈ 1 … H → P 2 ≤ x ⋅ 2 ↔ ¬ x ⋅ 2 < P 2
105 22 60 anim12i ⊢ P ∈ ℕ ∧ ¬ 2 ∥ P ∧ x ∈ 1 … H → P ∈ ℤ ∧ ¬ 2 ∥ P ∧ x ⋅ 2 ∈ ℤ
106 105 30 sylibr ⊢ P ∈ ℕ ∧ ¬ 2 ∥ P ∧ x ∈ 1 … H → P ∈ ℤ ∧ ¬ 2 ∥ P ∧ x ⋅ 2 ∈ ℤ
107 halfleoddlt ⊢ P ∈ ℤ ∧ ¬ 2 ∥ P ∧ x ⋅ 2 ∈ ℤ → P 2 ≤ x ⋅ 2 ↔ P 2 < x ⋅ 2
108 106 107 syl ⊢ P ∈ ℕ ∧ ¬ 2 ∥ P ∧ x ∈ 1 … H → P 2 ≤ x ⋅ 2 ↔ P 2 < x ⋅ 2
109 108 biimpa ⊢ P ∈ ℕ ∧ ¬ 2 ∥ P ∧ x ∈ 1 … H ∧ P 2 ≤ x ⋅ 2 → P 2 < x ⋅ 2
110 nncn ⊢ P ∈ ℕ → P ∈ ℂ
111 subhalfhalf ⊢ P ∈ ℂ → P − P 2 = P 2
112 110 111 syl ⊢ P ∈ ℕ → P − P 2 = P 2
113 112 breq1d ⊢ P ∈ ℕ → P − P 2 < x ⋅ 2 ↔ P 2 < x ⋅ 2
114 113 ad3antrrr ⊢ P ∈ ℕ ∧ ¬ 2 ∥ P ∧ x ∈ 1 … H ∧ P 2 ≤ x ⋅ 2 → P − P 2 < x ⋅ 2 ↔ P 2 < x ⋅ 2
115 109 114 mpbird ⊢ P ∈ ℕ ∧ ¬ 2 ∥ P ∧ x ∈ 1 … H ∧ P 2 ≤ x ⋅ 2 → P − P 2 < x ⋅ 2
116 99 ad2antrr ⊢ P ∈ ℕ ∧ ¬ 2 ∥ P ∧ x ∈ 1 … H → P ∈ ℝ
117 100 ad2antrr ⊢ P ∈ ℕ ∧ ¬ 2 ∥ P ∧ x ∈ 1 … H → P 2 ∈ ℝ
118 102 adantl ⊢ P ∈ ℕ ∧ ¬ 2 ∥ P ∧ x ∈ 1 … H → x ⋅ 2 ∈ ℝ
119 116 117 118 3jca ⊢ P ∈ ℕ ∧ ¬ 2 ∥ P ∧ x ∈ 1 … H → P ∈ ℝ ∧ P 2 ∈ ℝ ∧ x ⋅ 2 ∈ ℝ
120 119 adantr ⊢ P ∈ ℕ ∧ ¬ 2 ∥ P ∧ x ∈ 1 … H ∧ P 2 ≤ x ⋅ 2 → P ∈ ℝ ∧ P 2 ∈ ℝ ∧ x ⋅ 2 ∈ ℝ
121 ltsub23 ⊢ P ∈ ℝ ∧ P 2 ∈ ℝ ∧ x ⋅ 2 ∈ ℝ → P − P 2 < x ⋅ 2 ↔ P − x ⋅ 2 < P 2
122 120 121 syl ⊢ P ∈ ℕ ∧ ¬ 2 ∥ P ∧ x ∈ 1 … H ∧ P 2 ≤ x ⋅ 2 → P − P 2 < x ⋅ 2 ↔ P − x ⋅ 2 < P 2
123 115 122 mpbid ⊢ P ∈ ℕ ∧ ¬ 2 ∥ P ∧ x ∈ 1 … H ∧ P 2 ≤ x ⋅ 2 → P − x ⋅ 2 < P 2
124 21 ad2antrr ⊢ P ∈ ℕ ∧ ¬ 2 ∥ P ∧ x ∈ 1 … H → P ∈ ℤ
125 simplr ⊢ P ∈ ℕ ∧ ¬ 2 ∥ P ∧ x ∈ 1 … H → ¬ 2 ∥ P
126 60 adantl ⊢ P ∈ ℕ ∧ ¬ 2 ∥ P ∧ x ∈ 1 … H → x ⋅ 2 ∈ ℤ
127 124 126 zsubcld ⊢ P ∈ ℕ ∧ ¬ 2 ∥ P ∧ x ∈ 1 … H → P − x ⋅ 2 ∈ ℤ
128 124 125 127 3jca ⊢ P ∈ ℕ ∧ ¬ 2 ∥ P ∧ x ∈ 1 … H → P ∈ ℤ ∧ ¬ 2 ∥ P ∧ P − x ⋅ 2 ∈ ℤ
129 128 adantr ⊢ P ∈ ℕ ∧ ¬ 2 ∥ P ∧ x ∈ 1 … H ∧ P 2 ≤ x ⋅ 2 → P ∈ ℤ ∧ ¬ 2 ∥ P ∧ P − x ⋅ 2 ∈ ℤ
130 ltoddhalfle ⊢ P ∈ ℤ ∧ ¬ 2 ∥ P ∧ P − x ⋅ 2 ∈ ℤ → P − x ⋅ 2 < P 2 ↔ P − x ⋅ 2 ≤ P − 1 2
131 129 130 syl ⊢ P ∈ ℕ ∧ ¬ 2 ∥ P ∧ x ∈ 1 … H ∧ P 2 ≤ x ⋅ 2 → P − x ⋅ 2 < P 2 ↔ P − x ⋅ 2 ≤ P − 1 2
132 123 131 mpbid ⊢ P ∈ ℕ ∧ ¬ 2 ∥ P ∧ x ∈ 1 … H ∧ P 2 ≤ x ⋅ 2 → P − x ⋅ 2 ≤ P − 1 2
133 132 ex ⊢ P ∈ ℕ ∧ ¬ 2 ∥ P ∧ x ∈ 1 … H → P 2 ≤ x ⋅ 2 → P − x ⋅ 2 ≤ P − 1 2
134 2 breq2i ⊢ P − x ⋅ 2 ≤ H ↔ P − x ⋅ 2 ≤ P − 1 2
135 133 134 imbitrrdi ⊢ P ∈ ℕ ∧ ¬ 2 ∥ P ∧ x ∈ 1 … H → P 2 ≤ x ⋅ 2 → P − x ⋅ 2 ≤ H
136 104 135 sylbird ⊢ P ∈ ℕ ∧ ¬ 2 ∥ P ∧ x ∈ 1 … H → ¬ x ⋅ 2 < P 2 → P − x ⋅ 2 ≤ H
137 136 ex ⊢ P ∈ ℕ ∧ ¬ 2 ∥ P → x ∈ 1 … H → ¬ x ⋅ 2 < P 2 → P − x ⋅ 2 ≤ H
138 1 20 137 3syl ⊢ φ → x ∈ 1 … H → ¬ x ⋅ 2 < P 2 → P − x ⋅ 2 ≤ H
139 138 imp ⊢ φ ∧ x ∈ 1 … H → ¬ x ⋅ 2 < P 2 → P − x ⋅ 2 ≤ H
140 139 impcom ⊢ ¬ x ⋅ 2 < P 2 ∧ φ ∧ x ∈ 1 … H → P − x ⋅ 2 ≤ H
141 elfz1b ⊢ P − x ⋅ 2 ∈ 1 … H ↔ P − x ⋅ 2 ∈ ℕ ∧ H ∈ ℕ ∧ P − x ⋅ 2 ≤ H
142 96 98 140 141 syl3anbrc ⊢ ¬ x ⋅ 2 < P 2 ∧ φ ∧ x ∈ 1 … H → P − x ⋅ 2 ∈ 1 … H
143 eleq1 ⊢ y = P − x ⋅ 2 → y ∈ 1 … H ↔ P − x ⋅ 2 ∈ 1 … H
144 142 143 syl5ibrcom ⊢ ¬ x ⋅ 2 < P 2 ∧ φ ∧ x ∈ 1 … H → y = P − x ⋅ 2 → y ∈ 1 … H
145 53 144 sylbid ⊢ ¬ x ⋅ 2 < P 2 ∧ φ ∧ x ∈ 1 … H → y = if x ⋅ 2 < P 2 x ⋅ 2 P − x ⋅ 2 → y ∈ 1 … H
146 50 145 pm2.61ian ⊢ φ ∧ x ∈ 1 … H → y = if x ⋅ 2 < P 2 x ⋅ 2 P − x ⋅ 2 → y ∈ 1 … H
147 146 rexlimdva ⊢ φ → ∃ x ∈ 1 … H y = if x ⋅ 2 < P 2 x ⋅ 2 P − x ⋅ 2 → y ∈ 1 … H
148 elfz1b ⊢ y ∈ 1 … H ↔ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H
149 simp1 ⊢ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → y ∈ ℕ
150 simpl ⊢ 2 ∥ y ∧ φ → 2 ∥ y
151 nnehalf ⊢ y ∈ ℕ ∧ 2 ∥ y → y 2 ∈ ℕ
152 149 150 151 syl2anr ⊢ 2 ∥ y ∧ φ ∧ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → y 2 ∈ ℕ
153 simpr2 ⊢ 2 ∥ y ∧ φ ∧ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → H ∈ ℕ
154 nnre ⊢ y ∈ ℕ → y ∈ ℝ
155 154 ad2antrr ⊢ y ∈ ℕ ∧ H ∈ ℕ ∧ 2 ∥ y ∧ φ → y ∈ ℝ
156 nnrp ⊢ H ∈ ℕ → H ∈ ℝ +
157 156 adantl ⊢ y ∈ ℕ ∧ H ∈ ℕ → H ∈ ℝ +
158 157 adantr ⊢ y ∈ ℕ ∧ H ∈ ℕ ∧ 2 ∥ y ∧ φ → H ∈ ℝ +
159 2rp ⊢ 2 ∈ ℝ +
160 1le2 ⊢ 1 ≤ 2
161 159 160 pm3.2i ⊢ 2 ∈ ℝ + ∧ 1 ≤ 2
162 161 a1i ⊢ y ∈ ℕ ∧ H ∈ ℕ ∧ 2 ∥ y ∧ φ → 2 ∈ ℝ + ∧ 1 ≤ 2
163 ledivge1le ⊢ y ∈ ℝ ∧ H ∈ ℝ + ∧ 2 ∈ ℝ + ∧ 1 ≤ 2 → y ≤ H → y 2 ≤ H
164 155 158 162 163 syl3anc ⊢ y ∈ ℕ ∧ H ∈ ℕ ∧ 2 ∥ y ∧ φ → y ≤ H → y 2 ≤ H
165 164 ex ⊢ y ∈ ℕ ∧ H ∈ ℕ → 2 ∥ y ∧ φ → y ≤ H → y 2 ≤ H
166 165 com23 ⊢ y ∈ ℕ ∧ H ∈ ℕ → y ≤ H → 2 ∥ y ∧ φ → y 2 ≤ H
167 166 3impia ⊢ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → 2 ∥ y ∧ φ → y 2 ≤ H
168 167 impcom ⊢ 2 ∥ y ∧ φ ∧ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → y 2 ≤ H
169 152 153 168 3jca ⊢ 2 ∥ y ∧ φ ∧ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → y 2 ∈ ℕ ∧ H ∈ ℕ ∧ y 2 ≤ H
170 169 ex ⊢ 2 ∥ y ∧ φ → y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → y 2 ∈ ℕ ∧ H ∈ ℕ ∧ y 2 ≤ H
171 148 170 biimtrid ⊢ 2 ∥ y ∧ φ → y ∈ 1 … H → y 2 ∈ ℕ ∧ H ∈ ℕ ∧ y 2 ≤ H
172 171 3impia ⊢ 2 ∥ y ∧ φ ∧ y ∈ 1 … H → y 2 ∈ ℕ ∧ H ∈ ℕ ∧ y 2 ≤ H
173 elfz1b ⊢ y 2 ∈ 1 … H ↔ y 2 ∈ ℕ ∧ H ∈ ℕ ∧ y 2 ≤ H
174 172 173 sylibr ⊢ 2 ∥ y ∧ φ ∧ y ∈ 1 … H → y 2 ∈ 1 … H
175 oveq1 ⊢ x = y 2 → x ⋅ 2 = y 2 ⋅ 2
176 175 breq1d ⊢ x = y 2 → x ⋅ 2 < P 2 ↔ y 2 ⋅ 2 < P 2
177 175 oveq2d ⊢ x = y 2 → P − x ⋅ 2 = P − y 2 ⋅ 2
178 176 175 177 ifbieq12d ⊢ x = y 2 → if x ⋅ 2 < P 2 x ⋅ 2 P − x ⋅ 2 = if y 2 ⋅ 2 < P 2 y 2 ⋅ 2 P − y 2 ⋅ 2
179 178 eqeq2d ⊢ x = y 2 → y = if x ⋅ 2 < P 2 x ⋅ 2 P − x ⋅ 2 ↔ y = if y 2 ⋅ 2 < P 2 y 2 ⋅ 2 P − y 2 ⋅ 2
180 179 adantl ⊢ 2 ∥ y ∧ φ ∧ y ∈ 1 … H ∧ x = y 2 → y = if x ⋅ 2 < P 2 x ⋅ 2 P − x ⋅ 2 ↔ y = if y 2 ⋅ 2 < P 2 y 2 ⋅ 2 P − y 2 ⋅ 2
181 elfzelz ⊢ y ∈ 1 … H → y ∈ ℤ
182 181 zcnd ⊢ y ∈ 1 … H → y ∈ ℂ
183 182 3ad2ant3 ⊢ 2 ∥ y ∧ φ ∧ y ∈ 1 … H → y ∈ ℂ
184 2cnd ⊢ 2 ∥ y ∧ φ ∧ y ∈ 1 … H → 2 ∈ ℂ
185 2ne0 ⊢ 2 ≠ 0
186 185 a1i ⊢ 2 ∥ y ∧ φ ∧ y ∈ 1 … H → 2 ≠ 0
187 183 184 186 divcan1d ⊢ 2 ∥ y ∧ φ ∧ y ∈ 1 … H → y 2 ⋅ 2 = y
188 2 breq2i ⊢ y ≤ H ↔ y ≤ P − 1 2
189 nnz ⊢ y ∈ ℕ → y ∈ ℤ
190 1 20 22 3syl ⊢ φ → P ∈ ℤ ∧ ¬ 2 ∥ P
191 190 adantl ⊢ 2 ∥ y ∧ φ → P ∈ ℤ ∧ ¬ 2 ∥ P
192 189 191 anim12ci ⊢ y ∈ ℕ ∧ 2 ∥ y ∧ φ → P ∈ ℤ ∧ ¬ 2 ∥ P ∧ y ∈ ℤ
193 df-3an ⊢ P ∈ ℤ ∧ ¬ 2 ∥ P ∧ y ∈ ℤ ↔ P ∈ ℤ ∧ ¬ 2 ∥ P ∧ y ∈ ℤ
194 192 193 sylibr ⊢ y ∈ ℕ ∧ 2 ∥ y ∧ φ → P ∈ ℤ ∧ ¬ 2 ∥ P ∧ y ∈ ℤ
195 ltoddhalfle ⊢ P ∈ ℤ ∧ ¬ 2 ∥ P ∧ y ∈ ℤ → y < P 2 ↔ y ≤ P − 1 2
196 194 195 syl ⊢ y ∈ ℕ ∧ 2 ∥ y ∧ φ → y < P 2 ↔ y ≤ P − 1 2
197 196 exbiri ⊢ y ∈ ℕ → 2 ∥ y ∧ φ → y ≤ P − 1 2 → y < P 2
198 197 com23 ⊢ y ∈ ℕ → y ≤ P − 1 2 → 2 ∥ y ∧ φ → y < P 2
199 188 198 biimtrid ⊢ y ∈ ℕ → y ≤ H → 2 ∥ y ∧ φ → y < P 2
200 199 a1d ⊢ y ∈ ℕ → H ∈ ℕ → y ≤ H → 2 ∥ y ∧ φ → y < P 2
201 200 3imp ⊢ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → 2 ∥ y ∧ φ → y < P 2
202 148 201 sylbi ⊢ y ∈ 1 … H → 2 ∥ y ∧ φ → y < P 2
203 202 com12 ⊢ 2 ∥ y ∧ φ → y ∈ 1 … H → y < P 2
204 203 3impia ⊢ 2 ∥ y ∧ φ ∧ y ∈ 1 … H → y < P 2
205 187 204 eqbrtrd ⊢ 2 ∥ y ∧ φ ∧ y ∈ 1 … H → y 2 ⋅ 2 < P 2
206 205 iftrued ⊢ 2 ∥ y ∧ φ ∧ y ∈ 1 … H → if y 2 ⋅ 2 < P 2 y 2 ⋅ 2 P − y 2 ⋅ 2 = y 2 ⋅ 2
207 206 187 eqtr2d ⊢ 2 ∥ y ∧ φ ∧ y ∈ 1 … H → y = if y 2 ⋅ 2 < P 2 y 2 ⋅ 2 P − y 2 ⋅ 2
208 174 180 207 rspcedvd ⊢ 2 ∥ y ∧ φ ∧ y ∈ 1 … H → ∃ x ∈ 1 … H y = if x ⋅ 2 < P 2 x ⋅ 2 P − x ⋅ 2
209 208 3exp ⊢ 2 ∥ y → φ → y ∈ 1 … H → ∃ x ∈ 1 … H y = if x ⋅ 2 < P 2 x ⋅ 2 P − x ⋅ 2
210 54 55 syl ⊢ P ∈ ℙ ∖ 2 → P ∈ ℤ
211 210 ad2antrr ⊢ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y ∧ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → P ∈ ℤ
212 189 3ad2ant1 ⊢ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → y ∈ ℤ
213 212 adantl ⊢ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y ∧ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → y ∈ ℤ
214 211 213 zsubcld ⊢ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y ∧ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → P − y ∈ ℤ
215 154 ad2antrl ⊢ P ∈ ℝ ∧ y ∈ ℕ ∧ H ∈ ℕ → y ∈ ℝ
216 67 rehalfcld ⊢ P ∈ ℝ → P − 1 2 ∈ ℝ
217 216 adantr ⊢ P ∈ ℝ ∧ y ∈ ℕ ∧ H ∈ ℕ → P − 1 2 ∈ ℝ
218 simpl ⊢ P ∈ ℝ ∧ y ∈ ℕ ∧ H ∈ ℕ → P ∈ ℝ
219 215 217 218 3jca ⊢ P ∈ ℝ ∧ y ∈ ℕ ∧ H ∈ ℕ → y ∈ ℝ ∧ P − 1 2 ∈ ℝ ∧ P ∈ ℝ
220 219 ex ⊢ P ∈ ℝ → y ∈ ℕ ∧ H ∈ ℕ → y ∈ ℝ ∧ P − 1 2 ∈ ℝ ∧ P ∈ ℝ
221 54 63 220 3syl ⊢ P ∈ ℙ ∖ 2 → y ∈ ℕ ∧ H ∈ ℕ → y ∈ ℝ ∧ P − 1 2 ∈ ℝ ∧ P ∈ ℝ
222 221 adantr ⊢ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y → y ∈ ℕ ∧ H ∈ ℕ → y ∈ ℝ ∧ P − 1 2 ∈ ℝ ∧ P ∈ ℝ
223 222 impcom ⊢ y ∈ ℕ ∧ H ∈ ℕ ∧ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y → y ∈ ℝ ∧ P − 1 2 ∈ ℝ ∧ P ∈ ℝ
224 lesub2 ⊢ y ∈ ℝ ∧ P − 1 2 ∈ ℝ ∧ P ∈ ℝ → y ≤ P − 1 2 ↔ P − P − 1 2 ≤ P − y
225 223 224 syl ⊢ y ∈ ℕ ∧ H ∈ ℕ ∧ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y → y ≤ P − 1 2 ↔ P − P − 1 2 ≤ P − y
226 55 zcnd ⊢ P ∈ ℙ → P ∈ ℂ
227 1cnd ⊢ P ∈ ℂ → 1 ∈ ℂ
228 2cnne0 ⊢ 2 ∈ ℂ ∧ 2 ≠ 0
229 228 a1i ⊢ P ∈ ℂ → 2 ∈ ℂ ∧ 2 ≠ 0
230 divsubdir ⊢ P ∈ ℂ ∧ 1 ∈ ℂ ∧ 2 ∈ ℂ ∧ 2 ≠ 0 → P − 1 2 = P 2 − 1 2
231 227 229 230 mpd3an23 ⊢ P ∈ ℂ → P − 1 2 = P 2 − 1 2
232 231 oveq2d ⊢ P ∈ ℂ → P − P − 1 2 = P − P 2 − 1 2
233 id ⊢ P ∈ ℂ → P ∈ ℂ
234 halfcl ⊢ P ∈ ℂ → P 2 ∈ ℂ
235 halfcn ⊢ 1 2 ∈ ℂ
236 235 a1i ⊢ P ∈ ℂ → 1 2 ∈ ℂ
237 233 234 236 subsubd ⊢ P ∈ ℂ → P − P 2 − 1 2 = P - P 2 + 1 2
238 111 oveq1d ⊢ P ∈ ℂ → P - P 2 + 1 2 = P 2 + 1 2
239 232 237 238 3eqtrd ⊢ P ∈ ℂ → P − P − 1 2 = P 2 + 1 2
240 54 226 239 3syl ⊢ P ∈ ℙ ∖ 2 → P − P − 1 2 = P 2 + 1 2
241 240 ad2antrl ⊢ y ∈ ℕ ∧ H ∈ ℕ ∧ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y → P − P − 1 2 = P 2 + 1 2
242 241 breq1d ⊢ y ∈ ℕ ∧ H ∈ ℕ ∧ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y → P − P − 1 2 ≤ P − y ↔ P 2 + 1 2 ≤ P − y
243 prmnn ⊢ P ∈ ℙ → P ∈ ℕ
244 halfre ⊢ 1 2 ∈ ℝ
245 244 a1i ⊢ P ∈ ℕ → 1 2 ∈ ℝ
246 nngt0 ⊢ P ∈ ℕ → 0 < P
247 71 a1i ⊢ P ∈ ℕ → 2 ∈ ℝ ∧ 0 < 2
248 divgt0 ⊢ P ∈ ℝ ∧ 0 < P ∧ 2 ∈ ℝ ∧ 0 < 2 → 0 < P 2
249 99 246 247 248 syl21anc ⊢ P ∈ ℕ → 0 < P 2
250 halfgt0 ⊢ 0 < 1 2
251 250 a1i ⊢ P ∈ ℕ → 0 < 1 2
252 100 245 249 251 addgt0d ⊢ P ∈ ℕ → 0 < P 2 + 1 2
253 54 243 252 3syl ⊢ P ∈ ℙ ∖ 2 → 0 < P 2 + 1 2
254 253 ad2antrl ⊢ y ∈ ℕ ∧ H ∈ ℕ ∧ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y → 0 < P 2 + 1 2
255 0red ⊢ y ∈ ℝ ∧ P ∈ ℝ → 0 ∈ ℝ
256 simpr ⊢ y ∈ ℝ ∧ P ∈ ℝ → P ∈ ℝ
257 256 rehalfcld ⊢ y ∈ ℝ ∧ P ∈ ℝ → P 2 ∈ ℝ
258 244 a1i ⊢ y ∈ ℝ ∧ P ∈ ℝ → 1 2 ∈ ℝ
259 257 258 readdcld ⊢ y ∈ ℝ ∧ P ∈ ℝ → P 2 + 1 2 ∈ ℝ
260 resubcl ⊢ P ∈ ℝ ∧ y ∈ ℝ → P − y ∈ ℝ
261 260 ancoms ⊢ y ∈ ℝ ∧ P ∈ ℝ → P − y ∈ ℝ
262 255 259 261 3jca ⊢ y ∈ ℝ ∧ P ∈ ℝ → 0 ∈ ℝ ∧ P 2 + 1 2 ∈ ℝ ∧ P − y ∈ ℝ
263 262 ex ⊢ y ∈ ℝ → P ∈ ℝ → 0 ∈ ℝ ∧ P 2 + 1 2 ∈ ℝ ∧ P − y ∈ ℝ
264 154 263 syl ⊢ y ∈ ℕ → P ∈ ℝ → 0 ∈ ℝ ∧ P 2 + 1 2 ∈ ℝ ∧ P − y ∈ ℝ
265 264 adantr ⊢ y ∈ ℕ ∧ H ∈ ℕ → P ∈ ℝ → 0 ∈ ℝ ∧ P 2 + 1 2 ∈ ℝ ∧ P − y ∈ ℝ
266 265 com12 ⊢ P ∈ ℝ → y ∈ ℕ ∧ H ∈ ℕ → 0 ∈ ℝ ∧ P 2 + 1 2 ∈ ℝ ∧ P − y ∈ ℝ
267 54 63 266 3syl ⊢ P ∈ ℙ ∖ 2 → y ∈ ℕ ∧ H ∈ ℕ → 0 ∈ ℝ ∧ P 2 + 1 2 ∈ ℝ ∧ P − y ∈ ℝ
268 267 adantr ⊢ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y → y ∈ ℕ ∧ H ∈ ℕ → 0 ∈ ℝ ∧ P 2 + 1 2 ∈ ℝ ∧ P − y ∈ ℝ
269 268 impcom ⊢ y ∈ ℕ ∧ H ∈ ℕ ∧ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y → 0 ∈ ℝ ∧ P 2 + 1 2 ∈ ℝ ∧ P − y ∈ ℝ
270 ltletr ⊢ 0 ∈ ℝ ∧ P 2 + 1 2 ∈ ℝ ∧ P − y ∈ ℝ → 0 < P 2 + 1 2 ∧ P 2 + 1 2 ≤ P − y → 0 < P − y
271 269 270 syl ⊢ y ∈ ℕ ∧ H ∈ ℕ ∧ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y → 0 < P 2 + 1 2 ∧ P 2 + 1 2 ≤ P − y → 0 < P − y
272 254 271 mpand ⊢ y ∈ ℕ ∧ H ∈ ℕ ∧ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y → P 2 + 1 2 ≤ P − y → 0 < P − y
273 242 272 sylbid ⊢ y ∈ ℕ ∧ H ∈ ℕ ∧ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y → P − P − 1 2 ≤ P − y → 0 < P − y
274 225 273 sylbid ⊢ y ∈ ℕ ∧ H ∈ ℕ ∧ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y → y ≤ P − 1 2 → 0 < P − y
275 274 ex ⊢ y ∈ ℕ ∧ H ∈ ℕ → P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y → y ≤ P − 1 2 → 0 < P − y
276 275 com23 ⊢ y ∈ ℕ ∧ H ∈ ℕ → y ≤ P − 1 2 → P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y → 0 < P − y
277 188 276 biimtrid ⊢ y ∈ ℕ ∧ H ∈ ℕ → y ≤ H → P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y → 0 < P − y
278 277 3impia ⊢ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y → 0 < P − y
279 278 impcom ⊢ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y ∧ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → 0 < P − y
280 elnnz ⊢ P − y ∈ ℕ ↔ P − y ∈ ℤ ∧ 0 < P − y
281 214 279 280 sylanbrc ⊢ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y ∧ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → P − y ∈ ℕ
282 23 adantr ⊢ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y → P ∈ ℤ ∧ ¬ 2 ∥ P
283 simpr ⊢ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y → ¬ 2 ∥ y
284 283 212 anim12ci ⊢ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y ∧ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → y ∈ ℤ ∧ ¬ 2 ∥ y
285 omoe ⊢ P ∈ ℤ ∧ ¬ 2 ∥ P ∧ y ∈ ℤ ∧ ¬ 2 ∥ y → 2 ∥ P − y
286 282 284 285 syl2an2r ⊢ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y ∧ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → 2 ∥ P − y
287 nnehalf ⊢ P − y ∈ ℕ ∧ 2 ∥ P − y → P − y 2 ∈ ℕ
288 281 286 287 syl2anc ⊢ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y ∧ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → P − y 2 ∈ ℕ
289 simpr2 ⊢ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y ∧ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → H ∈ ℕ
290 1red ⊢ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y ∧ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → 1 ∈ ℝ
291 154 3ad2ant1 ⊢ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → y ∈ ℝ
292 291 adantl ⊢ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y ∧ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → y ∈ ℝ
293 54 63 syl ⊢ P ∈ ℙ ∖ 2 → P ∈ ℝ
294 293 ad2antrr ⊢ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y ∧ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → P ∈ ℝ
295 nnge1 ⊢ y ∈ ℕ → 1 ≤ y
296 295 3ad2ant1 ⊢ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → 1 ≤ y
297 296 adantl ⊢ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y ∧ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → 1 ≤ y
298 290 292 294 297 lesub2dd ⊢ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y ∧ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → P − y ≤ P − 1
299 294 292 resubcld ⊢ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y ∧ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → P − y ∈ ℝ
300 54 63 67 3syl ⊢ P ∈ ℙ ∖ 2 → P − 1 ∈ ℝ
301 300 ad2antrr ⊢ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y ∧ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → P − 1 ∈ ℝ
302 71 a1i ⊢ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y ∧ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → 2 ∈ ℝ ∧ 0 < 2
303 lediv1 ⊢ P − y ∈ ℝ ∧ P − 1 ∈ ℝ ∧ 2 ∈ ℝ ∧ 0 < 2 → P − y ≤ P − 1 ↔ P − y 2 ≤ P − 1 2
304 299 301 302 303 syl3anc ⊢ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y ∧ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → P − y ≤ P − 1 ↔ P − y 2 ≤ P − 1 2
305 298 304 mpbid ⊢ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y ∧ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → P − y 2 ≤ P − 1 2
306 2 breq2i ⊢ P − y 2 ≤ H ↔ P − y 2 ≤ P − 1 2
307 305 306 sylibr ⊢ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y ∧ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → P − y 2 ≤ H
308 288 289 307 3jca ⊢ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y ∧ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → P − y 2 ∈ ℕ ∧ H ∈ ℕ ∧ P − y 2 ≤ H
309 308 ex ⊢ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y → y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → P − y 2 ∈ ℕ ∧ H ∈ ℕ ∧ P − y 2 ≤ H
310 elfz1b ⊢ P − y 2 ∈ 1 … H ↔ P − y 2 ∈ ℕ ∧ H ∈ ℕ ∧ P − y 2 ≤ H
311 309 148 310 3imtr4g ⊢ P ∈ ℙ ∖ 2 ∧ ¬ 2 ∥ y → y ∈ 1 … H → P − y 2 ∈ 1 … H
312 311 ex ⊢ P ∈ ℙ ∖ 2 → ¬ 2 ∥ y → y ∈ 1 … H → P − y 2 ∈ 1 … H
313 1 312 syl ⊢ φ → ¬ 2 ∥ y → y ∈ 1 … H → P − y 2 ∈ 1 … H
314 313 3imp21 ⊢ ¬ 2 ∥ y ∧ φ ∧ y ∈ 1 … H → P − y 2 ∈ 1 … H
315 oveq1 ⊢ x = P − y 2 → x ⋅ 2 = P − y 2 ⋅ 2
316 315 breq1d ⊢ x = P − y 2 → x ⋅ 2 < P 2 ↔ P − y 2 ⋅ 2 < P 2
317 315 oveq2d ⊢ x = P − y 2 → P − x ⋅ 2 = P − P − y 2 ⋅ 2
318 316 315 317 ifbieq12d ⊢ x = P − y 2 → if x ⋅ 2 < P 2 x ⋅ 2 P − x ⋅ 2 = if P − y 2 ⋅ 2 < P 2 P − y 2 ⋅ 2 P − P − y 2 ⋅ 2
319 318 eqeq2d ⊢ x = P − y 2 → y = if x ⋅ 2 < P 2 x ⋅ 2 P − x ⋅ 2 ↔ y = if P − y 2 ⋅ 2 < P 2 P − y 2 ⋅ 2 P − P − y 2 ⋅ 2
320 319 adantl ⊢ ¬ 2 ∥ y ∧ φ ∧ y ∈ 1 … H ∧ x = P − y 2 → y = if x ⋅ 2 < P 2 x ⋅ 2 P − x ⋅ 2 ↔ y = if P − y 2 ⋅ 2 < P 2 P − y 2 ⋅ 2 P − P − y 2 ⋅ 2
321 1 54 226 3syl ⊢ φ → P ∈ ℂ
322 321 3ad2ant2 ⊢ ¬ 2 ∥ y ∧ φ ∧ y ∈ 1 … H → P ∈ ℂ
323 182 3ad2ant3 ⊢ ¬ 2 ∥ y ∧ φ ∧ y ∈ 1 … H → y ∈ ℂ
324 322 323 subcld ⊢ ¬ 2 ∥ y ∧ φ ∧ y ∈ 1 … H → P − y ∈ ℂ
325 2cnd ⊢ ¬ 2 ∥ y ∧ φ ∧ y ∈ 1 … H → 2 ∈ ℂ
326 185 a1i ⊢ ¬ 2 ∥ y ∧ φ ∧ y ∈ 1 … H → 2 ≠ 0
327 324 325 326 divcan1d ⊢ ¬ 2 ∥ y ∧ φ ∧ y ∈ 1 … H → P − y 2 ⋅ 2 = P − y
328 zre ⊢ P ∈ ℤ → P ∈ ℝ
329 halfge0 ⊢ 0 ≤ 1 2
330 rehalfcl ⊢ P ∈ ℝ → P 2 ∈ ℝ
331 330 adantl ⊢ y ∈ ℝ ∧ P ∈ ℝ → P 2 ∈ ℝ
332 331 258 subge02d ⊢ y ∈ ℝ ∧ P ∈ ℝ → 0 ≤ 1 2 ↔ P 2 − 1 2 ≤ P 2
333 329 332 mpbii ⊢ y ∈ ℝ ∧ P ∈ ℝ → P 2 − 1 2 ≤ P 2
334 simpl ⊢ y ∈ ℝ ∧ P ∈ ℝ → y ∈ ℝ
335 244 a1i ⊢ P ∈ ℝ → 1 2 ∈ ℝ
336 330 335 resubcld ⊢ P ∈ ℝ → P 2 − 1 2 ∈ ℝ
337 336 adantl ⊢ y ∈ ℝ ∧ P ∈ ℝ → P 2 − 1 2 ∈ ℝ
338 letr ⊢ y ∈ ℝ ∧ P 2 − 1 2 ∈ ℝ ∧ P 2 ∈ ℝ → y ≤ P 2 − 1 2 ∧ P 2 − 1 2 ≤ P 2 → y ≤ P 2
339 334 337 331 338 syl3anc ⊢ y ∈ ℝ ∧ P ∈ ℝ → y ≤ P 2 − 1 2 ∧ P 2 − 1 2 ≤ P 2 → y ≤ P 2
340 333 339 mpan2d ⊢ y ∈ ℝ ∧ P ∈ ℝ → y ≤ P 2 − 1 2 → y ≤ P 2
341 80 adantl ⊢ y ∈ ℝ ∧ P ∈ ℝ → P ∈ ℂ
342 1cnd ⊢ y ∈ ℝ ∧ P ∈ ℝ → 1 ∈ ℂ
343 228 a1i ⊢ y ∈ ℝ ∧ P ∈ ℝ → 2 ∈ ℂ ∧ 2 ≠ 0
344 341 342 343 230 syl3anc ⊢ y ∈ ℝ ∧ P ∈ ℝ → P − 1 2 = P 2 − 1 2
345 344 breq2d ⊢ y ∈ ℝ ∧ P ∈ ℝ → y ≤ P − 1 2 ↔ y ≤ P 2 − 1 2
346 lesub ⊢ P 2 ∈ ℝ ∧ P ∈ ℝ ∧ y ∈ ℝ → P 2 ≤ P − y ↔ y ≤ P − P 2
347 331 256 334 346 syl3anc ⊢ y ∈ ℝ ∧ P ∈ ℝ → P 2 ≤ P − y ↔ y ≤ P − P 2
348 257 261 lenltd ⊢ y ∈ ℝ ∧ P ∈ ℝ → P 2 ≤ P − y ↔ ¬ P − y < P 2
349 2cnd ⊢ P ∈ ℝ → 2 ∈ ℂ
350 185 a1i ⊢ P ∈ ℝ → 2 ≠ 0
351 80 349 350 divcan1d ⊢ P ∈ ℝ → P 2 ⋅ 2 = P
352 351 eqcomd ⊢ P ∈ ℝ → P = P 2 ⋅ 2
353 352 oveq1d ⊢ P ∈ ℝ → P − P 2 = P 2 ⋅ 2 − P 2
354 330 recnd ⊢ P ∈ ℝ → P 2 ∈ ℂ
355 354 349 mulcomd ⊢ P ∈ ℝ → P 2 ⋅ 2 = 2 ⁢ P 2
356 355 oveq1d ⊢ P ∈ ℝ → P 2 ⋅ 2 − P 2 = 2 ⁢ P 2 − P 2
357 349 354 mulsubfacd ⊢ P ∈ ℝ → 2 ⁢ P 2 − P 2 = 2 − 1 ⁢ P 2
358 2m1e1 ⊢ 2 − 1 = 1
359 358 a1i ⊢ P ∈ ℝ → 2 − 1 = 1
360 359 oveq1d ⊢ P ∈ ℝ → 2 − 1 ⁢ P 2 = 1 ⁢ P 2
361 354 mullidd ⊢ P ∈ ℝ → 1 ⁢ P 2 = P 2
362 357 360 361 3eqtrd ⊢ P ∈ ℝ → 2 ⁢ P 2 − P 2 = P 2
363 353 356 362 3eqtrd ⊢ P ∈ ℝ → P − P 2 = P 2
364 363 adantl ⊢ y ∈ ℝ ∧ P ∈ ℝ → P − P 2 = P 2
365 364 breq2d ⊢ y ∈ ℝ ∧ P ∈ ℝ → y ≤ P − P 2 ↔ y ≤ P 2
366 347 348 365 3bitr3d ⊢ y ∈ ℝ ∧ P ∈ ℝ → ¬ P − y < P 2 ↔ y ≤ P 2
367 340 345 366 3imtr4d ⊢ y ∈ ℝ ∧ P ∈ ℝ → y ≤ P − 1 2 → ¬ P − y < P 2
368 367 ex ⊢ y ∈ ℝ → P ∈ ℝ → y ≤ P − 1 2 → ¬ P − y < P 2
369 154 368 syl ⊢ y ∈ ℕ → P ∈ ℝ → y ≤ P − 1 2 → ¬ P − y < P 2
370 369 com3l ⊢ P ∈ ℝ → y ≤ P − 1 2 → y ∈ ℕ → ¬ P − y < P 2
371 328 370 syl ⊢ P ∈ ℤ → y ≤ P − 1 2 → y ∈ ℕ → ¬ P − y < P 2
372 1 54 55 371 4syl ⊢ φ → y ≤ P − 1 2 → y ∈ ℕ → ¬ P − y < P 2
373 372 adantl ⊢ ¬ 2 ∥ y ∧ φ → y ≤ P − 1 2 → y ∈ ℕ → ¬ P − y < P 2
374 373 com13 ⊢ y ∈ ℕ → y ≤ P − 1 2 → ¬ 2 ∥ y ∧ φ → ¬ P − y < P 2
375 188 374 biimtrid ⊢ y ∈ ℕ → y ≤ H → ¬ 2 ∥ y ∧ φ → ¬ P − y < P 2
376 375 a1d ⊢ y ∈ ℕ → H ∈ ℕ → y ≤ H → ¬ 2 ∥ y ∧ φ → ¬ P − y < P 2
377 376 3imp ⊢ y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → ¬ 2 ∥ y ∧ φ → ¬ P − y < P 2
378 377 com12 ⊢ ¬ 2 ∥ y ∧ φ → y ∈ ℕ ∧ H ∈ ℕ ∧ y ≤ H → ¬ P − y < P 2
379 148 378 biimtrid ⊢ ¬ 2 ∥ y ∧ φ → y ∈ 1 … H → ¬ P − y < P 2
380 379 3impia ⊢ ¬ 2 ∥ y ∧ φ ∧ y ∈ 1 … H → ¬ P − y < P 2
381 327 380 eqnbrtrd ⊢ ¬ 2 ∥ y ∧ φ ∧ y ∈ 1 … H → ¬ P − y 2 ⋅ 2 < P 2
382 381 iffalsed ⊢ ¬ 2 ∥ y ∧ φ ∧ y ∈ 1 … H → if P − y 2 ⋅ 2 < P 2 P − y 2 ⋅ 2 P − P − y 2 ⋅ 2 = P − P − y 2 ⋅ 2
383 327 oveq2d ⊢ ¬ 2 ∥ y ∧ φ ∧ y ∈ 1 … H → P − P − y 2 ⋅ 2 = P − P − y
384 321 182 anim12i ⊢ φ ∧ y ∈ 1 … H → P ∈ ℂ ∧ y ∈ ℂ
385 384 3adant1 ⊢ ¬ 2 ∥ y ∧ φ ∧ y ∈ 1 … H → P ∈ ℂ ∧ y ∈ ℂ
386 nncan ⊢ P ∈ ℂ ∧ y ∈ ℂ → P − P − y = y
387 385 386 syl ⊢ ¬ 2 ∥ y ∧ φ ∧ y ∈ 1 … H → P − P − y = y
388 382 383 387 3eqtrrd ⊢ ¬ 2 ∥ y ∧ φ ∧ y ∈ 1 … H → y = if P − y 2 ⋅ 2 < P 2 P − y 2 ⋅ 2 P − P − y 2 ⋅ 2
389 314 320 388 rspcedvd ⊢ ¬ 2 ∥ y ∧ φ ∧ y ∈ 1 … H → ∃ x ∈ 1 … H y = if x ⋅ 2 < P 2 x ⋅ 2 P − x ⋅ 2
390 389 3exp ⊢ ¬ 2 ∥ y → φ → y ∈ 1 … H → ∃ x ∈ 1 … H y = if x ⋅ 2 < P 2 x ⋅ 2 P − x ⋅ 2
391 209 390 pm2.61i ⊢ φ → y ∈ 1 … H → ∃ x ∈ 1 … H y = if x ⋅ 2 < P 2 x ⋅ 2 P − x ⋅ 2
392 147 391 impbid ⊢ φ → ∃ x ∈ 1 … H y = if x ⋅ 2 < P 2 x ⋅ 2 P − x ⋅ 2 ↔ y ∈ 1 … H
393 5 392 bitrid ⊢ φ → y ∈ ran ⁡ R ↔ y ∈ 1 … H
394 393 eqrdv ⊢ φ → ran ⁡ R = 1 … H