Theorem gausslemma2dlem1a 26513

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

Hypotheses

Ref	Expression
gausslemma2d.p	⊢ (𝜑 → 𝑃 ∈ (ℙ ∖ {2}))
gausslemma2d.h	⊢ 𝐻 = ((𝑃 − 1) / 2)
gausslemma2d.r	⊢ 𝑅 = (𝑥 ∈ (1...𝐻) ↦ if((𝑥 · 2) < (𝑃 / 2), (𝑥 · 2), (𝑃 − (𝑥 · 2))))

Assertion

Ref	Expression
gausslemma2dlem1a	⊢ (𝜑 → ran 𝑅 = (1...𝐻))

Distinct variable groups:   𝑥,𝐻   𝑥,𝑃   𝜑,𝑥

Allowed substitution hint:   𝑅(𝑥)

Proof of Theorem gausslemma2dlem1a

Dummy variable 𝑦 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		gausslemma2d.r	. . . . 5 ⊢ 𝑅 = (𝑥 ∈ (1...𝐻) ↦ if((𝑥 · 2) < (𝑃 / 2), (𝑥 · 2), (𝑃 − (𝑥 · 2))))
2	1	elrnmpt 5865	. . . 4 ⊢ (𝑦 ∈ V → (𝑦 ∈ ran 𝑅 ↔ ∃𝑥 ∈ (1...𝐻)𝑦 = if((𝑥 · 2) < (𝑃 / 2), (𝑥 · 2), (𝑃 − (𝑥 · 2)))))
3	2	elv 3438	. . 3 ⊢ (𝑦 ∈ ran 𝑅 ↔ ∃𝑥 ∈ (1...𝐻)𝑦 = if((𝑥 · 2) < (𝑃 / 2), (𝑥 · 2), (𝑃 − (𝑥 · 2))))
4		iftrue 4465	. . . . . . . . 9 ⊢ ((𝑥 · 2) < (𝑃 / 2) → if((𝑥 · 2) < (𝑃 / 2), (𝑥 · 2), (𝑃 − (𝑥 · 2))) = (𝑥 · 2))
5	4	eqeq2d 2749	. . . . . . . 8 ⊢ ((𝑥 · 2) < (𝑃 / 2) → (𝑦 = if((𝑥 · 2) < (𝑃 / 2), (𝑥 · 2), (𝑃 − (𝑥 · 2))) ↔ 𝑦 = (𝑥 · 2)))
6	5	adantr 481	. . . . . . 7 ⊢ (((𝑥 · 2) < (𝑃 / 2) ∧ (𝜑 ∧ 𝑥 ∈ (1...𝐻))) → (𝑦 = if((𝑥 · 2) < (𝑃 / 2), (𝑥 · 2), (𝑃 − (𝑥 · 2))) ↔ 𝑦 = (𝑥 · 2)))
7		elfz1b 13325	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ (1...𝐻) ↔ (𝑥 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑥 ≤ 𝐻))
8		id 22	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 ∈ ℕ → 𝑥 ∈ ℕ)
9		2nn 12046	. . . . . . . . . . . . . . . . . 18 ⊢ 2 ∈ ℕ
10	9	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 ∈ ℕ → 2 ∈ ℕ)
11	8, 10	nnmulcld 12026	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ ℕ → (𝑥 · 2) ∈ ℕ)
12	11	3ad2ant1 1132	. . . . . . . . . . . . . . 15 ⊢ ((𝑥 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑥 ≤ 𝐻) → (𝑥 · 2) ∈ ℕ)
13	12	3ad2ant1 1132	. . . . . . . . . . . . . 14 ⊢ (((𝑥 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑥 ≤ 𝐻) ∧ 𝜑 ∧ (𝑥 · 2) < (𝑃 / 2)) → (𝑥 · 2) ∈ ℕ)
14		gausslemma2d.h	. . . . . . . . . . . . . . . . . 18 ⊢ 𝐻 = ((𝑃 − 1) / 2)
15	14	eleq1i 2829	. . . . . . . . . . . . . . . . 17 ⊢ (𝐻 ∈ ℕ ↔ ((𝑃 − 1) / 2) ∈ ℕ)
16	15	biimpi 215	. . . . . . . . . . . . . . . 16 ⊢ (𝐻 ∈ ℕ → ((𝑃 − 1) / 2) ∈ ℕ)
17	16	3ad2ant2 1133	. . . . . . . . . . . . . . 15 ⊢ ((𝑥 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑥 ≤ 𝐻) → ((𝑃 − 1) / 2) ∈ ℕ)
18	17	3ad2ant1 1132	. . . . . . . . . . . . . 14 ⊢ (((𝑥 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑥 ≤ 𝐻) ∧ 𝜑 ∧ (𝑥 · 2) < (𝑃 / 2)) → ((𝑃 − 1) / 2) ∈ ℕ)
19		gausslemma2d.p	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → 𝑃 ∈ (ℙ ∖ {2}))
20		nnoddn2prm 16512	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑃 ∈ (ℙ ∖ {2}) → (𝑃 ∈ ℕ ∧ ¬ 2 ∥ 𝑃))
21		nnz 12342	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑃 ∈ ℕ → 𝑃 ∈ ℤ)
22	21	anim1i 615	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑃 ∈ ℕ ∧ ¬ 2 ∥ 𝑃) → (𝑃 ∈ ℤ ∧ ¬ 2 ∥ 𝑃))
23	20, 22	syl 17	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑃 ∈ (ℙ ∖ {2}) → (𝑃 ∈ ℤ ∧ ¬ 2 ∥ 𝑃))
24		nnz 12342	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑥 ∈ ℕ → 𝑥 ∈ ℤ)
25		2z 12352	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ 2 ∈ ℤ
26	25	a1i 11	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑥 ∈ ℕ → 2 ∈ ℤ)
27	24, 26	zmulcld 12432	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑥 ∈ ℕ → (𝑥 · 2) ∈ ℤ)
28	27	3ad2ant1 1132	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑥 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑥 ≤ 𝐻) → (𝑥 · 2) ∈ ℤ)
29	23, 28	anim12i 613	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑃 ∈ (ℙ ∖ {2}) ∧ (𝑥 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑥 ≤ 𝐻)) → ((𝑃 ∈ ℤ ∧ ¬ 2 ∥ 𝑃) ∧ (𝑥 · 2) ∈ ℤ))
30		df-3an 1088	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑃 ∈ ℤ ∧ ¬ 2 ∥ 𝑃 ∧ (𝑥 · 2) ∈ ℤ) ↔ ((𝑃 ∈ ℤ ∧ ¬ 2 ∥ 𝑃) ∧ (𝑥 · 2) ∈ ℤ))
31	29, 30	sylibr 233	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑃 ∈ (ℙ ∖ {2}) ∧ (𝑥 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑥 ≤ 𝐻)) → (𝑃 ∈ ℤ ∧ ¬ 2 ∥ 𝑃 ∧ (𝑥 · 2) ∈ ℤ))
32	31	ex 413	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑃 ∈ (ℙ ∖ {2}) → ((𝑥 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑥 ≤ 𝐻) → (𝑃 ∈ ℤ ∧ ¬ 2 ∥ 𝑃 ∧ (𝑥 · 2) ∈ ℤ)))
33	19, 32	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((𝑥 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑥 ≤ 𝐻) → (𝑃 ∈ ℤ ∧ ¬ 2 ∥ 𝑃 ∧ (𝑥 · 2) ∈ ℤ)))
34	33	impcom 408	. . . . . . . . . . . . . . . 16 ⊢ (((𝑥 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑥 ≤ 𝐻) ∧ 𝜑) → (𝑃 ∈ ℤ ∧ ¬ 2 ∥ 𝑃 ∧ (𝑥 · 2) ∈ ℤ))
35		ltoddhalfle 16070	. . . . . . . . . . . . . . . 16 ⊢ ((𝑃 ∈ ℤ ∧ ¬ 2 ∥ 𝑃 ∧ (𝑥 · 2) ∈ ℤ) → ((𝑥 · 2) < (𝑃 / 2) ↔ (𝑥 · 2) ≤ ((𝑃 − 1) / 2)))
36	34, 35	syl 17	. . . . . . . . . . . . . . 15 ⊢ (((𝑥 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑥 ≤ 𝐻) ∧ 𝜑) → ((𝑥 · 2) < (𝑃 / 2) ↔ (𝑥 · 2) ≤ ((𝑃 − 1) / 2)))
37	36	biimp3a 1468	. . . . . . . . . . . . . 14 ⊢ (((𝑥 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑥 ≤ 𝐻) ∧ 𝜑 ∧ (𝑥 · 2) < (𝑃 / 2)) → (𝑥 · 2) ≤ ((𝑃 − 1) / 2))
38	13, 18, 37	3jca 1127	. . . . . . . . . . . . 13 ⊢ (((𝑥 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑥 ≤ 𝐻) ∧ 𝜑 ∧ (𝑥 · 2) < (𝑃 / 2)) → ((𝑥 · 2) ∈ ℕ ∧ ((𝑃 − 1) / 2) ∈ ℕ ∧ (𝑥 · 2) ≤ ((𝑃 − 1) / 2)))
39	38	3exp 1118	. . . . . . . . . . . 12 ⊢ ((𝑥 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑥 ≤ 𝐻) → (𝜑 → ((𝑥 · 2) < (𝑃 / 2) → ((𝑥 · 2) ∈ ℕ ∧ ((𝑃 − 1) / 2) ∈ ℕ ∧ (𝑥 · 2) ≤ ((𝑃 − 1) / 2)))))
40	7, 39	sylbi 216	. . . . . . . . . . 11 ⊢ (𝑥 ∈ (1...𝐻) → (𝜑 → ((𝑥 · 2) < (𝑃 / 2) → ((𝑥 · 2) ∈ ℕ ∧ ((𝑃 − 1) / 2) ∈ ℕ ∧ (𝑥 · 2) ≤ ((𝑃 − 1) / 2)))))
41	40	impcom 408	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (1...𝐻)) → ((𝑥 · 2) < (𝑃 / 2) → ((𝑥 · 2) ∈ ℕ ∧ ((𝑃 − 1) / 2) ∈ ℕ ∧ (𝑥 · 2) ≤ ((𝑃 − 1) / 2))))
42	41	impcom 408	. . . . . . . . 9 ⊢ (((𝑥 · 2) < (𝑃 / 2) ∧ (𝜑 ∧ 𝑥 ∈ (1...𝐻))) → ((𝑥 · 2) ∈ ℕ ∧ ((𝑃 − 1) / 2) ∈ ℕ ∧ (𝑥 · 2) ≤ ((𝑃 − 1) / 2)))
43	14	oveq2i 7286	. . . . . . . . . . 11 ⊢ (1...𝐻) = (1...((𝑃 − 1) / 2))
44	43	eleq2i 2830	. . . . . . . . . 10 ⊢ ((𝑥 · 2) ∈ (1...𝐻) ↔ (𝑥 · 2) ∈ (1...((𝑃 − 1) / 2)))
45		elfz1b 13325	. . . . . . . . . 10 ⊢ ((𝑥 · 2) ∈ (1...((𝑃 − 1) / 2)) ↔ ((𝑥 · 2) ∈ ℕ ∧ ((𝑃 − 1) / 2) ∈ ℕ ∧ (𝑥 · 2) ≤ ((𝑃 − 1) / 2)))
46	44, 45	bitri 274	. . . . . . . . 9 ⊢ ((𝑥 · 2) ∈ (1...𝐻) ↔ ((𝑥 · 2) ∈ ℕ ∧ ((𝑃 − 1) / 2) ∈ ℕ ∧ (𝑥 · 2) ≤ ((𝑃 − 1) / 2)))
47	42, 46	sylibr 233	. . . . . . . 8 ⊢ (((𝑥 · 2) < (𝑃 / 2) ∧ (𝜑 ∧ 𝑥 ∈ (1...𝐻))) → (𝑥 · 2) ∈ (1...𝐻))
48		eleq1 2826	. . . . . . . 8 ⊢ (𝑦 = (𝑥 · 2) → (𝑦 ∈ (1...𝐻) ↔ (𝑥 · 2) ∈ (1...𝐻)))
49	47, 48	syl5ibrcom 246	. . . . . . 7 ⊢ (((𝑥 · 2) < (𝑃 / 2) ∧ (𝜑 ∧ 𝑥 ∈ (1...𝐻))) → (𝑦 = (𝑥 · 2) → 𝑦 ∈ (1...𝐻)))
50	6, 49	sylbid 239	. . . . . 6 ⊢ (((𝑥 · 2) < (𝑃 / 2) ∧ (𝜑 ∧ 𝑥 ∈ (1...𝐻))) → (𝑦 = if((𝑥 · 2) < (𝑃 / 2), (𝑥 · 2), (𝑃 − (𝑥 · 2))) → 𝑦 ∈ (1...𝐻)))
51		iffalse 4468	. . . . . . . . 9 ⊢ (¬ (𝑥 · 2) < (𝑃 / 2) → if((𝑥 · 2) < (𝑃 / 2), (𝑥 · 2), (𝑃 − (𝑥 · 2))) = (𝑃 − (𝑥 · 2)))
52	51	eqeq2d 2749	. . . . . . . 8 ⊢ (¬ (𝑥 · 2) < (𝑃 / 2) → (𝑦 = if((𝑥 · 2) < (𝑃 / 2), (𝑥 · 2), (𝑃 − (𝑥 · 2))) ↔ 𝑦 = (𝑃 − (𝑥 · 2))))
53	52	adantr 481	. . . . . . 7 ⊢ ((¬ (𝑥 · 2) < (𝑃 / 2) ∧ (𝜑 ∧ 𝑥 ∈ (1...𝐻))) → (𝑦 = if((𝑥 · 2) < (𝑃 / 2), (𝑥 · 2), (𝑃 − (𝑥 · 2))) ↔ 𝑦 = (𝑃 − (𝑥 · 2))))
54		eldifi 4061	. . . . . . . . . . . . 13 ⊢ (𝑃 ∈ (ℙ ∖ {2}) → 𝑃 ∈ ℙ)
55		prmz 16380	. . . . . . . . . . . . 13 ⊢ (𝑃 ∈ ℙ → 𝑃 ∈ ℤ)
56	19, 54, 55	3syl 18	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑃 ∈ ℤ)
57	56	ad2antrl 725	. . . . . . . . . . 11 ⊢ ((¬ (𝑥 · 2) < (𝑃 / 2) ∧ (𝜑 ∧ 𝑥 ∈ (1...𝐻))) → 𝑃 ∈ ℤ)
58		elfzelz 13256	. . . . . . . . . . . . 13 ⊢ (𝑥 ∈ (1...𝐻) → 𝑥 ∈ ℤ)
59	25	a1i 11	. . . . . . . . . . . . 13 ⊢ (𝑥 ∈ (1...𝐻) → 2 ∈ ℤ)
60	58, 59	zmulcld 12432	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ (1...𝐻) → (𝑥 · 2) ∈ ℤ)
61	60	ad2antll 726	. . . . . . . . . . 11 ⊢ ((¬ (𝑥 · 2) < (𝑃 / 2) ∧ (𝜑 ∧ 𝑥 ∈ (1...𝐻))) → (𝑥 · 2) ∈ ℤ)
62	57, 61	zsubcld 12431	. . . . . . . . . 10 ⊢ ((¬ (𝑥 · 2) < (𝑃 / 2) ∧ (𝜑 ∧ 𝑥 ∈ (1...𝐻))) → (𝑃 − (𝑥 · 2)) ∈ ℤ)
63	55	zred 12426	. . . . . . . . . . . . . 14 ⊢ (𝑃 ∈ ℙ → 𝑃 ∈ ℝ)
64	14	breq2i 5082	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 ≤ 𝐻 ↔ 𝑥 ≤ ((𝑃 − 1) / 2))
65		nnre 11980	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑥 ∈ ℕ → 𝑥 ∈ ℝ)
66	65	adantr 481	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑥 ∈ ℕ ∧ 𝑃 ∈ ℝ) → 𝑥 ∈ ℝ)
67		peano2rem 11288	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑃 ∈ ℝ → (𝑃 − 1) ∈ ℝ)
68	67	adantl 482	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑥 ∈ ℕ ∧ 𝑃 ∈ ℝ) → (𝑃 − 1) ∈ ℝ)
69		2re 12047	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ 2 ∈ ℝ
70		2pos 12076	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ 0 < 2
71	69, 70	pm3.2i 471	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (2 ∈ ℝ ∧ 0 < 2)
72	71	a1i 11	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑥 ∈ ℕ ∧ 𝑃 ∈ ℝ) → (2 ∈ ℝ ∧ 0 < 2))
73		lemuldiv 11855	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑥 ∈ ℝ ∧ (𝑃 − 1) ∈ ℝ ∧ (2 ∈ ℝ ∧ 0 < 2)) → ((𝑥 · 2) ≤ (𝑃 − 1) ↔ 𝑥 ≤ ((𝑃 − 1) / 2)))
74	66, 68, 72, 73	syl3anc 1370	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑥 ∈ ℕ ∧ 𝑃 ∈ ℝ) → ((𝑥 · 2) ≤ (𝑃 − 1) ↔ 𝑥 ≤ ((𝑃 − 1) / 2)))
75	64, 74	bitr4id 290	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑥 ∈ ℕ ∧ 𝑃 ∈ ℝ) → (𝑥 ≤ 𝐻 ↔ (𝑥 · 2) ≤ (𝑃 − 1)))
76	11	nnred 11988	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑥 ∈ ℕ → (𝑥 · 2) ∈ ℝ)
77	76	adantr 481	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑥 ∈ ℕ ∧ 𝑃 ∈ ℝ) → (𝑥 · 2) ∈ ℝ)
78		simpr 485	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑥 ∈ ℕ ∧ 𝑃 ∈ ℝ) → 𝑃 ∈ ℝ)
79	77, 68, 78	lesub2d 11583	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑥 ∈ ℕ ∧ 𝑃 ∈ ℝ) → ((𝑥 · 2) ≤ (𝑃 − 1) ↔ (𝑃 − (𝑃 − 1)) ≤ (𝑃 − (𝑥 · 2))))
80		recn 10961	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑃 ∈ ℝ → 𝑃 ∈ ℂ)
81		1cnd 10970	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑃 ∈ ℝ → 1 ∈ ℂ)
82	80, 81	nncand 11337	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑃 ∈ ℝ → (𝑃 − (𝑃 − 1)) = 1)
83	82	adantl 482	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑥 ∈ ℕ ∧ 𝑃 ∈ ℝ) → (𝑃 − (𝑃 − 1)) = 1)
84	83	breq1d 5084	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑥 ∈ ℕ ∧ 𝑃 ∈ ℝ) → ((𝑃 − (𝑃 − 1)) ≤ (𝑃 − (𝑥 · 2)) ↔ 1 ≤ (𝑃 − (𝑥 · 2))))
85	84	biimpd 228	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑥 ∈ ℕ ∧ 𝑃 ∈ ℝ) → ((𝑃 − (𝑃 − 1)) ≤ (𝑃 − (𝑥 · 2)) → 1 ≤ (𝑃 − (𝑥 · 2))))
86	79, 85	sylbid 239	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑥 ∈ ℕ ∧ 𝑃 ∈ ℝ) → ((𝑥 · 2) ≤ (𝑃 − 1) → 1 ≤ (𝑃 − (𝑥 · 2))))
87	75, 86	sylbid 239	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑥 ∈ ℕ ∧ 𝑃 ∈ ℝ) → (𝑥 ≤ 𝐻 → 1 ≤ (𝑃 − (𝑥 · 2))))
88	87	impancom 452	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑥 ∈ ℕ ∧ 𝑥 ≤ 𝐻) → (𝑃 ∈ ℝ → 1 ≤ (𝑃 − (𝑥 · 2))))
89	88	3adant2 1130	. . . . . . . . . . . . . . . 16 ⊢ ((𝑥 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑥 ≤ 𝐻) → (𝑃 ∈ ℝ → 1 ≤ (𝑃 − (𝑥 · 2))))
90	7, 89	sylbi 216	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ (1...𝐻) → (𝑃 ∈ ℝ → 1 ≤ (𝑃 − (𝑥 · 2))))
91	90	com12 32	. . . . . . . . . . . . . 14 ⊢ (𝑃 ∈ ℝ → (𝑥 ∈ (1...𝐻) → 1 ≤ (𝑃 − (𝑥 · 2))))
92	63, 91	syl 17	. . . . . . . . . . . . 13 ⊢ (𝑃 ∈ ℙ → (𝑥 ∈ (1...𝐻) → 1 ≤ (𝑃 − (𝑥 · 2))))
93	19, 54, 92	3syl 18	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑥 ∈ (1...𝐻) → 1 ≤ (𝑃 − (𝑥 · 2))))
94	93	imp 407	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ (1...𝐻)) → 1 ≤ (𝑃 − (𝑥 · 2)))
95	94	adantl 482	. . . . . . . . . 10 ⊢ ((¬ (𝑥 · 2) < (𝑃 / 2) ∧ (𝜑 ∧ 𝑥 ∈ (1...𝐻))) → 1 ≤ (𝑃 − (𝑥 · 2)))
96		elnnz1 12346	. . . . . . . . . 10 ⊢ ((𝑃 − (𝑥 · 2)) ∈ ℕ ↔ ((𝑃 − (𝑥 · 2)) ∈ ℤ ∧ 1 ≤ (𝑃 − (𝑥 · 2))))
97	62, 95, 96	sylanbrc 583	. . . . . . . . 9 ⊢ ((¬ (𝑥 · 2) < (𝑃 / 2) ∧ (𝜑 ∧ 𝑥 ∈ (1...𝐻))) → (𝑃 − (𝑥 · 2)) ∈ ℕ)
98	7	simp2bi 1145	. . . . . . . . . 10 ⊢ (𝑥 ∈ (1...𝐻) → 𝐻 ∈ ℕ)
99	98	ad2antll 726	. . . . . . . . 9 ⊢ ((¬ (𝑥 · 2) < (𝑃 / 2) ∧ (𝜑 ∧ 𝑥 ∈ (1...𝐻))) → 𝐻 ∈ ℕ)
100		nnre 11980	. . . . . . . . . . . . . . . . 17 ⊢ (𝑃 ∈ ℕ → 𝑃 ∈ ℝ)
101	100	rehalfcld 12220	. . . . . . . . . . . . . . . 16 ⊢ (𝑃 ∈ ℕ → (𝑃 / 2) ∈ ℝ)
102	101	adantr 481	. . . . . . . . . . . . . . 15 ⊢ ((𝑃 ∈ ℕ ∧ ¬ 2 ∥ 𝑃) → (𝑃 / 2) ∈ ℝ)
103	60	zred 12426	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ (1...𝐻) → (𝑥 · 2) ∈ ℝ)
104		lenlt 11053	. . . . . . . . . . . . . . 15 ⊢ (((𝑃 / 2) ∈ ℝ ∧ (𝑥 · 2) ∈ ℝ) → ((𝑃 / 2) ≤ (𝑥 · 2) ↔ ¬ (𝑥 · 2) < (𝑃 / 2)))
105	102, 103, 104	syl2an 596	. . . . . . . . . . . . . 14 ⊢ (((𝑃 ∈ ℕ ∧ ¬ 2 ∥ 𝑃) ∧ 𝑥 ∈ (1...𝐻)) → ((𝑃 / 2) ≤ (𝑥 · 2) ↔ ¬ (𝑥 · 2) < (𝑃 / 2)))
106	22, 60	anim12i 613	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝑃 ∈ ℕ ∧ ¬ 2 ∥ 𝑃) ∧ 𝑥 ∈ (1...𝐻)) → ((𝑃 ∈ ℤ ∧ ¬ 2 ∥ 𝑃) ∧ (𝑥 · 2) ∈ ℤ))
107	106, 30	sylibr 233	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝑃 ∈ ℕ ∧ ¬ 2 ∥ 𝑃) ∧ 𝑥 ∈ (1...𝐻)) → (𝑃 ∈ ℤ ∧ ¬ 2 ∥ 𝑃 ∧ (𝑥 · 2) ∈ ℤ))
108		halfleoddlt 16071	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑃 ∈ ℤ ∧ ¬ 2 ∥ 𝑃 ∧ (𝑥 · 2) ∈ ℤ) → ((𝑃 / 2) ≤ (𝑥 · 2) ↔ (𝑃 / 2) < (𝑥 · 2)))
109	107, 108	syl 17	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑃 ∈ ℕ ∧ ¬ 2 ∥ 𝑃) ∧ 𝑥 ∈ (1...𝐻)) → ((𝑃 / 2) ≤ (𝑥 · 2) ↔ (𝑃 / 2) < (𝑥 · 2)))
110	109	biimpa 477	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑃 ∈ ℕ ∧ ¬ 2 ∥ 𝑃) ∧ 𝑥 ∈ (1...𝐻)) ∧ (𝑃 / 2) ≤ (𝑥 · 2)) → (𝑃 / 2) < (𝑥 · 2))
111		nncn 11981	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑃 ∈ ℕ → 𝑃 ∈ ℂ)
112		subhalfhalf 12207	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑃 ∈ ℂ → (𝑃 − (𝑃 / 2)) = (𝑃 / 2))
113	111, 112	syl 17	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑃 ∈ ℕ → (𝑃 − (𝑃 / 2)) = (𝑃 / 2))
114	113	breq1d 5084	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑃 ∈ ℕ → ((𝑃 − (𝑃 / 2)) < (𝑥 · 2) ↔ (𝑃 / 2) < (𝑥 · 2)))
115	114	ad3antrrr 727	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑃 ∈ ℕ ∧ ¬ 2 ∥ 𝑃) ∧ 𝑥 ∈ (1...𝐻)) ∧ (𝑃 / 2) ≤ (𝑥 · 2)) → ((𝑃 − (𝑃 / 2)) < (𝑥 · 2) ↔ (𝑃 / 2) < (𝑥 · 2)))
116	110, 115	mpbird 256	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝑃 ∈ ℕ ∧ ¬ 2 ∥ 𝑃) ∧ 𝑥 ∈ (1...𝐻)) ∧ (𝑃 / 2) ≤ (𝑥 · 2)) → (𝑃 − (𝑃 / 2)) < (𝑥 · 2))
117	100	ad2antrr 723	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝑃 ∈ ℕ ∧ ¬ 2 ∥ 𝑃) ∧ 𝑥 ∈ (1...𝐻)) → 𝑃 ∈ ℝ)
118	101	ad2antrr 723	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝑃 ∈ ℕ ∧ ¬ 2 ∥ 𝑃) ∧ 𝑥 ∈ (1...𝐻)) → (𝑃 / 2) ∈ ℝ)
119	103	adantl 482	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝑃 ∈ ℕ ∧ ¬ 2 ∥ 𝑃) ∧ 𝑥 ∈ (1...𝐻)) → (𝑥 · 2) ∈ ℝ)
120	117, 118, 119	3jca 1127	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑃 ∈ ℕ ∧ ¬ 2 ∥ 𝑃) ∧ 𝑥 ∈ (1...𝐻)) → (𝑃 ∈ ℝ ∧ (𝑃 / 2) ∈ ℝ ∧ (𝑥 · 2) ∈ ℝ))
121	120	adantr 481	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝑃 ∈ ℕ ∧ ¬ 2 ∥ 𝑃) ∧ 𝑥 ∈ (1...𝐻)) ∧ (𝑃 / 2) ≤ (𝑥 · 2)) → (𝑃 ∈ ℝ ∧ (𝑃 / 2) ∈ ℝ ∧ (𝑥 · 2) ∈ ℝ))
122		ltsub23 11455	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑃 ∈ ℝ ∧ (𝑃 / 2) ∈ ℝ ∧ (𝑥 · 2) ∈ ℝ) → ((𝑃 − (𝑃 / 2)) < (𝑥 · 2) ↔ (𝑃 − (𝑥 · 2)) < (𝑃 / 2)))
123	121, 122	syl 17	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝑃 ∈ ℕ ∧ ¬ 2 ∥ 𝑃) ∧ 𝑥 ∈ (1...𝐻)) ∧ (𝑃 / 2) ≤ (𝑥 · 2)) → ((𝑃 − (𝑃 / 2)) < (𝑥 · 2) ↔ (𝑃 − (𝑥 · 2)) < (𝑃 / 2)))
124	116, 123	mpbid 231	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑃 ∈ ℕ ∧ ¬ 2 ∥ 𝑃) ∧ 𝑥 ∈ (1...𝐻)) ∧ (𝑃 / 2) ≤ (𝑥 · 2)) → (𝑃 − (𝑥 · 2)) < (𝑃 / 2))
125	21	ad2antrr 723	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑃 ∈ ℕ ∧ ¬ 2 ∥ 𝑃) ∧ 𝑥 ∈ (1...𝐻)) → 𝑃 ∈ ℤ)
126		simplr 766	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑃 ∈ ℕ ∧ ¬ 2 ∥ 𝑃) ∧ 𝑥 ∈ (1...𝐻)) → ¬ 2 ∥ 𝑃)
127	60	adantl 482	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝑃 ∈ ℕ ∧ ¬ 2 ∥ 𝑃) ∧ 𝑥 ∈ (1...𝐻)) → (𝑥 · 2) ∈ ℤ)
128	125, 127	zsubcld 12431	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑃 ∈ ℕ ∧ ¬ 2 ∥ 𝑃) ∧ 𝑥 ∈ (1...𝐻)) → (𝑃 − (𝑥 · 2)) ∈ ℤ)
129	125, 126, 128	3jca 1127	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝑃 ∈ ℕ ∧ ¬ 2 ∥ 𝑃) ∧ 𝑥 ∈ (1...𝐻)) → (𝑃 ∈ ℤ ∧ ¬ 2 ∥ 𝑃 ∧ (𝑃 − (𝑥 · 2)) ∈ ℤ))
130	129	adantr 481	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝑃 ∈ ℕ ∧ ¬ 2 ∥ 𝑃) ∧ 𝑥 ∈ (1...𝐻)) ∧ (𝑃 / 2) ≤ (𝑥 · 2)) → (𝑃 ∈ ℤ ∧ ¬ 2 ∥ 𝑃 ∧ (𝑃 − (𝑥 · 2)) ∈ ℤ))
131		ltoddhalfle 16070	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑃 ∈ ℤ ∧ ¬ 2 ∥ 𝑃 ∧ (𝑃 − (𝑥 · 2)) ∈ ℤ) → ((𝑃 − (𝑥 · 2)) < (𝑃 / 2) ↔ (𝑃 − (𝑥 · 2)) ≤ ((𝑃 − 1) / 2)))
132	130, 131	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑃 ∈ ℕ ∧ ¬ 2 ∥ 𝑃) ∧ 𝑥 ∈ (1...𝐻)) ∧ (𝑃 / 2) ≤ (𝑥 · 2)) → ((𝑃 − (𝑥 · 2)) < (𝑃 / 2) ↔ (𝑃 − (𝑥 · 2)) ≤ ((𝑃 − 1) / 2)))
133	124, 132	mpbid 231	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑃 ∈ ℕ ∧ ¬ 2 ∥ 𝑃) ∧ 𝑥 ∈ (1...𝐻)) ∧ (𝑃 / 2) ≤ (𝑥 · 2)) → (𝑃 − (𝑥 · 2)) ≤ ((𝑃 − 1) / 2))
134	133	ex 413	. . . . . . . . . . . . . . 15 ⊢ (((𝑃 ∈ ℕ ∧ ¬ 2 ∥ 𝑃) ∧ 𝑥 ∈ (1...𝐻)) → ((𝑃 / 2) ≤ (𝑥 · 2) → (𝑃 − (𝑥 · 2)) ≤ ((𝑃 − 1) / 2)))
135	14	breq2i 5082	. . . . . . . . . . . . . . 15 ⊢ ((𝑃 − (𝑥 · 2)) ≤ 𝐻 ↔ (𝑃 − (𝑥 · 2)) ≤ ((𝑃 − 1) / 2))
136	134, 135	syl6ibr 251	. . . . . . . . . . . . . 14 ⊢ (((𝑃 ∈ ℕ ∧ ¬ 2 ∥ 𝑃) ∧ 𝑥 ∈ (1...𝐻)) → ((𝑃 / 2) ≤ (𝑥 · 2) → (𝑃 − (𝑥 · 2)) ≤ 𝐻))
137	105, 136	sylbird 259	. . . . . . . . . . . . 13 ⊢ (((𝑃 ∈ ℕ ∧ ¬ 2 ∥ 𝑃) ∧ 𝑥 ∈ (1...𝐻)) → (¬ (𝑥 · 2) < (𝑃 / 2) → (𝑃 − (𝑥 · 2)) ≤ 𝐻))
138	137	ex 413	. . . . . . . . . . . 12 ⊢ ((𝑃 ∈ ℕ ∧ ¬ 2 ∥ 𝑃) → (𝑥 ∈ (1...𝐻) → (¬ (𝑥 · 2) < (𝑃 / 2) → (𝑃 − (𝑥 · 2)) ≤ 𝐻)))
139	19, 20, 138	3syl 18	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑥 ∈ (1...𝐻) → (¬ (𝑥 · 2) < (𝑃 / 2) → (𝑃 − (𝑥 · 2)) ≤ 𝐻)))
140	139	imp 407	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ (1...𝐻)) → (¬ (𝑥 · 2) < (𝑃 / 2) → (𝑃 − (𝑥 · 2)) ≤ 𝐻))
141	140	impcom 408	. . . . . . . . 9 ⊢ ((¬ (𝑥 · 2) < (𝑃 / 2) ∧ (𝜑 ∧ 𝑥 ∈ (1...𝐻))) → (𝑃 − (𝑥 · 2)) ≤ 𝐻)
142		elfz1b 13325	. . . . . . . . 9 ⊢ ((𝑃 − (𝑥 · 2)) ∈ (1...𝐻) ↔ ((𝑃 − (𝑥 · 2)) ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ (𝑃 − (𝑥 · 2)) ≤ 𝐻))
143	97, 99, 141, 142	syl3anbrc 1342	. . . . . . . 8 ⊢ ((¬ (𝑥 · 2) < (𝑃 / 2) ∧ (𝜑 ∧ 𝑥 ∈ (1...𝐻))) → (𝑃 − (𝑥 · 2)) ∈ (1...𝐻))
144		eleq1 2826	. . . . . . . 8 ⊢ (𝑦 = (𝑃 − (𝑥 · 2)) → (𝑦 ∈ (1...𝐻) ↔ (𝑃 − (𝑥 · 2)) ∈ (1...𝐻)))
145	143, 144	syl5ibrcom 246	. . . . . . 7 ⊢ ((¬ (𝑥 · 2) < (𝑃 / 2) ∧ (𝜑 ∧ 𝑥 ∈ (1...𝐻))) → (𝑦 = (𝑃 − (𝑥 · 2)) → 𝑦 ∈ (1...𝐻)))
146	53, 145	sylbid 239	. . . . . 6 ⊢ ((¬ (𝑥 · 2) < (𝑃 / 2) ∧ (𝜑 ∧ 𝑥 ∈ (1...𝐻))) → (𝑦 = if((𝑥 · 2) < (𝑃 / 2), (𝑥 · 2), (𝑃 − (𝑥 · 2))) → 𝑦 ∈ (1...𝐻)))
147	50, 146	pm2.61ian 809	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (1...𝐻)) → (𝑦 = if((𝑥 · 2) < (𝑃 / 2), (𝑥 · 2), (𝑃 − (𝑥 · 2))) → 𝑦 ∈ (1...𝐻)))
148	147	rexlimdva 3213	. . . 4 ⊢ (𝜑 → (∃𝑥 ∈ (1...𝐻)𝑦 = if((𝑥 · 2) < (𝑃 / 2), (𝑥 · 2), (𝑃 − (𝑥 · 2))) → 𝑦 ∈ (1...𝐻)))
149		elfz1b 13325	. . . . . . . . . 10 ⊢ (𝑦 ∈ (1...𝐻) ↔ (𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻))
150		simp1 1135	. . . . . . . . . . . . 13 ⊢ ((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻) → 𝑦 ∈ ℕ)
151		simpl 483	. . . . . . . . . . . . 13 ⊢ ((2 ∥ 𝑦 ∧ 𝜑) → 2 ∥ 𝑦)
152		nnehalf 16088	. . . . . . . . . . . . 13 ⊢ ((𝑦 ∈ ℕ ∧ 2 ∥ 𝑦) → (𝑦 / 2) ∈ ℕ)
153	150, 151, 152	syl2anr 597	. . . . . . . . . . . 12 ⊢ (((2 ∥ 𝑦 ∧ 𝜑) ∧ (𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻)) → (𝑦 / 2) ∈ ℕ)
154		simpr2 1194	. . . . . . . . . . . 12 ⊢ (((2 ∥ 𝑦 ∧ 𝜑) ∧ (𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻)) → 𝐻 ∈ ℕ)
155		nnre 11980	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 ∈ ℕ → 𝑦 ∈ ℝ)
156	155	ad2antrr 723	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ) ∧ (2 ∥ 𝑦 ∧ 𝜑)) → 𝑦 ∈ ℝ)
157		nnrp 12741	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝐻 ∈ ℕ → 𝐻 ∈ ℝ+)
158	157	adantl 482	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ) → 𝐻 ∈ ℝ+)
159	158	adantr 481	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ) ∧ (2 ∥ 𝑦 ∧ 𝜑)) → 𝐻 ∈ ℝ+)
160		2rp 12735	. . . . . . . . . . . . . . . . . . 19 ⊢ 2 ∈ ℝ+
161		1le2 12182	. . . . . . . . . . . . . . . . . . 19 ⊢ 1 ≤ 2
162	160, 161	pm3.2i 471	. . . . . . . . . . . . . . . . . 18 ⊢ (2 ∈ ℝ+ ∧ 1 ≤ 2)
163	162	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ) ∧ (2 ∥ 𝑦 ∧ 𝜑)) → (2 ∈ ℝ+ ∧ 1 ≤ 2))
164		ledivge1le 12801	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑦 ∈ ℝ ∧ 𝐻 ∈ ℝ+ ∧ (2 ∈ ℝ+ ∧ 1 ≤ 2)) → (𝑦 ≤ 𝐻 → (𝑦 / 2) ≤ 𝐻))
165	156, 159, 163, 164	syl3anc 1370	. . . . . . . . . . . . . . . 16 ⊢ (((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ) ∧ (2 ∥ 𝑦 ∧ 𝜑)) → (𝑦 ≤ 𝐻 → (𝑦 / 2) ≤ 𝐻))
166	165	ex 413	. . . . . . . . . . . . . . 15 ⊢ ((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ) → ((2 ∥ 𝑦 ∧ 𝜑) → (𝑦 ≤ 𝐻 → (𝑦 / 2) ≤ 𝐻)))
167	166	com23 86	. . . . . . . . . . . . . 14 ⊢ ((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ) → (𝑦 ≤ 𝐻 → ((2 ∥ 𝑦 ∧ 𝜑) → (𝑦 / 2) ≤ 𝐻)))
168	167	3impia 1116	. . . . . . . . . . . . 13 ⊢ ((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻) → ((2 ∥ 𝑦 ∧ 𝜑) → (𝑦 / 2) ≤ 𝐻))
169	168	impcom 408	. . . . . . . . . . . 12 ⊢ (((2 ∥ 𝑦 ∧ 𝜑) ∧ (𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻)) → (𝑦 / 2) ≤ 𝐻)
170	153, 154, 169	3jca 1127	. . . . . . . . . . 11 ⊢ (((2 ∥ 𝑦 ∧ 𝜑) ∧ (𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻)) → ((𝑦 / 2) ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ (𝑦 / 2) ≤ 𝐻))
171	170	ex 413	. . . . . . . . . 10 ⊢ ((2 ∥ 𝑦 ∧ 𝜑) → ((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻) → ((𝑦 / 2) ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ (𝑦 / 2) ≤ 𝐻)))
172	149, 171	syl5bi 241	. . . . . . . . 9 ⊢ ((2 ∥ 𝑦 ∧ 𝜑) → (𝑦 ∈ (1...𝐻) → ((𝑦 / 2) ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ (𝑦 / 2) ≤ 𝐻)))
173	172	3impia 1116	. . . . . . . 8 ⊢ ((2 ∥ 𝑦 ∧ 𝜑 ∧ 𝑦 ∈ (1...𝐻)) → ((𝑦 / 2) ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ (𝑦 / 2) ≤ 𝐻))
174		elfz1b 13325	. . . . . . . 8 ⊢ ((𝑦 / 2) ∈ (1...𝐻) ↔ ((𝑦 / 2) ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ (𝑦 / 2) ≤ 𝐻))
175	173, 174	sylibr 233	. . . . . . 7 ⊢ ((2 ∥ 𝑦 ∧ 𝜑 ∧ 𝑦 ∈ (1...𝐻)) → (𝑦 / 2) ∈ (1...𝐻))
176		oveq1 7282	. . . . . . . . . . 11 ⊢ (𝑥 = (𝑦 / 2) → (𝑥 · 2) = ((𝑦 / 2) · 2))
177	176	breq1d 5084	. . . . . . . . . 10 ⊢ (𝑥 = (𝑦 / 2) → ((𝑥 · 2) < (𝑃 / 2) ↔ ((𝑦 / 2) · 2) < (𝑃 / 2)))
178	176	oveq2d 7291	. . . . . . . . . 10 ⊢ (𝑥 = (𝑦 / 2) → (𝑃 − (𝑥 · 2)) = (𝑃 − ((𝑦 / 2) · 2)))
179	177, 176, 178	ifbieq12d 4487	. . . . . . . . 9 ⊢ (𝑥 = (𝑦 / 2) → if((𝑥 · 2) < (𝑃 / 2), (𝑥 · 2), (𝑃 − (𝑥 · 2))) = if(((𝑦 / 2) · 2) < (𝑃 / 2), ((𝑦 / 2) · 2), (𝑃 − ((𝑦 / 2) · 2))))
180	179	eqeq2d 2749	. . . . . . . 8 ⊢ (𝑥 = (𝑦 / 2) → (𝑦 = if((𝑥 · 2) < (𝑃 / 2), (𝑥 · 2), (𝑃 − (𝑥 · 2))) ↔ 𝑦 = if(((𝑦 / 2) · 2) < (𝑃 / 2), ((𝑦 / 2) · 2), (𝑃 − ((𝑦 / 2) · 2)))))
181	180	adantl 482	. . . . . . 7 ⊢ (((2 ∥ 𝑦 ∧ 𝜑 ∧ 𝑦 ∈ (1...𝐻)) ∧ 𝑥 = (𝑦 / 2)) → (𝑦 = if((𝑥 · 2) < (𝑃 / 2), (𝑥 · 2), (𝑃 − (𝑥 · 2))) ↔ 𝑦 = if(((𝑦 / 2) · 2) < (𝑃 / 2), ((𝑦 / 2) · 2), (𝑃 − ((𝑦 / 2) · 2)))))
182		elfzelz 13256	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ (1...𝐻) → 𝑦 ∈ ℤ)
183	182	zcnd 12427	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (1...𝐻) → 𝑦 ∈ ℂ)
184	183	3ad2ant3 1134	. . . . . . . . . . 11 ⊢ ((2 ∥ 𝑦 ∧ 𝜑 ∧ 𝑦 ∈ (1...𝐻)) → 𝑦 ∈ ℂ)
185		2cnd 12051	. . . . . . . . . . 11 ⊢ ((2 ∥ 𝑦 ∧ 𝜑 ∧ 𝑦 ∈ (1...𝐻)) → 2 ∈ ℂ)
186		2ne0 12077	. . . . . . . . . . . 12 ⊢ 2 ≠ 0
187	186	a1i 11	. . . . . . . . . . 11 ⊢ ((2 ∥ 𝑦 ∧ 𝜑 ∧ 𝑦 ∈ (1...𝐻)) → 2 ≠ 0)
188	184, 185, 187	divcan1d 11752	. . . . . . . . . 10 ⊢ ((2 ∥ 𝑦 ∧ 𝜑 ∧ 𝑦 ∈ (1...𝐻)) → ((𝑦 / 2) · 2) = 𝑦)
189	14	breq2i 5082	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ≤ 𝐻 ↔ 𝑦 ≤ ((𝑃 − 1) / 2))
190		nnz 12342	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑦 ∈ ℕ → 𝑦 ∈ ℤ)
191	19, 20, 22	3syl 18	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → (𝑃 ∈ ℤ ∧ ¬ 2 ∥ 𝑃))
192	191	adantl 482	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((2 ∥ 𝑦 ∧ 𝜑) → (𝑃 ∈ ℤ ∧ ¬ 2 ∥ 𝑃))
193	190, 192	anim12ci 614	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑦 ∈ ℕ ∧ (2 ∥ 𝑦 ∧ 𝜑)) → ((𝑃 ∈ ℤ ∧ ¬ 2 ∥ 𝑃) ∧ 𝑦 ∈ ℤ))
194		df-3an 1088	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑃 ∈ ℤ ∧ ¬ 2 ∥ 𝑃 ∧ 𝑦 ∈ ℤ) ↔ ((𝑃 ∈ ℤ ∧ ¬ 2 ∥ 𝑃) ∧ 𝑦 ∈ ℤ))
195	193, 194	sylibr 233	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑦 ∈ ℕ ∧ (2 ∥ 𝑦 ∧ 𝜑)) → (𝑃 ∈ ℤ ∧ ¬ 2 ∥ 𝑃 ∧ 𝑦 ∈ ℤ))
196		ltoddhalfle 16070	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑃 ∈ ℤ ∧ ¬ 2 ∥ 𝑃 ∧ 𝑦 ∈ ℤ) → (𝑦 < (𝑃 / 2) ↔ 𝑦 ≤ ((𝑃 − 1) / 2)))
197	195, 196	syl 17	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑦 ∈ ℕ ∧ (2 ∥ 𝑦 ∧ 𝜑)) → (𝑦 < (𝑃 / 2) ↔ 𝑦 ≤ ((𝑃 − 1) / 2)))
198	197	exbiri 808	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ ℕ → ((2 ∥ 𝑦 ∧ 𝜑) → (𝑦 ≤ ((𝑃 − 1) / 2) → 𝑦 < (𝑃 / 2))))
199	198	com23 86	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ ℕ → (𝑦 ≤ ((𝑃 − 1) / 2) → ((2 ∥ 𝑦 ∧ 𝜑) → 𝑦 < (𝑃 / 2))))
200	189, 199	syl5bi 241	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ ℕ → (𝑦 ≤ 𝐻 → ((2 ∥ 𝑦 ∧ 𝜑) → 𝑦 < (𝑃 / 2))))
201	200	a1d 25	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ ℕ → (𝐻 ∈ ℕ → (𝑦 ≤ 𝐻 → ((2 ∥ 𝑦 ∧ 𝜑) → 𝑦 < (𝑃 / 2)))))
202	201	3imp 1110	. . . . . . . . . . . . 13 ⊢ ((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻) → ((2 ∥ 𝑦 ∧ 𝜑) → 𝑦 < (𝑃 / 2)))
203	149, 202	sylbi 216	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ (1...𝐻) → ((2 ∥ 𝑦 ∧ 𝜑) → 𝑦 < (𝑃 / 2)))
204	203	com12 32	. . . . . . . . . . 11 ⊢ ((2 ∥ 𝑦 ∧ 𝜑) → (𝑦 ∈ (1...𝐻) → 𝑦 < (𝑃 / 2)))
205	204	3impia 1116	. . . . . . . . . 10 ⊢ ((2 ∥ 𝑦 ∧ 𝜑 ∧ 𝑦 ∈ (1...𝐻)) → 𝑦 < (𝑃 / 2))
206	188, 205	eqbrtrd 5096	. . . . . . . . 9 ⊢ ((2 ∥ 𝑦 ∧ 𝜑 ∧ 𝑦 ∈ (1...𝐻)) → ((𝑦 / 2) · 2) < (𝑃 / 2))
207	206	iftrued 4467	. . . . . . . 8 ⊢ ((2 ∥ 𝑦 ∧ 𝜑 ∧ 𝑦 ∈ (1...𝐻)) → if(((𝑦 / 2) · 2) < (𝑃 / 2), ((𝑦 / 2) · 2), (𝑃 − ((𝑦 / 2) · 2))) = ((𝑦 / 2) · 2))
208	207, 188	eqtr2d 2779	. . . . . . 7 ⊢ ((2 ∥ 𝑦 ∧ 𝜑 ∧ 𝑦 ∈ (1...𝐻)) → 𝑦 = if(((𝑦 / 2) · 2) < (𝑃 / 2), ((𝑦 / 2) · 2), (𝑃 − ((𝑦 / 2) · 2))))
209	175, 181, 208	rspcedvd 3563	. . . . . 6 ⊢ ((2 ∥ 𝑦 ∧ 𝜑 ∧ 𝑦 ∈ (1...𝐻)) → ∃𝑥 ∈ (1...𝐻)𝑦 = if((𝑥 · 2) < (𝑃 / 2), (𝑥 · 2), (𝑃 − (𝑥 · 2))))
210	209	3exp 1118	. . . . 5 ⊢ (2 ∥ 𝑦 → (𝜑 → (𝑦 ∈ (1...𝐻) → ∃𝑥 ∈ (1...𝐻)𝑦 = if((𝑥 · 2) < (𝑃 / 2), (𝑥 · 2), (𝑃 − (𝑥 · 2))))))
211	54, 55	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (𝑃 ∈ (ℙ ∖ {2}) → 𝑃 ∈ ℤ)
212	211	ad2antrr 723	. . . . . . . . . . . . . . . 16 ⊢ (((𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦) ∧ (𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻)) → 𝑃 ∈ ℤ)
213	190	3ad2ant1 1132	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻) → 𝑦 ∈ ℤ)
214	213	adantl 482	. . . . . . . . . . . . . . . 16 ⊢ (((𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦) ∧ (𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻)) → 𝑦 ∈ ℤ)
215	212, 214	zsubcld 12431	. . . . . . . . . . . . . . 15 ⊢ (((𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦) ∧ (𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻)) → (𝑃 − 𝑦) ∈ ℤ)
216	155	ad2antrl 725	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝑃 ∈ ℝ ∧ (𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ)) → 𝑦 ∈ ℝ)
217	67	rehalfcld 12220	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (𝑃 ∈ ℝ → ((𝑃 − 1) / 2) ∈ ℝ)
218	217	adantr 481	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝑃 ∈ ℝ ∧ (𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ)) → ((𝑃 − 1) / 2) ∈ ℝ)
219		simpl 483	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝑃 ∈ ℝ ∧ (𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ)) → 𝑃 ∈ ℝ)
220	216, 218, 219	3jca 1127	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((𝑃 ∈ ℝ ∧ (𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ)) → (𝑦 ∈ ℝ ∧ ((𝑃 − 1) / 2) ∈ ℝ ∧ 𝑃 ∈ ℝ))
221	220	ex 413	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑃 ∈ ℝ → ((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ) → (𝑦 ∈ ℝ ∧ ((𝑃 − 1) / 2) ∈ ℝ ∧ 𝑃 ∈ ℝ)))
222	54, 63, 221	3syl 18	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑃 ∈ (ℙ ∖ {2}) → ((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ) → (𝑦 ∈ ℝ ∧ ((𝑃 − 1) / 2) ∈ ℝ ∧ 𝑃 ∈ ℝ)))
223	222	adantr 481	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦) → ((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ) → (𝑦 ∈ ℝ ∧ ((𝑃 − 1) / 2) ∈ ℝ ∧ 𝑃 ∈ ℝ)))
224	223	impcom 408	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦)) → (𝑦 ∈ ℝ ∧ ((𝑃 − 1) / 2) ∈ ℝ ∧ 𝑃 ∈ ℝ))
225		lesub2 11470	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑦 ∈ ℝ ∧ ((𝑃 − 1) / 2) ∈ ℝ ∧ 𝑃 ∈ ℝ) → (𝑦 ≤ ((𝑃 − 1) / 2) ↔ (𝑃 − ((𝑃 − 1) / 2)) ≤ (𝑃 − 𝑦)))
226	224, 225	syl 17	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦)) → (𝑦 ≤ ((𝑃 − 1) / 2) ↔ (𝑃 − ((𝑃 − 1) / 2)) ≤ (𝑃 − 𝑦)))
227	55	zcnd 12427	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑃 ∈ ℙ → 𝑃 ∈ ℂ)
228		1cnd 10970	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (𝑃 ∈ ℂ → 1 ∈ ℂ)
229		2cnne0 12183	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ (2 ∈ ℂ ∧ 2 ≠ 0)
230	229	a1i 11	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (𝑃 ∈ ℂ → (2 ∈ ℂ ∧ 2 ≠ 0))
231		divsubdir 11669	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ((𝑃 ∈ ℂ ∧ 1 ∈ ℂ ∧ (2 ∈ ℂ ∧ 2 ≠ 0)) → ((𝑃 − 1) / 2) = ((𝑃 / 2) − (1 / 2)))
232	228, 230, 231	mpd3an23 1462	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑃 ∈ ℂ → ((𝑃 − 1) / 2) = ((𝑃 / 2) − (1 / 2)))
233	232	oveq2d 7291	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑃 ∈ ℂ → (𝑃 − ((𝑃 − 1) / 2)) = (𝑃 − ((𝑃 / 2) − (1 / 2))))
234		id 22	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑃 ∈ ℂ → 𝑃 ∈ ℂ)
235		halfcl 12198	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑃 ∈ ℂ → (𝑃 / 2) ∈ ℂ)
236		halfcn 12188	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (1 / 2) ∈ ℂ
237	236	a1i 11	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑃 ∈ ℂ → (1 / 2) ∈ ℂ)
238	234, 235, 237	subsubd 11360	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑃 ∈ ℂ → (𝑃 − ((𝑃 / 2) − (1 / 2))) = ((𝑃 − (𝑃 / 2)) + (1 / 2)))
239	112	oveq1d 7290	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑃 ∈ ℂ → ((𝑃 − (𝑃 / 2)) + (1 / 2)) = ((𝑃 / 2) + (1 / 2)))
240	233, 238, 239	3eqtrd 2782	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑃 ∈ ℂ → (𝑃 − ((𝑃 − 1) / 2)) = ((𝑃 / 2) + (1 / 2)))
241	54, 227, 240	3syl 18	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑃 ∈ (ℙ ∖ {2}) → (𝑃 − ((𝑃 − 1) / 2)) = ((𝑃 / 2) + (1 / 2)))
242	241	ad2antrl 725	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦)) → (𝑃 − ((𝑃 − 1) / 2)) = ((𝑃 / 2) + (1 / 2)))
243	242	breq1d 5084	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦)) → ((𝑃 − ((𝑃 − 1) / 2)) ≤ (𝑃 − 𝑦) ↔ ((𝑃 / 2) + (1 / 2)) ≤ (𝑃 − 𝑦)))
244		prmnn 16379	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑃 ∈ ℙ → 𝑃 ∈ ℕ)
245		halfre 12187	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (1 / 2) ∈ ℝ
246	245	a1i 11	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑃 ∈ ℕ → (1 / 2) ∈ ℝ)
247		nngt0 12004	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑃 ∈ ℕ → 0 < 𝑃)
248	71	a1i 11	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑃 ∈ ℕ → (2 ∈ ℝ ∧ 0 < 2))
249		divgt0 11843	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (((𝑃 ∈ ℝ ∧ 0 < 𝑃) ∧ (2 ∈ ℝ ∧ 0 < 2)) → 0 < (𝑃 / 2))
250	100, 247, 248, 249	syl21anc 835	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑃 ∈ ℕ → 0 < (𝑃 / 2))
251		halfgt0 12189	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ 0 < (1 / 2)
252	251	a1i 11	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑃 ∈ ℕ → 0 < (1 / 2))
253	101, 246, 250, 252	addgt0d 11550	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝑃 ∈ ℕ → 0 < ((𝑃 / 2) + (1 / 2)))
254	54, 244, 253	3syl 18	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑃 ∈ (ℙ ∖ {2}) → 0 < ((𝑃 / 2) + (1 / 2)))
255	254	ad2antrl 725	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦)) → 0 < ((𝑃 / 2) + (1 / 2)))
256		0red 10978	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ ((𝑦 ∈ ℝ ∧ 𝑃 ∈ ℝ) → 0 ∈ ℝ)
257		simpr 485	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 ⊢ ((𝑦 ∈ ℝ ∧ 𝑃 ∈ ℝ) → 𝑃 ∈ ℝ)
258	257	rehalfcld 12220	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ ((𝑦 ∈ ℝ ∧ 𝑃 ∈ ℝ) → (𝑃 / 2) ∈ ℝ)
259	245	a1i 11	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ ((𝑦 ∈ ℝ ∧ 𝑃 ∈ ℝ) → (1 / 2) ∈ ℝ)
260	258, 259	readdcld 11004	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ ((𝑦 ∈ ℝ ∧ 𝑃 ∈ ℝ) → ((𝑃 / 2) + (1 / 2)) ∈ ℝ)
261		resubcl 11285	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ ((𝑃 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (𝑃 − 𝑦) ∈ ℝ)
262	261	ancoms 459	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ ((𝑦 ∈ ℝ ∧ 𝑃 ∈ ℝ) → (𝑃 − 𝑦) ∈ ℝ)
263	256, 260, 262	3jca 1127	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ ((𝑦 ∈ ℝ ∧ 𝑃 ∈ ℝ) → (0 ∈ ℝ ∧ ((𝑃 / 2) + (1 / 2)) ∈ ℝ ∧ (𝑃 − 𝑦) ∈ ℝ))
264	263	ex 413	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ (𝑦 ∈ ℝ → (𝑃 ∈ ℝ → (0 ∈ ℝ ∧ ((𝑃 / 2) + (1 / 2)) ∈ ℝ ∧ (𝑃 − 𝑦) ∈ ℝ)))
265	155, 264	syl 17	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ (𝑦 ∈ ℕ → (𝑃 ∈ ℝ → (0 ∈ ℝ ∧ ((𝑃 / 2) + (1 / 2)) ∈ ℝ ∧ (𝑃 − 𝑦) ∈ ℝ)))
266	265	adantr 481	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ) → (𝑃 ∈ ℝ → (0 ∈ ℝ ∧ ((𝑃 / 2) + (1 / 2)) ∈ ℝ ∧ (𝑃 − 𝑦) ∈ ℝ)))
267	266	com12 32	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑃 ∈ ℝ → ((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ) → (0 ∈ ℝ ∧ ((𝑃 / 2) + (1 / 2)) ∈ ℝ ∧ (𝑃 − 𝑦) ∈ ℝ)))
268	54, 63, 267	3syl 18	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑃 ∈ (ℙ ∖ {2}) → ((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ) → (0 ∈ ℝ ∧ ((𝑃 / 2) + (1 / 2)) ∈ ℝ ∧ (𝑃 − 𝑦) ∈ ℝ)))
269	268	adantr 481	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦) → ((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ) → (0 ∈ ℝ ∧ ((𝑃 / 2) + (1 / 2)) ∈ ℝ ∧ (𝑃 − 𝑦) ∈ ℝ)))
270	269	impcom 408	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦)) → (0 ∈ ℝ ∧ ((𝑃 / 2) + (1 / 2)) ∈ ℝ ∧ (𝑃 − 𝑦) ∈ ℝ))
271		ltletr 11067	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((0 ∈ ℝ ∧ ((𝑃 / 2) + (1 / 2)) ∈ ℝ ∧ (𝑃 − 𝑦) ∈ ℝ) → ((0 < ((𝑃 / 2) + (1 / 2)) ∧ ((𝑃 / 2) + (1 / 2)) ≤ (𝑃 − 𝑦)) → 0 < (𝑃 − 𝑦)))
272	270, 271	syl 17	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦)) → ((0 < ((𝑃 / 2) + (1 / 2)) ∧ ((𝑃 / 2) + (1 / 2)) ≤ (𝑃 − 𝑦)) → 0 < (𝑃 − 𝑦)))
273	255, 272	mpand 692	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦)) → (((𝑃 / 2) + (1 / 2)) ≤ (𝑃 − 𝑦) → 0 < (𝑃 − 𝑦)))
274	243, 273	sylbid 239	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦)) → ((𝑃 − ((𝑃 − 1) / 2)) ≤ (𝑃 − 𝑦) → 0 < (𝑃 − 𝑦)))
275	226, 274	sylbid 239	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦)) → (𝑦 ≤ ((𝑃 − 1) / 2) → 0 < (𝑃 − 𝑦)))
276	275	ex 413	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ) → ((𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦) → (𝑦 ≤ ((𝑃 − 1) / 2) → 0 < (𝑃 − 𝑦))))
277	276	com23 86	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ) → (𝑦 ≤ ((𝑃 − 1) / 2) → ((𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦) → 0 < (𝑃 − 𝑦))))
278	189, 277	syl5bi 241	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ) → (𝑦 ≤ 𝐻 → ((𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦) → 0 < (𝑃 − 𝑦))))
279	278	3impia 1116	. . . . . . . . . . . . . . . 16 ⊢ ((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻) → ((𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦) → 0 < (𝑃 − 𝑦)))
280	279	impcom 408	. . . . . . . . . . . . . . 15 ⊢ (((𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦) ∧ (𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻)) → 0 < (𝑃 − 𝑦))
281		elnnz 12329	. . . . . . . . . . . . . . 15 ⊢ ((𝑃 − 𝑦) ∈ ℕ ↔ ((𝑃 − 𝑦) ∈ ℤ ∧ 0 < (𝑃 − 𝑦)))
282	215, 280, 281	sylanbrc 583	. . . . . . . . . . . . . 14 ⊢ (((𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦) ∧ (𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻)) → (𝑃 − 𝑦) ∈ ℕ)
283	23	adantr 481	. . . . . . . . . . . . . . 15 ⊢ ((𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦) → (𝑃 ∈ ℤ ∧ ¬ 2 ∥ 𝑃))
284		simpr 485	. . . . . . . . . . . . . . . 16 ⊢ ((𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦) → ¬ 2 ∥ 𝑦)
285	284, 213	anim12ci 614	. . . . . . . . . . . . . . 15 ⊢ (((𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦) ∧ (𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻)) → (𝑦 ∈ ℤ ∧ ¬ 2 ∥ 𝑦))
286		omoe 16073	. . . . . . . . . . . . . . 15 ⊢ (((𝑃 ∈ ℤ ∧ ¬ 2 ∥ 𝑃) ∧ (𝑦 ∈ ℤ ∧ ¬ 2 ∥ 𝑦)) → 2 ∥ (𝑃 − 𝑦))
287	283, 285, 286	syl2an2r 682	. . . . . . . . . . . . . 14 ⊢ (((𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦) ∧ (𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻)) → 2 ∥ (𝑃 − 𝑦))
288		nnehalf 16088	. . . . . . . . . . . . . 14 ⊢ (((𝑃 − 𝑦) ∈ ℕ ∧ 2 ∥ (𝑃 − 𝑦)) → ((𝑃 − 𝑦) / 2) ∈ ℕ)
289	282, 287, 288	syl2anc 584	. . . . . . . . . . . . 13 ⊢ (((𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦) ∧ (𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻)) → ((𝑃 − 𝑦) / 2) ∈ ℕ)
290		simpr2 1194	. . . . . . . . . . . . 13 ⊢ (((𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦) ∧ (𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻)) → 𝐻 ∈ ℕ)
291		1red 10976	. . . . . . . . . . . . . . . 16 ⊢ (((𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦) ∧ (𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻)) → 1 ∈ ℝ)
292	155	3ad2ant1 1132	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻) → 𝑦 ∈ ℝ)
293	292	adantl 482	. . . . . . . . . . . . . . . 16 ⊢ (((𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦) ∧ (𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻)) → 𝑦 ∈ ℝ)
294	54, 63	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (𝑃 ∈ (ℙ ∖ {2}) → 𝑃 ∈ ℝ)
295	294	ad2antrr 723	. . . . . . . . . . . . . . . 16 ⊢ (((𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦) ∧ (𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻)) → 𝑃 ∈ ℝ)
296		nnge1 12001	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 ∈ ℕ → 1 ≤ 𝑦)
297	296	3ad2ant1 1132	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻) → 1 ≤ 𝑦)
298	297	adantl 482	. . . . . . . . . . . . . . . 16 ⊢ (((𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦) ∧ (𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻)) → 1 ≤ 𝑦)
299	291, 293, 295, 298	lesub2dd 11592	. . . . . . . . . . . . . . 15 ⊢ (((𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦) ∧ (𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻)) → (𝑃 − 𝑦) ≤ (𝑃 − 1))
300	295, 293	resubcld 11403	. . . . . . . . . . . . . . . 16 ⊢ (((𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦) ∧ (𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻)) → (𝑃 − 𝑦) ∈ ℝ)
301	54, 63, 67	3syl 18	. . . . . . . . . . . . . . . . 17 ⊢ (𝑃 ∈ (ℙ ∖ {2}) → (𝑃 − 1) ∈ ℝ)
302	301	ad2antrr 723	. . . . . . . . . . . . . . . 16 ⊢ (((𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦) ∧ (𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻)) → (𝑃 − 1) ∈ ℝ)
303	71	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ (((𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦) ∧ (𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻)) → (2 ∈ ℝ ∧ 0 < 2))
304		lediv1 11840	. . . . . . . . . . . . . . . 16 ⊢ (((𝑃 − 𝑦) ∈ ℝ ∧ (𝑃 − 1) ∈ ℝ ∧ (2 ∈ ℝ ∧ 0 < 2)) → ((𝑃 − 𝑦) ≤ (𝑃 − 1) ↔ ((𝑃 − 𝑦) / 2) ≤ ((𝑃 − 1) / 2)))
305	300, 302, 303, 304	syl3anc 1370	. . . . . . . . . . . . . . 15 ⊢ (((𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦) ∧ (𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻)) → ((𝑃 − 𝑦) ≤ (𝑃 − 1) ↔ ((𝑃 − 𝑦) / 2) ≤ ((𝑃 − 1) / 2)))
306	299, 305	mpbid 231	. . . . . . . . . . . . . 14 ⊢ (((𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦) ∧ (𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻)) → ((𝑃 − 𝑦) / 2) ≤ ((𝑃 − 1) / 2))
307	14	breq2i 5082	. . . . . . . . . . . . . 14 ⊢ (((𝑃 − 𝑦) / 2) ≤ 𝐻 ↔ ((𝑃 − 𝑦) / 2) ≤ ((𝑃 − 1) / 2))
308	306, 307	sylibr 233	. . . . . . . . . . . . 13 ⊢ (((𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦) ∧ (𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻)) → ((𝑃 − 𝑦) / 2) ≤ 𝐻)
309	289, 290, 308	3jca 1127	. . . . . . . . . . . 12 ⊢ (((𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦) ∧ (𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻)) → (((𝑃 − 𝑦) / 2) ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ ((𝑃 − 𝑦) / 2) ≤ 𝐻))
310	309	ex 413	. . . . . . . . . . 11 ⊢ ((𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦) → ((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻) → (((𝑃 − 𝑦) / 2) ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ ((𝑃 − 𝑦) / 2) ≤ 𝐻)))
311		elfz1b 13325	. . . . . . . . . . 11 ⊢ (((𝑃 − 𝑦) / 2) ∈ (1...𝐻) ↔ (((𝑃 − 𝑦) / 2) ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ ((𝑃 − 𝑦) / 2) ≤ 𝐻))
312	310, 149, 311	3imtr4g 296	. . . . . . . . . 10 ⊢ ((𝑃 ∈ (ℙ ∖ {2}) ∧ ¬ 2 ∥ 𝑦) → (𝑦 ∈ (1...𝐻) → ((𝑃 − 𝑦) / 2) ∈ (1...𝐻)))
313	312	ex 413	. . . . . . . . 9 ⊢ (𝑃 ∈ (ℙ ∖ {2}) → (¬ 2 ∥ 𝑦 → (𝑦 ∈ (1...𝐻) → ((𝑃 − 𝑦) / 2) ∈ (1...𝐻))))
314	19, 313	syl 17	. . . . . . . 8 ⊢ (𝜑 → (¬ 2 ∥ 𝑦 → (𝑦 ∈ (1...𝐻) → ((𝑃 − 𝑦) / 2) ∈ (1...𝐻))))
315	314	3imp21 1113	. . . . . . 7 ⊢ ((¬ 2 ∥ 𝑦 ∧ 𝜑 ∧ 𝑦 ∈ (1...𝐻)) → ((𝑃 − 𝑦) / 2) ∈ (1...𝐻))
316		oveq1 7282	. . . . . . . . . . 11 ⊢ (𝑥 = ((𝑃 − 𝑦) / 2) → (𝑥 · 2) = (((𝑃 − 𝑦) / 2) · 2))
317	316	breq1d 5084	. . . . . . . . . 10 ⊢ (𝑥 = ((𝑃 − 𝑦) / 2) → ((𝑥 · 2) < (𝑃 / 2) ↔ (((𝑃 − 𝑦) / 2) · 2) < (𝑃 / 2)))
318	316	oveq2d 7291	. . . . . . . . . 10 ⊢ (𝑥 = ((𝑃 − 𝑦) / 2) → (𝑃 − (𝑥 · 2)) = (𝑃 − (((𝑃 − 𝑦) / 2) · 2)))
319	317, 316, 318	ifbieq12d 4487	. . . . . . . . 9 ⊢ (𝑥 = ((𝑃 − 𝑦) / 2) → if((𝑥 · 2) < (𝑃 / 2), (𝑥 · 2), (𝑃 − (𝑥 · 2))) = if((((𝑃 − 𝑦) / 2) · 2) < (𝑃 / 2), (((𝑃 − 𝑦) / 2) · 2), (𝑃 − (((𝑃 − 𝑦) / 2) · 2))))
320	319	eqeq2d 2749	. . . . . . . 8 ⊢ (𝑥 = ((𝑃 − 𝑦) / 2) → (𝑦 = if((𝑥 · 2) < (𝑃 / 2), (𝑥 · 2), (𝑃 − (𝑥 · 2))) ↔ 𝑦 = if((((𝑃 − 𝑦) / 2) · 2) < (𝑃 / 2), (((𝑃 − 𝑦) / 2) · 2), (𝑃 − (((𝑃 − 𝑦) / 2) · 2)))))
321	320	adantl 482	. . . . . . 7 ⊢ (((¬ 2 ∥ 𝑦 ∧ 𝜑 ∧ 𝑦 ∈ (1...𝐻)) ∧ 𝑥 = ((𝑃 − 𝑦) / 2)) → (𝑦 = if((𝑥 · 2) < (𝑃 / 2), (𝑥 · 2), (𝑃 − (𝑥 · 2))) ↔ 𝑦 = if((((𝑃 − 𝑦) / 2) · 2) < (𝑃 / 2), (((𝑃 − 𝑦) / 2) · 2), (𝑃 − (((𝑃 − 𝑦) / 2) · 2)))))
322	19, 54, 227	3syl 18	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑃 ∈ ℂ)
323	322	3ad2ant2 1133	. . . . . . . . . . . 12 ⊢ ((¬ 2 ∥ 𝑦 ∧ 𝜑 ∧ 𝑦 ∈ (1...𝐻)) → 𝑃 ∈ ℂ)
324	183	3ad2ant3 1134	. . . . . . . . . . . 12 ⊢ ((¬ 2 ∥ 𝑦 ∧ 𝜑 ∧ 𝑦 ∈ (1...𝐻)) → 𝑦 ∈ ℂ)
325	323, 324	subcld 11332	. . . . . . . . . . 11 ⊢ ((¬ 2 ∥ 𝑦 ∧ 𝜑 ∧ 𝑦 ∈ (1...𝐻)) → (𝑃 − 𝑦) ∈ ℂ)
326		2cnd 12051	. . . . . . . . . . 11 ⊢ ((¬ 2 ∥ 𝑦 ∧ 𝜑 ∧ 𝑦 ∈ (1...𝐻)) → 2 ∈ ℂ)
327	186	a1i 11	. . . . . . . . . . 11 ⊢ ((¬ 2 ∥ 𝑦 ∧ 𝜑 ∧ 𝑦 ∈ (1...𝐻)) → 2 ≠ 0)
328	325, 326, 327	divcan1d 11752	. . . . . . . . . 10 ⊢ ((¬ 2 ∥ 𝑦 ∧ 𝜑 ∧ 𝑦 ∈ (1...𝐻)) → (((𝑃 − 𝑦) / 2) · 2) = (𝑃 − 𝑦))
329		zre 12323	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑃 ∈ ℤ → 𝑃 ∈ ℝ)
330		halfge0 12190	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ 0 ≤ (1 / 2)
331		rehalfcl 12199	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ (𝑃 ∈ ℝ → (𝑃 / 2) ∈ ℝ)
332	331	adantl 482	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ((𝑦 ∈ ℝ ∧ 𝑃 ∈ ℝ) → (𝑃 / 2) ∈ ℝ)
333	332, 259	subge02d 11567	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝑦 ∈ ℝ ∧ 𝑃 ∈ ℝ) → (0 ≤ (1 / 2) ↔ ((𝑃 / 2) − (1 / 2)) ≤ (𝑃 / 2)))
334	330, 333	mpbii 232	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((𝑦 ∈ ℝ ∧ 𝑃 ∈ ℝ) → ((𝑃 / 2) − (1 / 2)) ≤ (𝑃 / 2))
335		simpl 483	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝑦 ∈ ℝ ∧ 𝑃 ∈ ℝ) → 𝑦 ∈ ℝ)
336	245	a1i 11	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ (𝑃 ∈ ℝ → (1 / 2) ∈ ℝ)
337	331, 336	resubcld 11403	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (𝑃 ∈ ℝ → ((𝑃 / 2) − (1 / 2)) ∈ ℝ)
338	337	adantl 482	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝑦 ∈ ℝ ∧ 𝑃 ∈ ℝ) → ((𝑃 / 2) − (1 / 2)) ∈ ℝ)
339		letr 11069	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝑦 ∈ ℝ ∧ ((𝑃 / 2) − (1 / 2)) ∈ ℝ ∧ (𝑃 / 2) ∈ ℝ) → ((𝑦 ≤ ((𝑃 / 2) − (1 / 2)) ∧ ((𝑃 / 2) − (1 / 2)) ≤ (𝑃 / 2)) → 𝑦 ≤ (𝑃 / 2)))
340	335, 338, 332, 339	syl3anc 1370	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((𝑦 ∈ ℝ ∧ 𝑃 ∈ ℝ) → ((𝑦 ≤ ((𝑃 / 2) − (1 / 2)) ∧ ((𝑃 / 2) − (1 / 2)) ≤ (𝑃 / 2)) → 𝑦 ≤ (𝑃 / 2)))
341	334, 340	mpan2d 691	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝑦 ∈ ℝ ∧ 𝑃 ∈ ℝ) → (𝑦 ≤ ((𝑃 / 2) − (1 / 2)) → 𝑦 ≤ (𝑃 / 2)))
342	80	adantl 482	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝑦 ∈ ℝ ∧ 𝑃 ∈ ℝ) → 𝑃 ∈ ℂ)
343		1cnd 10970	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝑦 ∈ ℝ ∧ 𝑃 ∈ ℝ) → 1 ∈ ℂ)
344	229	a1i 11	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝑦 ∈ ℝ ∧ 𝑃 ∈ ℝ) → (2 ∈ ℂ ∧ 2 ≠ 0))
345	342, 343, 344, 231	syl3anc 1370	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((𝑦 ∈ ℝ ∧ 𝑃 ∈ ℝ) → ((𝑃 − 1) / 2) = ((𝑃 / 2) − (1 / 2)))
346	345	breq2d 5086	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝑦 ∈ ℝ ∧ 𝑃 ∈ ℝ) → (𝑦 ≤ ((𝑃 − 1) / 2) ↔ 𝑦 ≤ ((𝑃 / 2) − (1 / 2))))
347		lesub 11454	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (((𝑃 / 2) ∈ ℝ ∧ 𝑃 ∈ ℝ ∧ 𝑦 ∈ ℝ) → ((𝑃 / 2) ≤ (𝑃 − 𝑦) ↔ 𝑦 ≤ (𝑃 − (𝑃 / 2))))
348	332, 257, 335, 347	syl3anc 1370	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((𝑦 ∈ ℝ ∧ 𝑃 ∈ ℝ) → ((𝑃 / 2) ≤ (𝑃 − 𝑦) ↔ 𝑦 ≤ (𝑃 − (𝑃 / 2))))
349	258, 262	lenltd 11121	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((𝑦 ∈ ℝ ∧ 𝑃 ∈ ℝ) → ((𝑃 / 2) ≤ (𝑃 − 𝑦) ↔ ¬ (𝑃 − 𝑦) < (𝑃 / 2)))
350		2cnd 12051	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ (𝑃 ∈ ℝ → 2 ∈ ℂ)
351	186	a1i 11	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ (𝑃 ∈ ℝ → 2 ≠ 0)
352	80, 350, 351	divcan1d 11752	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ (𝑃 ∈ ℝ → ((𝑃 / 2) · 2) = 𝑃)
353	352	eqcomd 2744	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ (𝑃 ∈ ℝ → 𝑃 = ((𝑃 / 2) · 2))
354	353	oveq1d 7290	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ (𝑃 ∈ ℝ → (𝑃 − (𝑃 / 2)) = (((𝑃 / 2) · 2) − (𝑃 / 2)))
355	331	recnd 11003	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ (𝑃 ∈ ℝ → (𝑃 / 2) ∈ ℂ)
356	355, 350	mulcomd 10996	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ (𝑃 ∈ ℝ → ((𝑃 / 2) · 2) = (2 · (𝑃 / 2)))
357	356	oveq1d 7290	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ (𝑃 ∈ ℝ → (((𝑃 / 2) · 2) − (𝑃 / 2)) = ((2 · (𝑃 / 2)) − (𝑃 / 2)))
358	350, 355	mulsubfacd 11436	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ (𝑃 ∈ ℝ → ((2 · (𝑃 / 2)) − (𝑃 / 2)) = ((2 − 1) · (𝑃 / 2)))
359		2m1e1 12099	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ (2 − 1) = 1
360	359	a1i 11	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ (𝑃 ∈ ℝ → (2 − 1) = 1)
361	360	oveq1d 7290	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ (𝑃 ∈ ℝ → ((2 − 1) · (𝑃 / 2)) = (1 · (𝑃 / 2)))
362	355	mulid2d 10993	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ (𝑃 ∈ ℝ → (1 · (𝑃 / 2)) = (𝑃 / 2))
363	358, 361, 362	3eqtrd 2782	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ (𝑃 ∈ ℝ → ((2 · (𝑃 / 2)) − (𝑃 / 2)) = (𝑃 / 2))
364	354, 357, 363	3eqtrd 2782	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (𝑃 ∈ ℝ → (𝑃 − (𝑃 / 2)) = (𝑃 / 2))
365	364	adantl 482	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝑦 ∈ ℝ ∧ 𝑃 ∈ ℝ) → (𝑃 − (𝑃 / 2)) = (𝑃 / 2))
366	365	breq2d 5086	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((𝑦 ∈ ℝ ∧ 𝑃 ∈ ℝ) → (𝑦 ≤ (𝑃 − (𝑃 / 2)) ↔ 𝑦 ≤ (𝑃 / 2)))
367	348, 349, 366	3bitr3d 309	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝑦 ∈ ℝ ∧ 𝑃 ∈ ℝ) → (¬ (𝑃 − 𝑦) < (𝑃 / 2) ↔ 𝑦 ≤ (𝑃 / 2)))
368	341, 346, 367	3imtr4d 294	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝑦 ∈ ℝ ∧ 𝑃 ∈ ℝ) → (𝑦 ≤ ((𝑃 − 1) / 2) → ¬ (𝑃 − 𝑦) < (𝑃 / 2)))
369	368	ex 413	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑦 ∈ ℝ → (𝑃 ∈ ℝ → (𝑦 ≤ ((𝑃 − 1) / 2) → ¬ (𝑃 − 𝑦) < (𝑃 / 2))))
370	155, 369	syl 17	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑦 ∈ ℕ → (𝑃 ∈ ℝ → (𝑦 ≤ ((𝑃 − 1) / 2) → ¬ (𝑃 − 𝑦) < (𝑃 / 2))))
371	370	com3l 89	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑃 ∈ ℝ → (𝑦 ≤ ((𝑃 − 1) / 2) → (𝑦 ∈ ℕ → ¬ (𝑃 − 𝑦) < (𝑃 / 2))))
372	329, 371	syl 17	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑃 ∈ ℤ → (𝑦 ≤ ((𝑃 − 1) / 2) → (𝑦 ∈ ℕ → ¬ (𝑃 − 𝑦) < (𝑃 / 2))))
373	54, 55, 372	3syl 18	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑃 ∈ (ℙ ∖ {2}) → (𝑦 ≤ ((𝑃 − 1) / 2) → (𝑦 ∈ ℕ → ¬ (𝑃 − 𝑦) < (𝑃 / 2))))
374	19, 373	syl 17	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → (𝑦 ≤ ((𝑃 − 1) / 2) → (𝑦 ∈ ℕ → ¬ (𝑃 − 𝑦) < (𝑃 / 2))))
375	374	adantl 482	. . . . . . . . . . . . . . . . 17 ⊢ ((¬ 2 ∥ 𝑦 ∧ 𝜑) → (𝑦 ≤ ((𝑃 − 1) / 2) → (𝑦 ∈ ℕ → ¬ (𝑃 − 𝑦) < (𝑃 / 2))))
376	375	com13 88	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ ℕ → (𝑦 ≤ ((𝑃 − 1) / 2) → ((¬ 2 ∥ 𝑦 ∧ 𝜑) → ¬ (𝑃 − 𝑦) < (𝑃 / 2))))
377	189, 376	syl5bi 241	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ ℕ → (𝑦 ≤ 𝐻 → ((¬ 2 ∥ 𝑦 ∧ 𝜑) → ¬ (𝑃 − 𝑦) < (𝑃 / 2))))
378	377	a1d 25	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ ℕ → (𝐻 ∈ ℕ → (𝑦 ≤ 𝐻 → ((¬ 2 ∥ 𝑦 ∧ 𝜑) → ¬ (𝑃 − 𝑦) < (𝑃 / 2)))))
379	378	3imp 1110	. . . . . . . . . . . . 13 ⊢ ((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻) → ((¬ 2 ∥ 𝑦 ∧ 𝜑) → ¬ (𝑃 − 𝑦) < (𝑃 / 2)))
380	379	com12 32	. . . . . . . . . . . 12 ⊢ ((¬ 2 ∥ 𝑦 ∧ 𝜑) → ((𝑦 ∈ ℕ ∧ 𝐻 ∈ ℕ ∧ 𝑦 ≤ 𝐻) → ¬ (𝑃 − 𝑦) < (𝑃 / 2)))
381	149, 380	syl5bi 241	. . . . . . . . . . 11 ⊢ ((¬ 2 ∥ 𝑦 ∧ 𝜑) → (𝑦 ∈ (1...𝐻) → ¬ (𝑃 − 𝑦) < (𝑃 / 2)))
382	381	3impia 1116	. . . . . . . . . 10 ⊢ ((¬ 2 ∥ 𝑦 ∧ 𝜑 ∧ 𝑦 ∈ (1...𝐻)) → ¬ (𝑃 − 𝑦) < (𝑃 / 2))
383	328, 382	eqnbrtrd 5092	. . . . . . . . 9 ⊢ ((¬ 2 ∥ 𝑦 ∧ 𝜑 ∧ 𝑦 ∈ (1...𝐻)) → ¬ (((𝑃 − 𝑦) / 2) · 2) < (𝑃 / 2))
384	383	iffalsed 4470	. . . . . . . 8 ⊢ ((¬ 2 ∥ 𝑦 ∧ 𝜑 ∧ 𝑦 ∈ (1...𝐻)) → if((((𝑃 − 𝑦) / 2) · 2) < (𝑃 / 2), (((𝑃 − 𝑦) / 2) · 2), (𝑃 − (((𝑃 − 𝑦) / 2) · 2))) = (𝑃 − (((𝑃 − 𝑦) / 2) · 2)))
385	328	oveq2d 7291	. . . . . . . 8 ⊢ ((¬ 2 ∥ 𝑦 ∧ 𝜑 ∧ 𝑦 ∈ (1...𝐻)) → (𝑃 − (((𝑃 − 𝑦) / 2) · 2)) = (𝑃 − (𝑃 − 𝑦)))
386	322, 183	anim12i 613	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑦 ∈ (1...𝐻)) → (𝑃 ∈ ℂ ∧ 𝑦 ∈ ℂ))
387	386	3adant1 1129	. . . . . . . . 9 ⊢ ((¬ 2 ∥ 𝑦 ∧ 𝜑 ∧ 𝑦 ∈ (1...𝐻)) → (𝑃 ∈ ℂ ∧ 𝑦 ∈ ℂ))
388		nncan 11250	. . . . . . . . 9 ⊢ ((𝑃 ∈ ℂ ∧ 𝑦 ∈ ℂ) → (𝑃 − (𝑃 − 𝑦)) = 𝑦)
389	387, 388	syl 17	. . . . . . . 8 ⊢ ((¬ 2 ∥ 𝑦 ∧ 𝜑 ∧ 𝑦 ∈ (1...𝐻)) → (𝑃 − (𝑃 − 𝑦)) = 𝑦)
390	384, 385, 389	3eqtrrd 2783	. . . . . . 7 ⊢ ((¬ 2 ∥ 𝑦 ∧ 𝜑 ∧ 𝑦 ∈ (1...𝐻)) → 𝑦 = if((((𝑃 − 𝑦) / 2) · 2) < (𝑃 / 2), (((𝑃 − 𝑦) / 2) · 2), (𝑃 − (((𝑃 − 𝑦) / 2) · 2))))
391	315, 321, 390	rspcedvd 3563	. . . . . 6 ⊢ ((¬ 2 ∥ 𝑦 ∧ 𝜑 ∧ 𝑦 ∈ (1...𝐻)) → ∃𝑥 ∈ (1...𝐻)𝑦 = if((𝑥 · 2) < (𝑃 / 2), (𝑥 · 2), (𝑃 − (𝑥 · 2))))
392	391	3exp 1118	. . . . 5 ⊢ (¬ 2 ∥ 𝑦 → (𝜑 → (𝑦 ∈ (1...𝐻) → ∃𝑥 ∈ (1...𝐻)𝑦 = if((𝑥 · 2) < (𝑃 / 2), (𝑥 · 2), (𝑃 − (𝑥 · 2))))))
393	210, 392	pm2.61i 182	. . . 4 ⊢ (𝜑 → (𝑦 ∈ (1...𝐻) → ∃𝑥 ∈ (1...𝐻)𝑦 = if((𝑥 · 2) < (𝑃 / 2), (𝑥 · 2), (𝑃 − (𝑥 · 2)))))
394	148, 393	impbid 211	. . 3 ⊢ (𝜑 → (∃𝑥 ∈ (1...𝐻)𝑦 = if((𝑥 · 2) < (𝑃 / 2), (𝑥 · 2), (𝑃 − (𝑥 · 2))) ↔ 𝑦 ∈ (1...𝐻)))
395	3, 394	bitrid 282	. 2 ⊢ (𝜑 → (𝑦 ∈ ran 𝑅 ↔ 𝑦 ∈ (1...𝐻)))
396	395	eqrdv 2736	1 ⊢ (𝜑 → ran 𝑅 = (1...𝐻))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 205   ∧ wa 396   ∧ w3a 1086   = wceq 1539   ∈ wcel 2106   ≠ wne 2943  ∃wrex 3065  Vcvv 3432   ∖ cdif 3884  ifcif 4459  {csn 4561   class class class wbr 5074   ↦ cmpt 5157  ran crn 5590  (class class class)co 7275  ℂcc 10869  ℝcr 10870  0cc0 10871  1c1 10872   + caddc 10874   · cmul 10876   < clt 11009   ≤ cle 11010   − cmin 11205   / cdiv 11632  ℕcn 11973  2c2 12028  ℤcz 12319  ℝ⁺crp 12730  ...cfz 13239   ∥ cdvds 15963  ℙcprime 16376

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2709  ax-sep 5223  ax-nul 5230  ax-pow 5288  ax-pr 5352  ax-un 7588  ax-cnex 10927  ax-resscn 10928  ax-1cn 10929  ax-icn 10930  ax-addcl 10931  ax-addrcl 10932  ax-mulcl 10933  ax-mulrcl 10934  ax-mulcom 10935  ax-addass 10936  ax-mulass 10937  ax-distr 10938  ax-i2m1 10939  ax-1ne0 10940  ax-1rid 10941  ax-rnegex 10942  ax-rrecex 10943  ax-cnre 10944  ax-pre-lttri 10945  ax-pre-lttrn 10946  ax-pre-ltadd 10947  ax-pre-mulgt0 10948  ax-pre-sup 10949

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-3or 1087  df-3an 1088  df-tru 1542  df-fal 1552  df-ex 1783  df-nf 1787  df-sb 2068  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2816  df-nfc 2889  df-ne 2944  df-nel 3050  df-ral 3069  df-rex 3070  df-rmo 3071  df-reu 3072  df-rab 3073  df-v 3434  df-sbc 3717  df-csb 3833  df-dif 3890  df-un 3892  df-in 3894  df-ss 3904  df-pss 3906  df-nul 4257  df-if 4460  df-pw 4535  df-sn 4562  df-pr 4564  df-op 4568  df-uni 4840  df-iun 4926  df-br 5075  df-opab 5137  df-mpt 5158  df-tr 5192  df-id 5489  df-eprel 5495  df-po 5503  df-so 5504  df-fr 5544  df-we 5546  df-xp 5595  df-rel 5596  df-cnv 5597  df-co 5598  df-dm 5599  df-rn 5600  df-res 5601  df-ima 5602  df-pred 6202  df-ord 6269  df-on 6270  df-lim 6271  df-suc 6272  df-iota 6391  df-fun 6435  df-fn 6436  df-f 6437  df-f1 6438  df-fo 6439  df-f1o 6440  df-fv 6441  df-riota 7232  df-ov 7278  df-oprab 7279  df-mpo 7280  df-om 7713  df-1st 7831  df-2nd 7832  df-frecs 8097  df-wrecs 8128  df-recs 8202  df-rdg 8241  df-1o 8297  df-2o 8298  df-er 8498  df-en 8734  df-dom 8735  df-sdom 8736  df-fin 8737  df-sup 9201  df-pnf 11011  df-mnf 11012  df-xr 11013  df-ltxr 11014  df-le 11015  df-sub 11207  df-neg 11208  df-div 11633  df-nn 11974  df-2 12036  df-3 12037  df-n0 12234  df-z 12320  df-uz 12583  df-rp 12731  df-ioo 13083  df-fz 13240  df-seq 13722  df-exp 13783  df-cj 14810  df-re 14811  df-im 14812  df-sqrt 14946  df-abs 14947  df-dvds 15964  df-prm 16377

This theorem is referenced by:  gausslemma2dlem1  26514