bposlem6 - Metamath Proof Explorer

	Metamath Proof Explorer		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > bposlem6		Structured version Visualization version GIF version

Theorem bposlem6 25014

Description: Lemma for bpos 25018. By using the various bounds at our disposal, arrive at an inequality that is false for 𝑁 large enough. (Contributed by Mario Carneiro, 14-Mar-2014.) (Revised by Wolf Lammen, 12-Sep-2020.)

**Hypotheses**
Ref	Expression
bpos.1	⊢ (𝜑 → 𝑁 ∈ (ℤ_≥‘5))
bpos.2	⊢ (𝜑 → ¬ ∃𝑝 ∈ ℙ (𝑁 < 𝑝 ∧ 𝑝 ≤ (2 · 𝑁)))
bpos.3	⊢ 𝐹 = (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, (𝑛↑(𝑛 pCnt ((2 · 𝑁)C𝑁))), 1))
bpos.4	⊢ 𝐾 = (⌊‘((2 · 𝑁) / 3))
bpos.5	⊢ 𝑀 = (⌊‘(√‘(2 · 𝑁)))

**Assertion**
Ref	Expression
bposlem6	⊢ (𝜑 → ((4↑𝑁) / 𝑁) < (((2 · 𝑁)↑_𝑐(((√‘(2 · 𝑁)) / 3) + 2)) · (2↑_𝑐(((4 · 𝑁) / 3) − 5))))

Distinct variable groups: 𝐹,𝑝 𝑛,𝑝,𝐾 𝑀,𝑝 𝑛,𝑁,𝑝 𝜑,𝑛,𝑝 Allowed substitution hints: 𝐹(𝑛) 𝑀(𝑛)

**Proof of Theorem bposlem6**
Step	Hyp	Ref	Expression
1		4nn 11187	. . . . 5 ⊢ 4 ∈ ℕ
2		5nn 11188	. . . . . . 7 ⊢ 5 ∈ ℕ
3		bpos.1	. . . . . . 7 ⊢ (𝜑 → 𝑁 ∈ (ℤ_≥‘5))
4		eluznn 11758	. . . . . . 7 ⊢ ((5 ∈ ℕ ∧ 𝑁 ∈ (ℤ_≥‘5)) → 𝑁 ∈ ℕ)
5	2, 3, 4	sylancr 695	. . . . . 6 ⊢ (𝜑 → 𝑁 ∈ ℕ)
6	5	nnnn0d 11351	. . . . 5 ⊢ (𝜑 → 𝑁 ∈ ℕ₀)
7		nnexpcl 12873	. . . . 5 ⊢ ((4 ∈ ℕ ∧ 𝑁 ∈ ℕ₀) → (4↑𝑁) ∈ ℕ)
8	1, 6, 7	sylancr 695	. . . 4 ⊢ (𝜑 → (4↑𝑁) ∈ ℕ)
9	8	nnred 11035	. . 3 ⊢ (𝜑 → (4↑𝑁) ∈ ℝ)
10	9, 5	nndivred 11069	. 2 ⊢ (𝜑 → ((4↑𝑁) / 𝑁) ∈ ℝ)
11		fzctr 12451	. . . . 5 ⊢ (𝑁 ∈ ℕ₀ → 𝑁 ∈ (0...(2 · 𝑁)))
12	6, 11	syl 17	. . . 4 ⊢ (𝜑 → 𝑁 ∈ (0...(2 · 𝑁)))
13		bccl2 13110	. . . 4 ⊢ (𝑁 ∈ (0...(2 · 𝑁)) → ((2 · 𝑁)C𝑁) ∈ ℕ)
14	12, 13	syl 17	. . 3 ⊢ (𝜑 → ((2 · 𝑁)C𝑁) ∈ ℕ)
15	14	nnred 11035	. 2 ⊢ (𝜑 → ((2 · 𝑁)C𝑁) ∈ ℝ)
16		2nn 11185	. . . . . . 7 ⊢ 2 ∈ ℕ
17		nnmulcl 11043	. . . . . . 7 ⊢ ((2 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (2 · 𝑁) ∈ ℕ)
18	16, 5, 17	sylancr 695	. . . . . 6 ⊢ (𝜑 → (2 · 𝑁) ∈ ℕ)
19	18	nnrpd 11870	. . . . 5 ⊢ (𝜑 → (2 · 𝑁) ∈ ℝ⁺)
20	18	nnred 11035	. . . . . . . 8 ⊢ (𝜑 → (2 · 𝑁) ∈ ℝ)
21	19	rpge0d 11876	. . . . . . . 8 ⊢ (𝜑 → 0 ≤ (2 · 𝑁))
22	20, 21	resqrtcld 14156	. . . . . . 7 ⊢ (𝜑 → (√‘(2 · 𝑁)) ∈ ℝ)
23		3nn 11186	. . . . . . 7 ⊢ 3 ∈ ℕ
24		nndivre 11056	. . . . . . 7 ⊢ (((√‘(2 · 𝑁)) ∈ ℝ ∧ 3 ∈ ℕ) → ((√‘(2 · 𝑁)) / 3) ∈ ℝ)
25	22, 23, 24	sylancl 694	. . . . . 6 ⊢ (𝜑 → ((√‘(2 · 𝑁)) / 3) ∈ ℝ)
26		2re 11090	. . . . . 6 ⊢ 2 ∈ ℝ
27		readdcl 10019	. . . . . 6 ⊢ ((((√‘(2 · 𝑁)) / 3) ∈ ℝ ∧ 2 ∈ ℝ) → (((√‘(2 · 𝑁)) / 3) + 2) ∈ ℝ)
28	25, 26, 27	sylancl 694	. . . . 5 ⊢ (𝜑 → (((√‘(2 · 𝑁)) / 3) + 2) ∈ ℝ)
29	19, 28	rpcxpcld 24476	. . . 4 ⊢ (𝜑 → ((2 · 𝑁)↑_𝑐(((√‘(2 · 𝑁)) / 3) + 2)) ∈ ℝ⁺)
30	29	rpred 11872	. . 3 ⊢ (𝜑 → ((2 · 𝑁)↑_𝑐(((√‘(2 · 𝑁)) / 3) + 2)) ∈ ℝ)
31		2rp 11837	. . . . 5 ⊢ 2 ∈ ℝ⁺
32		nnmulcl 11043	. . . . . . . . 9 ⊢ ((4 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (4 · 𝑁) ∈ ℕ)
33	1, 5, 32	sylancr 695	. . . . . . . 8 ⊢ (𝜑 → (4 · 𝑁) ∈ ℕ)
34	33	nnred 11035	. . . . . . 7 ⊢ (𝜑 → (4 · 𝑁) ∈ ℝ)
35		nndivre 11056	. . . . . . 7 ⊢ (((4 · 𝑁) ∈ ℝ ∧ 3 ∈ ℕ) → ((4 · 𝑁) / 3) ∈ ℝ)
36	34, 23, 35	sylancl 694	. . . . . 6 ⊢ (𝜑 → ((4 · 𝑁) / 3) ∈ ℝ)
37		5re 11099	. . . . . 6 ⊢ 5 ∈ ℝ
38		resubcl 10345	. . . . . 6 ⊢ ((((4 · 𝑁) / 3) ∈ ℝ ∧ 5 ∈ ℝ) → (((4 · 𝑁) / 3) − 5) ∈ ℝ)
39	36, 37, 38	sylancl 694	. . . . 5 ⊢ (𝜑 → (((4 · 𝑁) / 3) − 5) ∈ ℝ)
40		rpcxpcl 24422	. . . . 5 ⊢ ((2 ∈ ℝ⁺ ∧ (((4 · 𝑁) / 3) − 5) ∈ ℝ) → (2↑_𝑐(((4 · 𝑁) / 3) − 5)) ∈ ℝ⁺)
41	31, 39, 40	sylancr 695	. . . 4 ⊢ (𝜑 → (2↑_𝑐(((4 · 𝑁) / 3) − 5)) ∈ ℝ⁺)
42	41	rpred 11872	. . 3 ⊢ (𝜑 → (2↑_𝑐(((4 · 𝑁) / 3) − 5)) ∈ ℝ)
43	30, 42	remulcld 10070	. 2 ⊢ (𝜑 → (((2 · 𝑁)↑_𝑐(((√‘(2 · 𝑁)) / 3) + 2)) · (2↑_𝑐(((4 · 𝑁) / 3) − 5))) ∈ ℝ)
44		df-5 11082	. . . . 5 ⊢ 5 = (4 + 1)
45		4z 11411	. . . . . 6 ⊢ 4 ∈ ℤ
46		uzid 11702	. . . . . 6 ⊢ (4 ∈ ℤ → 4 ∈ (ℤ_≥‘4))
47		peano2uz 11741	. . . . . 6 ⊢ (4 ∈ (ℤ_≥‘4) → (4 + 1) ∈ (ℤ_≥‘4))
48	45, 46, 47	mp2b 10	. . . . 5 ⊢ (4 + 1) ∈ (ℤ_≥‘4)
49	44, 48	eqeltri 2697	. . . 4 ⊢ 5 ∈ (ℤ_≥‘4)
50		eqid 2622	. . . . 5 ⊢ (ℤ_≥‘4) = (ℤ_≥‘4)
51	50	uztrn2 11705	. . . 4 ⊢ ((5 ∈ (ℤ_≥‘4) ∧ 𝑁 ∈ (ℤ_≥‘5)) → 𝑁 ∈ (ℤ_≥‘4))
52	49, 3, 51	sylancr 695	. . 3 ⊢ (𝜑 → 𝑁 ∈ (ℤ_≥‘4))
53		bclbnd 25005	. . 3 ⊢ (𝑁 ∈ (ℤ_≥‘4) → ((4↑𝑁) / 𝑁) < ((2 · 𝑁)C𝑁))
54	52, 53	syl 17	. 2 ⊢ (𝜑 → ((4↑𝑁) / 𝑁) < ((2 · 𝑁)C𝑁))
55		bpos.3	. . . . . . . 8 ⊢ 𝐹 = (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, (𝑛↑(𝑛 pCnt ((2 · 𝑁)C𝑁))), 1))
56		id 22	. . . . . . . . . 10 ⊢ (𝑛 ∈ ℙ → 𝑛 ∈ ℙ)
57		pccl 15554	. . . . . . . . . 10 ⊢ ((𝑛 ∈ ℙ ∧ ((2 · 𝑁)C𝑁) ∈ ℕ) → (𝑛 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ₀)
58	56, 14, 57	syl2anr 495	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℙ) → (𝑛 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ₀)
59	58	ralrimiva 2966	. . . . . . . 8 ⊢ (𝜑 → ∀𝑛 ∈ ℙ (𝑛 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ₀)
60	55, 59	pcmptcl 15595	. . . . . . 7 ⊢ (𝜑 → (𝐹:ℕ⟶ℕ ∧ seq1( · , 𝐹):ℕ⟶ℕ))
61	60	simprd 479	. . . . . 6 ⊢ (𝜑 → seq1( · , 𝐹):ℕ⟶ℕ)
62		bpos.2	. . . . . . . . 9 ⊢ (𝜑 → ¬ ∃𝑝 ∈ ℙ (𝑁 < 𝑝 ∧ 𝑝 ≤ (2 · 𝑁)))
63		bpos.4	. . . . . . . . 9 ⊢ 𝐾 = (⌊‘((2 · 𝑁) / 3))
64		bpos.5	. . . . . . . . 9 ⊢ 𝑀 = (⌊‘(√‘(2 · 𝑁)))
65	3, 62, 55, 63, 64	bposlem4 25012	. . . . . . . 8 ⊢ (𝜑 → 𝑀 ∈ (3...𝐾))
66		elfzuz 12338	. . . . . . . 8 ⊢ (𝑀 ∈ (3...𝐾) → 𝑀 ∈ (ℤ_≥‘3))
67	65, 66	syl 17	. . . . . . 7 ⊢ (𝜑 → 𝑀 ∈ (ℤ_≥‘3))
68		eluznn 11758	. . . . . . 7 ⊢ ((3 ∈ ℕ ∧ 𝑀 ∈ (ℤ_≥‘3)) → 𝑀 ∈ ℕ)
69	23, 67, 68	sylancr 695	. . . . . 6 ⊢ (𝜑 → 𝑀 ∈ ℕ)
70	61, 69	ffvelrnd 6360	. . . . 5 ⊢ (𝜑 → (seq1( · , 𝐹)‘𝑀) ∈ ℕ)
71	70	nnred 11035	. . . 4 ⊢ (𝜑 → (seq1( · , 𝐹)‘𝑀) ∈ ℝ)
72		2z 11409	. . . . . . . . 9 ⊢ 2 ∈ ℤ
73		nndivre 11056	. . . . . . . . . . . 12 ⊢ (((2 · 𝑁) ∈ ℝ ∧ 3 ∈ ℕ) → ((2 · 𝑁) / 3) ∈ ℝ)
74	20, 23, 73	sylancl 694	. . . . . . . . . . 11 ⊢ (𝜑 → ((2 · 𝑁) / 3) ∈ ℝ)
75	74	flcld 12599	. . . . . . . . . 10 ⊢ (𝜑 → (⌊‘((2 · 𝑁) / 3)) ∈ ℤ)
76	63, 75	syl5eqel 2705	. . . . . . . . 9 ⊢ (𝜑 → 𝐾 ∈ ℤ)
77		zmulcl 11426	. . . . . . . . 9 ⊢ ((2 ∈ ℤ ∧ 𝐾 ∈ ℤ) → (2 · 𝐾) ∈ ℤ)
78	72, 76, 77	sylancr 695	. . . . . . . 8 ⊢ (𝜑 → (2 · 𝐾) ∈ ℤ)
79	2	nnzi 11401	. . . . . . . 8 ⊢ 5 ∈ ℤ
80		zsubcl 11419	. . . . . . . 8 ⊢ (((2 · 𝐾) ∈ ℤ ∧ 5 ∈ ℤ) → ((2 · 𝐾) − 5) ∈ ℤ)
81	78, 79, 80	sylancl 694	. . . . . . 7 ⊢ (𝜑 → ((2 · 𝐾) − 5) ∈ ℤ)
82	81	zred 11482	. . . . . 6 ⊢ (𝜑 → ((2 · 𝐾) − 5) ∈ ℝ)
83		rpcxpcl 24422	. . . . . 6 ⊢ ((2 ∈ ℝ⁺ ∧ ((2 · 𝐾) − 5) ∈ ℝ) → (2↑_𝑐((2 · 𝐾) − 5)) ∈ ℝ⁺)
84	31, 82, 83	sylancr 695	. . . . 5 ⊢ (𝜑 → (2↑_𝑐((2 · 𝐾) − 5)) ∈ ℝ⁺)
85	84	rpred 11872	. . . 4 ⊢ (𝜑 → (2↑_𝑐((2 · 𝐾) − 5)) ∈ ℝ)
86	71, 85	remulcld 10070	. . 3 ⊢ (𝜑 → ((seq1( · , 𝐹)‘𝑀) · (2↑_𝑐((2 · 𝐾) − 5))) ∈ ℝ)
87	3, 62, 55, 63	bposlem3 25011	. . . 4 ⊢ (𝜑 → (seq1( · , 𝐹)‘𝐾) = ((2 · 𝑁)C𝑁))
88		elfzuz3 12339	. . . . . . . . . 10 ⊢ (𝑀 ∈ (3...𝐾) → 𝐾 ∈ (ℤ_≥‘𝑀))
89	65, 88	syl 17	. . . . . . . . 9 ⊢ (𝜑 → 𝐾 ∈ (ℤ_≥‘𝑀))
90	55, 59, 69, 89	pcmptdvds 15598	. . . . . . . 8 ⊢ (𝜑 → (seq1( · , 𝐹)‘𝑀) ∥ (seq1( · , 𝐹)‘𝐾))
91	70	nnzd 11481	. . . . . . . . 9 ⊢ (𝜑 → (seq1( · , 𝐹)‘𝑀) ∈ ℤ)
92	70	nnne0d 11065	. . . . . . . . 9 ⊢ (𝜑 → (seq1( · , 𝐹)‘𝑀) ≠ 0)
93		uztrn 11704	. . . . . . . . . . . . 13 ⊢ ((𝐾 ∈ (ℤ_≥‘𝑀) ∧ 𝑀 ∈ (ℤ_≥‘3)) → 𝐾 ∈ (ℤ_≥‘3))
94	89, 67, 93	syl2anc 693	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐾 ∈ (ℤ_≥‘3))
95		eluznn 11758	. . . . . . . . . . . 12 ⊢ ((3 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘3)) → 𝐾 ∈ ℕ)
96	23, 94, 95	sylancr 695	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐾 ∈ ℕ)
97	61, 96	ffvelrnd 6360	. . . . . . . . . 10 ⊢ (𝜑 → (seq1( · , 𝐹)‘𝐾) ∈ ℕ)
98	97	nnzd 11481	. . . . . . . . 9 ⊢ (𝜑 → (seq1( · , 𝐹)‘𝐾) ∈ ℤ)
99		dvdsval2 14986	. . . . . . . . 9 ⊢ (((seq1( · , 𝐹)‘𝑀) ∈ ℤ ∧ (seq1( · , 𝐹)‘𝑀) ≠ 0 ∧ (seq1( · , 𝐹)‘𝐾) ∈ ℤ) → ((seq1( · , 𝐹)‘𝑀) ∥ (seq1( · , 𝐹)‘𝐾) ↔ ((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) ∈ ℤ))
100	91, 92, 98, 99	syl3anc 1326	. . . . . . . 8 ⊢ (𝜑 → ((seq1( · , 𝐹)‘𝑀) ∥ (seq1( · , 𝐹)‘𝐾) ↔ ((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) ∈ ℤ))
101	90, 100	mpbid 222	. . . . . . 7 ⊢ (𝜑 → ((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) ∈ ℤ)
102	101	zred 11482	. . . . . 6 ⊢ (𝜑 → ((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) ∈ ℝ)
103	69	nnred 11035	. . . . . . . . 9 ⊢ (𝜑 → 𝑀 ∈ ℝ)
104	76	zred 11482	. . . . . . . . 9 ⊢ (𝜑 → 𝐾 ∈ ℝ)
105		eluzle 11700	. . . . . . . . . 10 ⊢ (𝐾 ∈ (ℤ_≥‘𝑀) → 𝑀 ≤ 𝐾)
106	89, 105	syl 17	. . . . . . . . 9 ⊢ (𝜑 → 𝑀 ≤ 𝐾)
107		efchtdvds 24885	. . . . . . . . 9 ⊢ ((𝑀 ∈ ℝ ∧ 𝐾 ∈ ℝ ∧ 𝑀 ≤ 𝐾) → (exp‘(θ‘𝑀)) ∥ (exp‘(θ‘𝐾)))
108	103, 104, 106, 107	syl3anc 1326	. . . . . . . 8 ⊢ (𝜑 → (exp‘(θ‘𝑀)) ∥ (exp‘(θ‘𝐾)))
109		efchtcl 24837	. . . . . . . . . . 11 ⊢ (𝑀 ∈ ℝ → (exp‘(θ‘𝑀)) ∈ ℕ)
110	103, 109	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → (exp‘(θ‘𝑀)) ∈ ℕ)
111	110	nnzd 11481	. . . . . . . . 9 ⊢ (𝜑 → (exp‘(θ‘𝑀)) ∈ ℤ)
112	110	nnne0d 11065	. . . . . . . . 9 ⊢ (𝜑 → (exp‘(θ‘𝑀)) ≠ 0)
113		efchtcl 24837	. . . . . . . . . . 11 ⊢ (𝐾 ∈ ℝ → (exp‘(θ‘𝐾)) ∈ ℕ)
114	104, 113	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → (exp‘(θ‘𝐾)) ∈ ℕ)
115	114	nnzd 11481	. . . . . . . . 9 ⊢ (𝜑 → (exp‘(θ‘𝐾)) ∈ ℤ)
116		dvdsval2 14986	. . . . . . . . 9 ⊢ (((exp‘(θ‘𝑀)) ∈ ℤ ∧ (exp‘(θ‘𝑀)) ≠ 0 ∧ (exp‘(θ‘𝐾)) ∈ ℤ) → ((exp‘(θ‘𝑀)) ∥ (exp‘(θ‘𝐾)) ↔ ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) ∈ ℤ))
117	111, 112, 115, 116	syl3anc 1326	. . . . . . . 8 ⊢ (𝜑 → ((exp‘(θ‘𝑀)) ∥ (exp‘(θ‘𝐾)) ↔ ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) ∈ ℤ))
118	108, 117	mpbid 222	. . . . . . 7 ⊢ (𝜑 → ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) ∈ ℤ)
119	118	zred 11482	. . . . . 6 ⊢ (𝜑 → ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) ∈ ℝ)
120		prmz 15389	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑝 ∈ ℙ → 𝑝 ∈ ℤ)
121		fllt 12607	. . . . . . . . . . . . . . . . . 18 ⊢ (((√‘(2 · 𝑁)) ∈ ℝ ∧ 𝑝 ∈ ℤ) → ((√‘(2 · 𝑁)) < 𝑝 ↔ (⌊‘(√‘(2 · 𝑁))) < 𝑝))
122	22, 120, 121	syl2an 494	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → ((√‘(2 · 𝑁)) < 𝑝 ↔ (⌊‘(√‘(2 · 𝑁))) < 𝑝))
123	64	breq1i 4660	. . . . . . . . . . . . . . . . 17 ⊢ (𝑀 < 𝑝 ↔ (⌊‘(√‘(2 · 𝑁))) < 𝑝)
124	122, 123	syl6bbr 278	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → ((√‘(2 · 𝑁)) < 𝑝 ↔ 𝑀 < 𝑝))
125	120	zred 11482	. . . . . . . . . . . . . . . . 17 ⊢ (𝑝 ∈ ℙ → 𝑝 ∈ ℝ)
126		ltnle 10117	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑀 ∈ ℝ ∧ 𝑝 ∈ ℝ) → (𝑀 < 𝑝 ↔ ¬ 𝑝 ≤ 𝑀))
127	103, 125, 126	syl2an 494	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (𝑀 < 𝑝 ↔ ¬ 𝑝 ≤ 𝑀))
128	124, 127	bitrd 268	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → ((√‘(2 · 𝑁)) < 𝑝 ↔ ¬ 𝑝 ≤ 𝑀))
129		bposlem1 25009	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (𝑝↑(𝑝 pCnt ((2 · 𝑁)C𝑁))) ≤ (2 · 𝑁))
130	5, 129	sylan 488	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (𝑝↑(𝑝 pCnt ((2 · 𝑁)C𝑁))) ≤ (2 · 𝑁))
131	125	adantl 482	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → 𝑝 ∈ ℝ)
132		id 22	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑝 ∈ ℙ → 𝑝 ∈ ℙ)
133		pccl 15554	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑝 ∈ ℙ ∧ ((2 · 𝑁)C𝑁) ∈ ℕ) → (𝑝 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ₀)
134	132, 14, 133	syl2anr 495	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ₀)
135	131, 134	reexpcld 13025	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (𝑝↑(𝑝 pCnt ((2 · 𝑁)C𝑁))) ∈ ℝ)
136	20	adantr 481	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (2 · 𝑁) ∈ ℝ)
137	131	resqcld 13035	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (𝑝↑2) ∈ ℝ)
138		lelttr 10128	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑝↑(𝑝 pCnt ((2 · 𝑁)C𝑁))) ∈ ℝ ∧ (2 · 𝑁) ∈ ℝ ∧ (𝑝↑2) ∈ ℝ) → (((𝑝↑(𝑝 pCnt ((2 · 𝑁)C𝑁))) ≤ (2 · 𝑁) ∧ (2 · 𝑁) < (𝑝↑2)) → (𝑝↑(𝑝 pCnt ((2 · 𝑁)C𝑁))) < (𝑝↑2)))
139	135, 136, 137, 138	syl3anc 1326	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (((𝑝↑(𝑝 pCnt ((2 · 𝑁)C𝑁))) ≤ (2 · 𝑁) ∧ (2 · 𝑁) < (𝑝↑2)) → (𝑝↑(𝑝 pCnt ((2 · 𝑁)C𝑁))) < (𝑝↑2)))
140	130, 139	mpand 711	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → ((2 · 𝑁) < (𝑝↑2) → (𝑝↑(𝑝 pCnt ((2 · 𝑁)C𝑁))) < (𝑝↑2)))
141		resqrtth 13996	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((2 · 𝑁) ∈ ℝ ∧ 0 ≤ (2 · 𝑁)) → ((√‘(2 · 𝑁))↑2) = (2 · 𝑁))
142	20, 21, 141	syl2anc 693	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → ((√‘(2 · 𝑁))↑2) = (2 · 𝑁))
143	142	breq1d 4663	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → (((√‘(2 · 𝑁))↑2) < (𝑝↑2) ↔ (2 · 𝑁) < (𝑝↑2)))
144	143	adantr 481	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (((√‘(2 · 𝑁))↑2) < (𝑝↑2) ↔ (2 · 𝑁) < (𝑝↑2)))
145	134	nn0zd 11480	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt ((2 · 𝑁)C𝑁)) ∈ ℤ)
146	72	a1i 11	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → 2 ∈ ℤ)
147		prmgt1 15409	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑝 ∈ ℙ → 1 < 𝑝)
148	147	adantl 482	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → 1 < 𝑝)
149	131, 145, 146, 148	ltexp2d 13038	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → ((𝑝 pCnt ((2 · 𝑁)C𝑁)) < 2 ↔ (𝑝↑(𝑝 pCnt ((2 · 𝑁)C𝑁))) < (𝑝↑2)))
150	140, 144, 149	3imtr4d 283	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (((√‘(2 · 𝑁))↑2) < (𝑝↑2) → (𝑝 pCnt ((2 · 𝑁)C𝑁)) < 2))
151		df-2 11079	. . . . . . . . . . . . . . . . . 18 ⊢ 2 = (1 + 1)
152	151	breq2i 4661	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑝 pCnt ((2 · 𝑁)C𝑁)) < 2 ↔ (𝑝 pCnt ((2 · 𝑁)C𝑁)) < (1 + 1))
153	150, 152	syl6ib 241	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (((√‘(2 · 𝑁))↑2) < (𝑝↑2) → (𝑝 pCnt ((2 · 𝑁)C𝑁)) < (1 + 1)))
154	22	adantr 481	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (√‘(2 · 𝑁)) ∈ ℝ)
155	20, 21	sqrtge0d 14159	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → 0 ≤ (√‘(2 · 𝑁)))
156	155	adantr 481	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → 0 ≤ (√‘(2 · 𝑁)))
157		prmnn 15388	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑝 ∈ ℙ → 𝑝 ∈ ℕ)
158	157	nnrpd 11870	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑝 ∈ ℙ → 𝑝 ∈ ℝ⁺)
159	158	rpge0d 11876	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑝 ∈ ℙ → 0 ≤ 𝑝)
160	159	adantl 482	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → 0 ≤ 𝑝)
161	154, 131, 156, 160	lt2sqd 13043	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → ((√‘(2 · 𝑁)) < 𝑝 ↔ ((√‘(2 · 𝑁))↑2) < (𝑝↑2)))
162		1z 11407	. . . . . . . . . . . . . . . . 17 ⊢ 1 ∈ ℤ
163		zleltp1 11428	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑝 pCnt ((2 · 𝑁)C𝑁)) ∈ ℤ ∧ 1 ∈ ℤ) → ((𝑝 pCnt ((2 · 𝑁)C𝑁)) ≤ 1 ↔ (𝑝 pCnt ((2 · 𝑁)C𝑁)) < (1 + 1)))
164	145, 162, 163	sylancl 694	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → ((𝑝 pCnt ((2 · 𝑁)C𝑁)) ≤ 1 ↔ (𝑝 pCnt ((2 · 𝑁)C𝑁)) < (1 + 1)))
165	153, 161, 164	3imtr4d 283	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → ((√‘(2 · 𝑁)) < 𝑝 → (𝑝 pCnt ((2 · 𝑁)C𝑁)) ≤ 1))
166	128, 165	sylbird 250	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (¬ 𝑝 ≤ 𝑀 → (𝑝 pCnt ((2 · 𝑁)C𝑁)) ≤ 1))
167	166	imp 445	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℙ) ∧ ¬ 𝑝 ≤ 𝑀) → (𝑝 pCnt ((2 · 𝑁)C𝑁)) ≤ 1)
168	167	adantrl 752	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀)) → (𝑝 pCnt ((2 · 𝑁)C𝑁)) ≤ 1)
169		iftrue 4092	. . . . . . . . . . . . 13 ⊢ ((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀) → if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), (𝑝 pCnt ((2 · 𝑁)C𝑁)), 0) = (𝑝 pCnt ((2 · 𝑁)C𝑁)))
170	169	adantl 482	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀)) → if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), (𝑝 pCnt ((2 · 𝑁)C𝑁)), 0) = (𝑝 pCnt ((2 · 𝑁)C𝑁)))
171		iftrue 4092	. . . . . . . . . . . . 13 ⊢ ((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀) → if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), 1, 0) = 1)
172	171	adantl 482	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀)) → if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), 1, 0) = 1)
173	168, 170, 172	3brtr4d 4685	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀)) → if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), (𝑝 pCnt ((2 · 𝑁)C𝑁)), 0) ≤ if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), 1, 0))
174		0le0 11110	. . . . . . . . . . . . 13 ⊢ 0 ≤ 0
175		iffalse 4095	. . . . . . . . . . . . . 14 ⊢ (¬ (𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀) → if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), (𝑝 pCnt ((2 · 𝑁)C𝑁)), 0) = 0)
176		iffalse 4095	. . . . . . . . . . . . . 14 ⊢ (¬ (𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀) → if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), 1, 0) = 0)
177	175, 176	breq12d 4666	. . . . . . . . . . . . 13 ⊢ (¬ (𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀) → (if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), (𝑝 pCnt ((2 · 𝑁)C𝑁)), 0) ≤ if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), 1, 0) ↔ 0 ≤ 0))
178	174, 177	mpbiri 248	. . . . . . . . . . . 12 ⊢ (¬ (𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀) → if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), (𝑝 pCnt ((2 · 𝑁)C𝑁)), 0) ≤ if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), 1, 0))
179	178	adantl 482	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑝 ∈ ℙ) ∧ ¬ (𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀)) → if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), (𝑝 pCnt ((2 · 𝑁)C𝑁)), 0) ≤ if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), 1, 0))
180	173, 179	pm2.61dan 832	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), (𝑝 pCnt ((2 · 𝑁)C𝑁)), 0) ≤ if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), 1, 0))
181	59	adantr 481	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → ∀𝑛 ∈ ℙ (𝑛 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ₀)
182	69	adantr 481	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → 𝑀 ∈ ℕ)
183		simpr 477	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → 𝑝 ∈ ℙ)
184		oveq1 6657	. . . . . . . . . . 11 ⊢ (𝑛 = 𝑝 → (𝑛 pCnt ((2 · 𝑁)C𝑁)) = (𝑝 pCnt ((2 · 𝑁)C𝑁)))
185	89	adantr 481	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → 𝐾 ∈ (ℤ_≥‘𝑀))
186	55, 181, 182, 183, 184, 185	pcmpt2 15597	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt ((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀))) = if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), (𝑝 pCnt ((2 · 𝑁)C𝑁)), 0))
187		eqid 2622	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)) = (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1))
188	187	prmorcht 24904	. . . . . . . . . . . . . . 15 ⊢ (𝐾 ∈ ℕ → (exp‘(θ‘𝐾)) = (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)))‘𝐾))
189	96, 188	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (exp‘(θ‘𝐾)) = (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)))‘𝐾))
190	187	prmorcht 24904	. . . . . . . . . . . . . . 15 ⊢ (𝑀 ∈ ℕ → (exp‘(θ‘𝑀)) = (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)))‘𝑀))
191	69, 190	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (exp‘(θ‘𝑀)) = (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)))‘𝑀))
192	189, 191	oveq12d 6668	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) = ((seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)))‘𝐾) / (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)))‘𝑀)))
193	192	adantr 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) = ((seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)))‘𝐾) / (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)))‘𝑀)))
194	193	oveq2d 6666	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀)))) = (𝑝 pCnt ((seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)))‘𝐾) / (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)))‘𝑀))))
195		nncn 11028	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ ℕ → 𝑛 ∈ ℂ)
196	195	exp1d 13003	. . . . . . . . . . . . . . 15 ⊢ (𝑛 ∈ ℕ → (𝑛↑1) = 𝑛)
197	196	ifeq1d 4104	. . . . . . . . . . . . . 14 ⊢ (𝑛 ∈ ℕ → if(𝑛 ∈ ℙ, (𝑛↑1), 1) = if(𝑛 ∈ ℙ, 𝑛, 1))
198	197	mpteq2ia 4740	. . . . . . . . . . . . 13 ⊢ (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, (𝑛↑1), 1)) = (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1))
199	198	eqcomi 2631	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)) = (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, (𝑛↑1), 1))
200		1nn0 11308	. . . . . . . . . . . . . . 15 ⊢ 1 ∈ ℕ₀
201	200	a1i 11	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑛 ∈ ℙ) → 1 ∈ ℕ₀)
202	201	ralrimiva 2966	. . . . . . . . . . . . 13 ⊢ (𝜑 → ∀𝑛 ∈ ℙ 1 ∈ ℕ₀)
203	202	adantr 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → ∀𝑛 ∈ ℙ 1 ∈ ℕ₀)
204		eqidd 2623	. . . . . . . . . . . 12 ⊢ (𝑛 = 𝑝 → 1 = 1)
205	199, 203, 182, 183, 204, 185	pcmpt2 15597	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt ((seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)))‘𝐾) / (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)))‘𝑀))) = if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), 1, 0))
206	194, 205	eqtrd 2656	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀)))) = if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), 1, 0))
207	180, 186, 206	3brtr4d 4685	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt ((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀))) ≤ (𝑝 pCnt ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀)))))
208	207	ralrimiva 2966	. . . . . . . 8 ⊢ (𝜑 → ∀𝑝 ∈ ℙ (𝑝 pCnt ((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀))) ≤ (𝑝 pCnt ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀)))))
209		pc2dvds 15583	. . . . . . . . 9 ⊢ ((((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) ∈ ℤ ∧ ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) ∈ ℤ) → (((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) ∥ ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) ↔ ∀𝑝 ∈ ℙ (𝑝 pCnt ((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀))) ≤ (𝑝 pCnt ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))))))
210	101, 118, 209	syl2anc 693	. . . . . . . 8 ⊢ (𝜑 → (((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) ∥ ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) ↔ ∀𝑝 ∈ ℙ (𝑝 pCnt ((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀))) ≤ (𝑝 pCnt ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))))))
211	208, 210	mpbird 247	. . . . . . 7 ⊢ (𝜑 → ((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) ∥ ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))))
212	114	nnred 11035	. . . . . . . . . 10 ⊢ (𝜑 → (exp‘(θ‘𝐾)) ∈ ℝ)
213	110	nnred 11035	. . . . . . . . . 10 ⊢ (𝜑 → (exp‘(θ‘𝑀)) ∈ ℝ)
214	114	nngt0d 11064	. . . . . . . . . 10 ⊢ (𝜑 → 0 < (exp‘(θ‘𝐾)))
215	110	nngt0d 11064	. . . . . . . . . 10 ⊢ (𝜑 → 0 < (exp‘(θ‘𝑀)))
216	212, 213, 214, 215	divgt0d 10959	. . . . . . . . 9 ⊢ (𝜑 → 0 < ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))))
217		elnnz 11387	. . . . . . . . 9 ⊢ (((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) ∈ ℕ ↔ (((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) ∈ ℤ ∧ 0 < ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀)))))
218	118, 216, 217	sylanbrc 698	. . . . . . . 8 ⊢ (𝜑 → ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) ∈ ℕ)
219		dvdsle 15032	. . . . . . . 8 ⊢ ((((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) ∈ ℤ ∧ ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) ∈ ℕ) → (((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) ∥ ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) → ((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) ≤ ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀)))))
220	101, 218, 219	syl2anc 693	. . . . . . 7 ⊢ (𝜑 → (((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) ∥ ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) → ((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) ≤ ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀)))))
221	211, 220	mpd 15	. . . . . 6 ⊢ (𝜑 → ((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) ≤ ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))))
222		nndivre 11056	. . . . . . . 8 ⊢ (((exp‘(θ‘𝐾)) ∈ ℝ ∧ 4 ∈ ℕ) → ((exp‘(θ‘𝐾)) / 4) ∈ ℝ)
223	212, 1, 222	sylancl 694	. . . . . . 7 ⊢ (𝜑 → ((exp‘(θ‘𝐾)) / 4) ∈ ℝ)
224		4re 11097	. . . . . . . . . 10 ⊢ 4 ∈ ℝ
225	224	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → 4 ∈ ℝ)
226		6re 11101	. . . . . . . . . 10 ⊢ 6 ∈ ℝ
227	226	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → 6 ∈ ℝ)
228		4lt6 11205	. . . . . . . . . 10 ⊢ 4 < 6
229	228	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → 4 < 6)
230		cht3 24899	. . . . . . . . . . . 12 ⊢ (θ‘3) = (log‘6)
231	230	fveq2i 6194	. . . . . . . . . . 11 ⊢ (exp‘(θ‘3)) = (exp‘(log‘6))
232		6pos 11119	. . . . . . . . . . . . 13 ⊢ 0 < 6
233	226, 232	elrpii 11835	. . . . . . . . . . . 12 ⊢ 6 ∈ ℝ⁺
234		reeflog 24327	. . . . . . . . . . . 12 ⊢ (6 ∈ ℝ⁺ → (exp‘(log‘6)) = 6)
235	233, 234	ax-mp 5	. . . . . . . . . . 11 ⊢ (exp‘(log‘6)) = 6
236	231, 235	eqtri 2644	. . . . . . . . . 10 ⊢ (exp‘(θ‘3)) = 6
237		3re 11094	. . . . . . . . . . . . 13 ⊢ 3 ∈ ℝ
238	237	a1i 11	. . . . . . . . . . . 12 ⊢ (𝜑 → 3 ∈ ℝ)
239		eluzle 11700	. . . . . . . . . . . . 13 ⊢ (𝑀 ∈ (ℤ_≥‘3) → 3 ≤ 𝑀)
240	67, 239	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → 3 ≤ 𝑀)
241		chtwordi 24882	. . . . . . . . . . . 12 ⊢ ((3 ∈ ℝ ∧ 𝑀 ∈ ℝ ∧ 3 ≤ 𝑀) → (θ‘3) ≤ (θ‘𝑀))
242	238, 103, 240, 241	syl3anc 1326	. . . . . . . . . . 11 ⊢ (𝜑 → (θ‘3) ≤ (θ‘𝑀))
243		chtcl 24835	. . . . . . . . . . . . 13 ⊢ (3 ∈ ℝ → (θ‘3) ∈ ℝ)
244	237, 243	ax-mp 5	. . . . . . . . . . . 12 ⊢ (θ‘3) ∈ ℝ
245		chtcl 24835	. . . . . . . . . . . . 13 ⊢ (𝑀 ∈ ℝ → (θ‘𝑀) ∈ ℝ)
246	103, 245	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → (θ‘𝑀) ∈ ℝ)
247		efle 14848	. . . . . . . . . . . 12 ⊢ (((θ‘3) ∈ ℝ ∧ (θ‘𝑀) ∈ ℝ) → ((θ‘3) ≤ (θ‘𝑀) ↔ (exp‘(θ‘3)) ≤ (exp‘(θ‘𝑀))))
248	244, 246, 247	sylancr 695	. . . . . . . . . . 11 ⊢ (𝜑 → ((θ‘3) ≤ (θ‘𝑀) ↔ (exp‘(θ‘3)) ≤ (exp‘(θ‘𝑀))))
249	242, 248	mpbid 222	. . . . . . . . . 10 ⊢ (𝜑 → (exp‘(θ‘3)) ≤ (exp‘(θ‘𝑀)))
250	236, 249	syl5eqbrr 4689	. . . . . . . . 9 ⊢ (𝜑 → 6 ≤ (exp‘(θ‘𝑀)))
251	225, 227, 213, 229, 250	ltletrd 10197	. . . . . . . 8 ⊢ (𝜑 → 4 < (exp‘(θ‘𝑀)))
252		4pos 11116	. . . . . . . . . 10 ⊢ 0 < 4
253	252	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → 0 < 4)
254		ltdiv2 10909	. . . . . . . . 9 ⊢ (((4 ∈ ℝ ∧ 0 < 4) ∧ ((exp‘(θ‘𝑀)) ∈ ℝ ∧ 0 < (exp‘(θ‘𝑀))) ∧ ((exp‘(θ‘𝐾)) ∈ ℝ ∧ 0 < (exp‘(θ‘𝐾)))) → (4 < (exp‘(θ‘𝑀)) ↔ ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) < ((exp‘(θ‘𝐾)) / 4)))
255	225, 253, 213, 215, 212, 214, 254	syl222anc 1342	. . . . . . . 8 ⊢ (𝜑 → (4 < (exp‘(θ‘𝑀)) ↔ ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) < ((exp‘(θ‘𝐾)) / 4)))
256	251, 255	mpbid 222	. . . . . . 7 ⊢ (𝜑 → ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) < ((exp‘(θ‘𝐾)) / 4))
257	26	a1i 11	. . . . . . . . . . . . 13 ⊢ (𝜑 → 2 ∈ ℝ)
258		2lt3 11195	. . . . . . . . . . . . . 14 ⊢ 2 < 3
259	258	a1i 11	. . . . . . . . . . . . 13 ⊢ (𝜑 → 2 < 3)
260	238, 103, 104, 240, 106	letrd 10194	. . . . . . . . . . . . 13 ⊢ (𝜑 → 3 ≤ 𝐾)
261	257, 238, 104, 259, 260	ltletrd 10197	. . . . . . . . . . . 12 ⊢ (𝜑 → 2 < 𝐾)
262		chtub 24937	. . . . . . . . . . . 12 ⊢ ((𝐾 ∈ ℝ ∧ 2 < 𝐾) → (θ‘𝐾) < ((log‘2) · ((2 · 𝐾) − 3)))
263	104, 261, 262	syl2anc 693	. . . . . . . . . . 11 ⊢ (𝜑 → (θ‘𝐾) < ((log‘2) · ((2 · 𝐾) − 3)))
264		chtcl 24835	. . . . . . . . . . . . 13 ⊢ (𝐾 ∈ ℝ → (θ‘𝐾) ∈ ℝ)
265	104, 264	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → (θ‘𝐾) ∈ ℝ)
266		relogcl 24322	. . . . . . . . . . . . . 14 ⊢ (2 ∈ ℝ⁺ → (log‘2) ∈ ℝ)
267	31, 266	ax-mp 5	. . . . . . . . . . . . 13 ⊢ (log‘2) ∈ ℝ
268	23	nnzi 11401	. . . . . . . . . . . . . . 15 ⊢ 3 ∈ ℤ
269		zsubcl 11419	. . . . . . . . . . . . . . 15 ⊢ (((2 · 𝐾) ∈ ℤ ∧ 3 ∈ ℤ) → ((2 · 𝐾) − 3) ∈ ℤ)
270	78, 268, 269	sylancl 694	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((2 · 𝐾) − 3) ∈ ℤ)
271	270	zred 11482	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((2 · 𝐾) − 3) ∈ ℝ)
272		remulcl 10021	. . . . . . . . . . . . 13 ⊢ (((log‘2) ∈ ℝ ∧ ((2 · 𝐾) − 3) ∈ ℝ) → ((log‘2) · ((2 · 𝐾) − 3)) ∈ ℝ)
273	267, 271, 272	sylancr 695	. . . . . . . . . . . 12 ⊢ (𝜑 → ((log‘2) · ((2 · 𝐾) − 3)) ∈ ℝ)
274		eflt 14847	. . . . . . . . . . . 12 ⊢ (((θ‘𝐾) ∈ ℝ ∧ ((log‘2) · ((2 · 𝐾) − 3)) ∈ ℝ) → ((θ‘𝐾) < ((log‘2) · ((2 · 𝐾) − 3)) ↔ (exp‘(θ‘𝐾)) < (exp‘((log‘2) · ((2 · 𝐾) − 3)))))
275	265, 273, 274	syl2anc 693	. . . . . . . . . . 11 ⊢ (𝜑 → ((θ‘𝐾) < ((log‘2) · ((2 · 𝐾) − 3)) ↔ (exp‘(θ‘𝐾)) < (exp‘((log‘2) · ((2 · 𝐾) − 3)))))
276	263, 275	mpbid 222	. . . . . . . . . 10 ⊢ (𝜑 → (exp‘(θ‘𝐾)) < (exp‘((log‘2) · ((2 · 𝐾) − 3))))
277		reexplog 24341	. . . . . . . . . . . 12 ⊢ ((2 ∈ ℝ⁺ ∧ ((2 · 𝐾) − 3) ∈ ℤ) → (2↑((2 · 𝐾) − 3)) = (exp‘(((2 · 𝐾) − 3) · (log‘2))))
278	31, 270, 277	sylancr 695	. . . . . . . . . . 11 ⊢ (𝜑 → (2↑((2 · 𝐾) − 3)) = (exp‘(((2 · 𝐾) − 3) · (log‘2))))
279	270	zcnd 11483	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((2 · 𝐾) − 3) ∈ ℂ)
280	267	recni 10052	. . . . . . . . . . . . 13 ⊢ (log‘2) ∈ ℂ
281		mulcom 10022	. . . . . . . . . . . . 13 ⊢ ((((2 · 𝐾) − 3) ∈ ℂ ∧ (log‘2) ∈ ℂ) → (((2 · 𝐾) − 3) · (log‘2)) = ((log‘2) · ((2 · 𝐾) − 3)))
282	279, 280, 281	sylancl 694	. . . . . . . . . . . 12 ⊢ (𝜑 → (((2 · 𝐾) − 3) · (log‘2)) = ((log‘2) · ((2 · 𝐾) − 3)))
283	282	fveq2d 6195	. . . . . . . . . . 11 ⊢ (𝜑 → (exp‘(((2 · 𝐾) − 3) · (log‘2))) = (exp‘((log‘2) · ((2 · 𝐾) − 3))))
284	278, 283	eqtrd 2656	. . . . . . . . . 10 ⊢ (𝜑 → (2↑((2 · 𝐾) − 3)) = (exp‘((log‘2) · ((2 · 𝐾) − 3))))
285	276, 284	breqtrrd 4681	. . . . . . . . 9 ⊢ (𝜑 → (exp‘(θ‘𝐾)) < (2↑((2 · 𝐾) − 3)))
286		3p2e5 11160	. . . . . . . . . . . . . . . 16 ⊢ (3 + 2) = 5
287	286	oveq1i 6660	. . . . . . . . . . . . . . 15 ⊢ ((3 + 2) − 2) = (5 − 2)
288		3cn 11095	. . . . . . . . . . . . . . . 16 ⊢ 3 ∈ ℂ
289		2cn 11091	. . . . . . . . . . . . . . . 16 ⊢ 2 ∈ ℂ
290	288, 289	pncan3oi 10297	. . . . . . . . . . . . . . 15 ⊢ ((3 + 2) − 2) = 3
291	287, 290	eqtr3i 2646	. . . . . . . . . . . . . 14 ⊢ (5 − 2) = 3
292	291	oveq2i 6661	. . . . . . . . . . . . 13 ⊢ ((2 · 𝐾) − (5 − 2)) = ((2 · 𝐾) − 3)
293	78	zcnd 11483	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (2 · 𝐾) ∈ ℂ)
294		5cn 11100	. . . . . . . . . . . . . . 15 ⊢ 5 ∈ ℂ
295		subsub 10311	. . . . . . . . . . . . . . 15 ⊢ (((2 · 𝐾) ∈ ℂ ∧ 5 ∈ ℂ ∧ 2 ∈ ℂ) → ((2 · 𝐾) − (5 − 2)) = (((2 · 𝐾) − 5) + 2))
296	294, 289, 295	mp3an23 1416	. . . . . . . . . . . . . 14 ⊢ ((2 · 𝐾) ∈ ℂ → ((2 · 𝐾) − (5 − 2)) = (((2 · 𝐾) − 5) + 2))
297	293, 296	syl 17	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((2 · 𝐾) − (5 − 2)) = (((2 · 𝐾) − 5) + 2))
298	292, 297	syl5eqr 2670	. . . . . . . . . . . 12 ⊢ (𝜑 → ((2 · 𝐾) − 3) = (((2 · 𝐾) − 5) + 2))
299	298	oveq2d 6666	. . . . . . . . . . 11 ⊢ (𝜑 → (2↑_𝑐((2 · 𝐾) − 3)) = (2↑_𝑐(((2 · 𝐾) − 5) + 2)))
300		2ne0 11113	. . . . . . . . . . . . 13 ⊢ 2 ≠ 0
301		cxpexpz 24413	. . . . . . . . . . . . 13 ⊢ ((2 ∈ ℂ ∧ 2 ≠ 0 ∧ ((2 · 𝐾) − 3) ∈ ℤ) → (2↑_𝑐((2 · 𝐾) − 3)) = (2↑((2 · 𝐾) − 3)))
302	289, 300, 301	mp3an12 1414	. . . . . . . . . . . 12 ⊢ (((2 · 𝐾) − 3) ∈ ℤ → (2↑_𝑐((2 · 𝐾) − 3)) = (2↑((2 · 𝐾) − 3)))
303	270, 302	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → (2↑_𝑐((2 · 𝐾) − 3)) = (2↑((2 · 𝐾) − 3)))
304	81	zcnd 11483	. . . . . . . . . . . 12 ⊢ (𝜑 → ((2 · 𝐾) − 5) ∈ ℂ)
305		2cnne0 11242	. . . . . . . . . . . . 13 ⊢ (2 ∈ ℂ ∧ 2 ≠ 0)
306		cxpadd 24425	. . . . . . . . . . . . 13 ⊢ (((2 ∈ ℂ ∧ 2 ≠ 0) ∧ ((2 · 𝐾) − 5) ∈ ℂ ∧ 2 ∈ ℂ) → (2↑_𝑐(((2 · 𝐾) − 5) + 2)) = ((2↑_𝑐((2 · 𝐾) − 5)) · (2↑_𝑐2)))
307	305, 289, 306	mp3an13 1415	. . . . . . . . . . . 12 ⊢ (((2 · 𝐾) − 5) ∈ ℂ → (2↑_𝑐(((2 · 𝐾) − 5) + 2)) = ((2↑_𝑐((2 · 𝐾) − 5)) · (2↑_𝑐2)))
308	304, 307	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → (2↑_𝑐(((2 · 𝐾) − 5) + 2)) = ((2↑_𝑐((2 · 𝐾) − 5)) · (2↑_𝑐2)))
309	299, 303, 308	3eqtr3d 2664	. . . . . . . . . 10 ⊢ (𝜑 → (2↑((2 · 𝐾) − 3)) = ((2↑_𝑐((2 · 𝐾) − 5)) · (2↑_𝑐2)))
310		2nn0 11309	. . . . . . . . . . . . 13 ⊢ 2 ∈ ℕ₀
311		cxpexp 24414	. . . . . . . . . . . . 13 ⊢ ((2 ∈ ℂ ∧ 2 ∈ ℕ₀) → (2↑_𝑐2) = (2↑2))
312	289, 310, 311	mp2an 708	. . . . . . . . . . . 12 ⊢ (2↑_𝑐2) = (2↑2)
313		sq2 12960	. . . . . . . . . . . 12 ⊢ (2↑2) = 4
314	312, 313	eqtri 2644	. . . . . . . . . . 11 ⊢ (2↑_𝑐2) = 4
315	314	oveq2i 6661	. . . . . . . . . 10 ⊢ ((2↑_𝑐((2 · 𝐾) − 5)) · (2↑_𝑐2)) = ((2↑_𝑐((2 · 𝐾) − 5)) · 4)
316	309, 315	syl6eq 2672	. . . . . . . . 9 ⊢ (𝜑 → (2↑((2 · 𝐾) − 3)) = ((2↑_𝑐((2 · 𝐾) − 5)) · 4))
317	285, 316	breqtrd 4679	. . . . . . . 8 ⊢ (𝜑 → (exp‘(θ‘𝐾)) < ((2↑_𝑐((2 · 𝐾) − 5)) · 4))
318	224, 252	pm3.2i 471	. . . . . . . . . 10 ⊢ (4 ∈ ℝ ∧ 0 < 4)
319	318	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → (4 ∈ ℝ ∧ 0 < 4))
320		ltdivmul2 10900	. . . . . . . . 9 ⊢ (((exp‘(θ‘𝐾)) ∈ ℝ ∧ (2↑_𝑐((2 · 𝐾) − 5)) ∈ ℝ ∧ (4 ∈ ℝ ∧ 0 < 4)) → (((exp‘(θ‘𝐾)) / 4) < (2↑_𝑐((2 · 𝐾) − 5)) ↔ (exp‘(θ‘𝐾)) < ((2↑_𝑐((2 · 𝐾) − 5)) · 4)))
321	212, 85, 319, 320	syl3anc 1326	. . . . . . . 8 ⊢ (𝜑 → (((exp‘(θ‘𝐾)) / 4) < (2↑_𝑐((2 · 𝐾) − 5)) ↔ (exp‘(θ‘𝐾)) < ((2↑_𝑐((2 · 𝐾) − 5)) · 4)))
322	317, 321	mpbird 247	. . . . . . 7 ⊢ (𝜑 → ((exp‘(θ‘𝐾)) / 4) < (2↑_𝑐((2 · 𝐾) − 5)))
323	119, 223, 85, 256, 322	lttrd 10198	. . . . . 6 ⊢ (𝜑 → ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) < (2↑_𝑐((2 · 𝐾) − 5)))
324	102, 119, 85, 221, 323	lelttrd 10195	. . . . 5 ⊢ (𝜑 → ((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) < (2↑_𝑐((2 · 𝐾) − 5)))
325	97	nnred 11035	. . . . . 6 ⊢ (𝜑 → (seq1( · , 𝐹)‘𝐾) ∈ ℝ)
326		nnre 11027	. . . . . . . 8 ⊢ ((seq1( · , 𝐹)‘𝑀) ∈ ℕ → (seq1( · , 𝐹)‘𝑀) ∈ ℝ)
327		nngt0 11049	. . . . . . . 8 ⊢ ((seq1( · , 𝐹)‘𝑀) ∈ ℕ → 0 < (seq1( · , 𝐹)‘𝑀))
328	326, 327	jca 554	. . . . . . 7 ⊢ ((seq1( · , 𝐹)‘𝑀) ∈ ℕ → ((seq1( · , 𝐹)‘𝑀) ∈ ℝ ∧ 0 < (seq1( · , 𝐹)‘𝑀)))
329	70, 328	syl 17	. . . . . 6 ⊢ (𝜑 → ((seq1( · , 𝐹)‘𝑀) ∈ ℝ ∧ 0 < (seq1( · , 𝐹)‘𝑀)))
330		ltdivmul 10898	. . . . . 6 ⊢ (((seq1( · , 𝐹)‘𝐾) ∈ ℝ ∧ (2↑_𝑐((2 · 𝐾) − 5)) ∈ ℝ ∧ ((seq1( · , 𝐹)‘𝑀) ∈ ℝ ∧ 0 < (seq1( · , 𝐹)‘𝑀))) → (((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) < (2↑_𝑐((2 · 𝐾) − 5)) ↔ (seq1( · , 𝐹)‘𝐾) < ((seq1( · , 𝐹)‘𝑀) · (2↑_𝑐((2 · 𝐾) − 5)))))
331	325, 85, 329, 330	syl3anc 1326	. . . . 5 ⊢ (𝜑 → (((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) < (2↑_𝑐((2 · 𝐾) − 5)) ↔ (seq1( · , 𝐹)‘𝐾) < ((seq1( · , 𝐹)‘𝑀) · (2↑_𝑐((2 · 𝐾) − 5)))))
332	324, 331	mpbid 222	. . . 4 ⊢ (𝜑 → (seq1( · , 𝐹)‘𝐾) < ((seq1( · , 𝐹)‘𝑀) · (2↑_𝑐((2 · 𝐾) − 5))))
333	87, 332	eqbrtrrd 4677	. . 3 ⊢ (𝜑 → ((2 · 𝑁)C𝑁) < ((seq1( · , 𝐹)‘𝑀) · (2↑_𝑐((2 · 𝐾) − 5))))
334	30, 85	remulcld 10070	. . . 4 ⊢ (𝜑 → (((2 · 𝑁)↑_𝑐(((√‘(2 · 𝑁)) / 3) + 2)) · (2↑_𝑐((2 · 𝐾) − 5))) ∈ ℝ)
335	3, 62, 55, 63, 64	bposlem5 25013	. . . . 5 ⊢ (𝜑 → (seq1( · , 𝐹)‘𝑀) ≤ ((2 · 𝑁)↑_𝑐(((√‘(2 · 𝑁)) / 3) + 2)))
336	71, 30, 84	lemul1d 11915	. . . . 5 ⊢ (𝜑 → ((seq1( · , 𝐹)‘𝑀) ≤ ((2 · 𝑁)↑_𝑐(((√‘(2 · 𝑁)) / 3) + 2)) ↔ ((seq1( · , 𝐹)‘𝑀) · (2↑_𝑐((2 · 𝐾) − 5))) ≤ (((2 · 𝑁)↑_𝑐(((√‘(2 · 𝑁)) / 3) + 2)) · (2↑_𝑐((2 · 𝐾) − 5)))))
337	335, 336	mpbid 222	. . . 4 ⊢ (𝜑 → ((seq1( · , 𝐹)‘𝑀) · (2↑_𝑐((2 · 𝐾) − 5))) ≤ (((2 · 𝑁)↑_𝑐(((√‘(2 · 𝑁)) / 3) + 2)) · (2↑_𝑐((2 · 𝐾) − 5))))
338	78	zred 11482	. . . . . . 7 ⊢ (𝜑 → (2 · 𝐾) ∈ ℝ)
339	37	a1i 11	. . . . . . 7 ⊢ (𝜑 → 5 ∈ ℝ)
340		flle 12600	. . . . . . . . . . 11 ⊢ (((2 · 𝑁) / 3) ∈ ℝ → (⌊‘((2 · 𝑁) / 3)) ≤ ((2 · 𝑁) / 3))
341	74, 340	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → (⌊‘((2 · 𝑁) / 3)) ≤ ((2 · 𝑁) / 3))
342	63, 341	syl5eqbr 4688	. . . . . . . . 9 ⊢ (𝜑 → 𝐾 ≤ ((2 · 𝑁) / 3))
343		2pos 11112	. . . . . . . . . . . 12 ⊢ 0 < 2
344	26, 343	pm3.2i 471	. . . . . . . . . . 11 ⊢ (2 ∈ ℝ ∧ 0 < 2)
345	344	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → (2 ∈ ℝ ∧ 0 < 2))
346		lemul2 10876	. . . . . . . . . 10 ⊢ ((𝐾 ∈ ℝ ∧ ((2 · 𝑁) / 3) ∈ ℝ ∧ (2 ∈ ℝ ∧ 0 < 2)) → (𝐾 ≤ ((2 · 𝑁) / 3) ↔ (2 · 𝐾) ≤ (2 · ((2 · 𝑁) / 3))))
347	104, 74, 345, 346	syl3anc 1326	. . . . . . . . 9 ⊢ (𝜑 → (𝐾 ≤ ((2 · 𝑁) / 3) ↔ (2 · 𝐾) ≤ (2 · ((2 · 𝑁) / 3))))
348	342, 347	mpbid 222	. . . . . . . 8 ⊢ (𝜑 → (2 · 𝐾) ≤ (2 · ((2 · 𝑁) / 3)))
349	18	nncnd 11036	. . . . . . . . . 10 ⊢ (𝜑 → (2 · 𝑁) ∈ ℂ)
350		3ne0 11115	. . . . . . . . . . . 12 ⊢ 3 ≠ 0
351	288, 350	pm3.2i 471	. . . . . . . . . . 11 ⊢ (3 ∈ ℂ ∧ 3 ≠ 0)
352		divass 10703	. . . . . . . . . . 11 ⊢ ((2 ∈ ℂ ∧ (2 · 𝑁) ∈ ℂ ∧ (3 ∈ ℂ ∧ 3 ≠ 0)) → ((2 · (2 · 𝑁)) / 3) = (2 · ((2 · 𝑁) / 3)))
353	289, 351, 352	mp3an13 1415	. . . . . . . . . 10 ⊢ ((2 · 𝑁) ∈ ℂ → ((2 · (2 · 𝑁)) / 3) = (2 · ((2 · 𝑁) / 3)))
354	349, 353	syl 17	. . . . . . . . 9 ⊢ (𝜑 → ((2 · (2 · 𝑁)) / 3) = (2 · ((2 · 𝑁) / 3)))
355		2t2e4 11177	. . . . . . . . . . . 12 ⊢ (2 · 2) = 4
356	355	oveq1i 6660	. . . . . . . . . . 11 ⊢ ((2 · 2) · 𝑁) = (4 · 𝑁)
357	5	nncnd 11036	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑁 ∈ ℂ)
358		mulass 10024	. . . . . . . . . . . . 13 ⊢ ((2 ∈ ℂ ∧ 2 ∈ ℂ ∧ 𝑁 ∈ ℂ) → ((2 · 2) · 𝑁) = (2 · (2 · 𝑁)))
359	289, 289, 358	mp3an12 1414	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ ℂ → ((2 · 2) · 𝑁) = (2 · (2 · 𝑁)))
360	357, 359	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → ((2 · 2) · 𝑁) = (2 · (2 · 𝑁)))
361	356, 360	syl5reqr 2671	. . . . . . . . . 10 ⊢ (𝜑 → (2 · (2 · 𝑁)) = (4 · 𝑁))
362	361	oveq1d 6665	. . . . . . . . 9 ⊢ (𝜑 → ((2 · (2 · 𝑁)) / 3) = ((4 · 𝑁) / 3))
363	354, 362	eqtr3d 2658	. . . . . . . 8 ⊢ (𝜑 → (2 · ((2 · 𝑁) / 3)) = ((4 · 𝑁) / 3))
364	348, 363	breqtrd 4679	. . . . . . 7 ⊢ (𝜑 → (2 · 𝐾) ≤ ((4 · 𝑁) / 3))
365	338, 36, 339, 364	lesub1dd 10643	. . . . . 6 ⊢ (𝜑 → ((2 · 𝐾) − 5) ≤ (((4 · 𝑁) / 3) − 5))
366		1lt2 11194	. . . . . . . 8 ⊢ 1 < 2
367	366	a1i 11	. . . . . . 7 ⊢ (𝜑 → 1 < 2)
368	257, 367, 82, 39	cxpled 24466	. . . . . 6 ⊢ (𝜑 → (((2 · 𝐾) − 5) ≤ (((4 · 𝑁) / 3) − 5) ↔ (2↑_𝑐((2 · 𝐾) − 5)) ≤ (2↑_𝑐(((4 · 𝑁) / 3) − 5))))
369	365, 368	mpbid 222	. . . . 5 ⊢ (𝜑 → (2↑_𝑐((2 · 𝐾) − 5)) ≤ (2↑_𝑐(((4 · 𝑁) / 3) − 5)))
370	85, 42, 29	lemul2d 11916	. . . . 5 ⊢ (𝜑 → ((2↑_𝑐((2 · 𝐾) − 5)) ≤ (2↑_𝑐(((4 · 𝑁) / 3) − 5)) ↔ (((2 · 𝑁)↑_𝑐(((√‘(2 · 𝑁)) / 3) + 2)) · (2↑_𝑐((2 · 𝐾) − 5))) ≤ (((2 · 𝑁)↑_𝑐(((√‘(2 · 𝑁)) / 3) + 2)) · (2↑_𝑐(((4 · 𝑁) / 3) − 5)))))
371	369, 370	mpbid 222	. . . 4 ⊢ (𝜑 → (((2 · 𝑁)↑_𝑐(((√‘(2 · 𝑁)) / 3) + 2)) · (2↑_𝑐((2 · 𝐾) − 5))) ≤ (((2 · 𝑁)↑_𝑐(((√‘(2 · 𝑁)) / 3) + 2)) · (2↑_𝑐(((4 · 𝑁) / 3) − 5))))
372	86, 334, 43, 337, 371	letrd 10194	. . 3 ⊢ (𝜑 → ((seq1( · , 𝐹)‘𝑀) · (2↑_𝑐((2 · 𝐾) − 5))) ≤ (((2 · 𝑁)↑_𝑐(((√‘(2 · 𝑁)) / 3) + 2)) · (2↑_𝑐(((4 · 𝑁) / 3) − 5))))
373	15, 86, 43, 333, 372	ltletrd 10197	. 2 ⊢ (𝜑 → ((2 · 𝑁)C𝑁) < (((2 · 𝑁)↑_𝑐(((√‘(2 · 𝑁)) / 3) + 2)) · (2↑_𝑐(((4 · 𝑁) / 3) − 5))))
374	10, 15, 43, 54, 373	lttrd 10198	1 ⊢ (𝜑 → ((4↑𝑁) / 𝑁) < (((2 · 𝑁)↑_𝑐(((√‘(2 · 𝑁)) / 3) + 2)) · (2↑_𝑐(((4 · 𝑁) / 3) − 5))))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 196 ∧ wa 384 = wceq 1483 ∈ wcel 1990 ≠ wne 2794 ∀wral 2912 ∃wrex 2913 ifcif 4086 class class class wbr 4653 ↦ cmpt 4729 ⟶wf 5884 ‘cfv 5888 (class class class)co 6650 ℂcc 9934 ℝcr 9935 0cc0 9936 1c1 9937 + caddc 9939 · cmul 9941 < clt 10074 ≤ cle 10075 − cmin 10266 / cdiv 10684 ℕcn 11020 2c2 11070 3c3 11071 4c4 11072 5c5 11073 6c6 11074 ℕ₀cn0 11292 ℤcz 11377 ℤ_≥cuz 11687 ℝ⁺crp 11832 ...cfz 12326 ⌊cfl 12591 seqcseq 12801 ↑cexp 12860 Ccbc 13089 √csqrt 13973 expce 14792 ∥ cdvds 14983 ℙcprime 15385 pCnt cpc 15541 logclog 24301 ↑_𝑐ccxp 24302 θccht 24817

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1722 ax-4 1737 ax-5 1839 ax-6 1888 ax-7 1935 ax-8 1992 ax-9 1999 ax-10 2019 ax-11 2034 ax-12 2047 ax-13 2246 ax-ext 2602 ax-rep 4771 ax-sep 4781 ax-nul 4789 ax-pow 4843 ax-pr 4906 ax-un 6949 ax-inf2 8538 ax-cnex 9992 ax-resscn 9993 ax-1cn 9994 ax-icn 9995 ax-addcl 9996 ax-addrcl 9997 ax-mulcl 9998 ax-mulrcl 9999 ax-mulcom 10000 ax-addass 10001 ax-mulass 10002 ax-distr 10003 ax-i2m1 10004 ax-1ne0 10005 ax-1rid 10006 ax-rnegex 10007 ax-rrecex 10008 ax-cnre 10009 ax-pre-lttri 10010 ax-pre-lttrn 10011 ax-pre-ltadd 10012 ax-pre-mulgt0 10013 ax-pre-sup 10014 ax-addf 10015 ax-mulf 10016

This theorem depends on definitions: df-bi 197 df-or 385 df-an 386 df-3or 1038 df-3an 1039 df-tru 1486 df-fal 1489 df-ex 1705 df-nf 1710 df-sb 1881 df-eu 2474 df-mo 2475 df-clab 2609 df-cleq 2615 df-clel 2618 df-nfc 2753 df-ne 2795 df-nel 2898 df-ral 2917 df-rex 2918 df-reu 2919 df-rmo 2920 df-rab 2921 df-v 3202 df-sbc 3436 df-csb 3534 df-dif 3577 df-un 3579 df-in 3581 df-ss 3588 df-pss 3590 df-nul 3916 df-if 4087 df-pw 4160 df-sn 4178 df-pr 4180 df-tp 4182 df-op 4184 df-uni 4437 df-int 4476 df-iun 4522 df-iin 4523 df-br 4654 df-opab 4713 df-mpt 4730 df-tr 4753 df-id 5024 df-eprel 5029 df-po 5035 df-so 5036 df-fr 5073 df-se 5074 df-we 5075 df-xp 5120 df-rel 5121 df-cnv 5122 df-co 5123 df-dm 5124 df-rn 5125 df-res 5126 df-ima 5127 df-pred 5680 df-ord 5726 df-on 5727 df-lim 5728 df-suc 5729 df-iota 5851 df-fun 5890 df-fn 5891 df-f 5892 df-f1 5893 df-fo 5894 df-f1o 5895 df-fv 5896 df-isom 5897 df-riota 6611 df-ov 6653 df-oprab 6654 df-mpt2 6655 df-of 6897 df-om 7066 df-1st 7168 df-2nd 7169 df-supp 7296 df-wrecs 7407 df-recs 7468 df-rdg 7506 df-1o 7560 df-2o 7561 df-oadd 7564 df-er 7742 df-map 7859 df-pm 7860 df-ixp 7909 df-en 7956 df-dom 7957 df-sdom 7958 df-fin 7959 df-fsupp 8276 df-fi 8317 df-sup 8348 df-inf 8349 df-oi 8415 df-card 8765 df-cda 8990 df-pnf 10076 df-mnf 10077 df-xr 10078 df-ltxr 10079 df-le 10080 df-sub 10268 df-neg 10269 df-div 10685 df-nn 11021 df-2 11079 df-3 11080 df-4 11081 df-5 11082 df-6 11083 df-7 11084 df-8 11085 df-9 11086 df-n0 11293 df-xnn0 11364 df-z 11378 df-dec 11494 df-uz 11688 df-q 11789 df-rp 11833 df-xneg 11946 df-xadd 11947 df-xmul 11948 df-ioo 12179 df-ioc 12180 df-ico 12181 df-icc 12182 df-fz 12327 df-fzo 12466 df-fl 12593 df-mod 12669 df-seq 12802 df-exp 12861 df-fac 13061 df-bc 13090 df-hash 13118 df-shft 13807 df-cj 13839 df-re 13840 df-im 13841 df-sqrt 13975 df-abs 13976 df-limsup 14202 df-clim 14219 df-rlim 14220 df-sum 14417 df-ef 14798 df-sin 14800 df-cos 14801 df-pi 14803 df-dvds 14984 df-gcd 15217 df-prm 15386 df-pc 15542 df-struct 15859 df-ndx 15860 df-slot 15861 df-base 15863 df-sets 15864 df-ress 15865 df-plusg 15954 df-mulr 15955 df-starv 15956 df-sca 15957 df-vsca 15958 df-ip 15959 df-tset 15960 df-ple 15961 df-ds 15964 df-unif 15965 df-hom 15966 df-cco 15967 df-rest 16083 df-topn 16084 df-0g 16102 df-gsum 16103 df-topgen 16104 df-pt 16105 df-prds 16108 df-xrs 16162 df-qtop 16167 df-imas 16168 df-xps 16170 df-mre 16246 df-mrc 16247 df-acs 16249 df-mgm 17242 df-sgrp 17284 df-mnd 17295 df-submnd 17336 df-mulg 17541 df-cntz 17750 df-cmn 18195 df-psmet 19738 df-xmet 19739 df-met 19740 df-bl 19741 df-mopn 19742 df-fbas 19743 df-fg 19744 df-cnfld 19747 df-top 20699 df-topon 20716 df-topsp 20737 df-bases 20750 df-cld 20823 df-ntr 20824 df-cls 20825 df-nei 20902 df-lp 20940 df-perf 20941 df-cn 21031 df-cnp 21032 df-haus 21119 df-tx 21365 df-hmeo 21558 df-fil 21650 df-fm 21742 df-flim 21743 df-flf 21744 df-xms 22125 df-ms 22126 df-tms 22127 df-cncf 22681 df-limc 23630 df-dv 23631 df-log 24303 df-cxp 24304 df-cht 24823 df-ppi 24826

This theorem is referenced by: bposlem9 25017

W3C validator