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 25873

Description: Lemma for bpos 25877. 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 11708	. . . . 5 ⊢ 4 ∈ ℕ
2		5nn 11711	. . . . . . 7 ⊢ 5 ∈ ℕ
3		bpos.1	. . . . . . 7 ⊢ (𝜑 → 𝑁 ∈ (ℤ_≥‘5))
4		eluznn 12306	. . . . . . 7 ⊢ ((5 ∈ ℕ ∧ 𝑁 ∈ (ℤ_≥‘5)) → 𝑁 ∈ ℕ)
5	2, 3, 4	sylancr 590	. . . . . 6 ⊢ (𝜑 → 𝑁 ∈ ℕ)
6	5	nnnn0d 11943	. . . . 5 ⊢ (𝜑 → 𝑁 ∈ ℕ₀)
7		nnexpcl 13438	. . . . 5 ⊢ ((4 ∈ ℕ ∧ 𝑁 ∈ ℕ₀) → (4↑𝑁) ∈ ℕ)
8	1, 6, 7	sylancr 590	. . . 4 ⊢ (𝜑 → (4↑𝑁) ∈ ℕ)
9	8	nnred 11640	. . 3 ⊢ (𝜑 → (4↑𝑁) ∈ ℝ)
10	9, 5	nndivred 11679	. 2 ⊢ (𝜑 → ((4↑𝑁) / 𝑁) ∈ ℝ)
11		fzctr 13014	. . . . 5 ⊢ (𝑁 ∈ ℕ₀ → 𝑁 ∈ (0...(2 · 𝑁)))
12	6, 11	syl 17	. . . 4 ⊢ (𝜑 → 𝑁 ∈ (0...(2 · 𝑁)))
13		bccl2 13679	. . . 4 ⊢ (𝑁 ∈ (0...(2 · 𝑁)) → ((2 · 𝑁)C𝑁) ∈ ℕ)
14	12, 13	syl 17	. . 3 ⊢ (𝜑 → ((2 · 𝑁)C𝑁) ∈ ℕ)
15	14	nnred 11640	. 2 ⊢ (𝜑 → ((2 · 𝑁)C𝑁) ∈ ℝ)
16		2nn 11698	. . . . . . 7 ⊢ 2 ∈ ℕ
17		nnmulcl 11649	. . . . . . 7 ⊢ ((2 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (2 · 𝑁) ∈ ℕ)
18	16, 5, 17	sylancr 590	. . . . . 6 ⊢ (𝜑 → (2 · 𝑁) ∈ ℕ)
19	18	nnrpd 12417	. . . . 5 ⊢ (𝜑 → (2 · 𝑁) ∈ ℝ⁺)
20	18	nnred 11640	. . . . . . . 8 ⊢ (𝜑 → (2 · 𝑁) ∈ ℝ)
21	19	rpge0d 12423	. . . . . . . 8 ⊢ (𝜑 → 0 ≤ (2 · 𝑁))
22	20, 21	resqrtcld 14769	. . . . . . 7 ⊢ (𝜑 → (√‘(2 · 𝑁)) ∈ ℝ)
23		3nn 11704	. . . . . . 7 ⊢ 3 ∈ ℕ
24		nndivre 11666	. . . . . . 7 ⊢ (((√‘(2 · 𝑁)) ∈ ℝ ∧ 3 ∈ ℕ) → ((√‘(2 · 𝑁)) / 3) ∈ ℝ)
25	22, 23, 24	sylancl 589	. . . . . 6 ⊢ (𝜑 → ((√‘(2 · 𝑁)) / 3) ∈ ℝ)
26		2re 11699	. . . . . 6 ⊢ 2 ∈ ℝ
27		readdcl 10609	. . . . . 6 ⊢ ((((√‘(2 · 𝑁)) / 3) ∈ ℝ ∧ 2 ∈ ℝ) → (((√‘(2 · 𝑁)) / 3) + 2) ∈ ℝ)
28	25, 26, 27	sylancl 589	. . . . 5 ⊢ (𝜑 → (((√‘(2 · 𝑁)) / 3) + 2) ∈ ℝ)
29	19, 28	rpcxpcld 25323	. . . 4 ⊢ (𝜑 → ((2 · 𝑁)↑_𝑐(((√‘(2 · 𝑁)) / 3) + 2)) ∈ ℝ⁺)
30	29	rpred 12419	. . 3 ⊢ (𝜑 → ((2 · 𝑁)↑_𝑐(((√‘(2 · 𝑁)) / 3) + 2)) ∈ ℝ)
31		2rp 12382	. . . . 5 ⊢ 2 ∈ ℝ⁺
32		nnmulcl 11649	. . . . . . . . 9 ⊢ ((4 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (4 · 𝑁) ∈ ℕ)
33	1, 5, 32	sylancr 590	. . . . . . . 8 ⊢ (𝜑 → (4 · 𝑁) ∈ ℕ)
34	33	nnred 11640	. . . . . . 7 ⊢ (𝜑 → (4 · 𝑁) ∈ ℝ)
35		nndivre 11666	. . . . . . 7 ⊢ (((4 · 𝑁) ∈ ℝ ∧ 3 ∈ ℕ) → ((4 · 𝑁) / 3) ∈ ℝ)
36	34, 23, 35	sylancl 589	. . . . . 6 ⊢ (𝜑 → ((4 · 𝑁) / 3) ∈ ℝ)
37		5re 11712	. . . . . 6 ⊢ 5 ∈ ℝ
38		resubcl 10939	. . . . . 6 ⊢ ((((4 · 𝑁) / 3) ∈ ℝ ∧ 5 ∈ ℝ) → (((4 · 𝑁) / 3) − 5) ∈ ℝ)
39	36, 37, 38	sylancl 589	. . . . 5 ⊢ (𝜑 → (((4 · 𝑁) / 3) − 5) ∈ ℝ)
40		rpcxpcl 25267	. . . . 5 ⊢ ((2 ∈ ℝ⁺ ∧ (((4 · 𝑁) / 3) − 5) ∈ ℝ) → (2↑_𝑐(((4 · 𝑁) / 3) − 5)) ∈ ℝ⁺)
41	31, 39, 40	sylancr 590	. . . 4 ⊢ (𝜑 → (2↑_𝑐(((4 · 𝑁) / 3) − 5)) ∈ ℝ⁺)
42	41	rpred 12419	. . 3 ⊢ (𝜑 → (2↑_𝑐(((4 · 𝑁) / 3) − 5)) ∈ ℝ)
43	30, 42	remulcld 10660	. 2 ⊢ (𝜑 → (((2 · 𝑁)↑_𝑐(((√‘(2 · 𝑁)) / 3) + 2)) · (2↑_𝑐(((4 · 𝑁) / 3) − 5))) ∈ ℝ)
44		df-5 11691	. . . . 5 ⊢ 5 = (4 + 1)
45		4z 12004	. . . . . 6 ⊢ 4 ∈ ℤ
46		uzid 12246	. . . . . 6 ⊢ (4 ∈ ℤ → 4 ∈ (ℤ_≥‘4))
47		peano2uz 12289	. . . . . 6 ⊢ (4 ∈ (ℤ_≥‘4) → (4 + 1) ∈ (ℤ_≥‘4))
48	45, 46, 47	mp2b 10	. . . . 5 ⊢ (4 + 1) ∈ (ℤ_≥‘4)
49	44, 48	eqeltri 2886	. . . 4 ⊢ 5 ∈ (ℤ_≥‘4)
50		eqid 2798	. . . . 5 ⊢ (ℤ_≥‘4) = (ℤ_≥‘4)
51	50	uztrn2 12250	. . . 4 ⊢ ((5 ∈ (ℤ_≥‘4) ∧ 𝑁 ∈ (ℤ_≥‘5)) → 𝑁 ∈ (ℤ_≥‘4))
52	49, 3, 51	sylancr 590	. . 3 ⊢ (𝜑 → 𝑁 ∈ (ℤ_≥‘4))
53		bclbnd 25864	. . 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 16176	. . . . . . . . . 10 ⊢ ((𝑛 ∈ ℙ ∧ ((2 · 𝑁)C𝑁) ∈ ℕ) → (𝑛 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ₀)
58	56, 14, 57	syl2anr 599	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℙ) → (𝑛 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ₀)
59	58	ralrimiva 3149	. . . . . . . 8 ⊢ (𝜑 → ∀𝑛 ∈ ℙ (𝑛 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ₀)
60	55, 59	pcmptcl 16217	. . . . . . 7 ⊢ (𝜑 → (𝐹:ℕ⟶ℕ ∧ seq1( · , 𝐹):ℕ⟶ℕ))
61	60	simprd 499	. . . . . 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 25871	. . . . . . . 8 ⊢ (𝜑 → 𝑀 ∈ (3...𝐾))
66		elfzuz 12898	. . . . . . . 8 ⊢ (𝑀 ∈ (3...𝐾) → 𝑀 ∈ (ℤ_≥‘3))
67	65, 66	syl 17	. . . . . . 7 ⊢ (𝜑 → 𝑀 ∈ (ℤ_≥‘3))
68		eluznn 12306	. . . . . . 7 ⊢ ((3 ∈ ℕ ∧ 𝑀 ∈ (ℤ_≥‘3)) → 𝑀 ∈ ℕ)
69	23, 67, 68	sylancr 590	. . . . . 6 ⊢ (𝜑 → 𝑀 ∈ ℕ)
70	61, 69	ffvelrnd 6829	. . . . 5 ⊢ (𝜑 → (seq1( · , 𝐹)‘𝑀) ∈ ℕ)
71	70	nnred 11640	. . . 4 ⊢ (𝜑 → (seq1( · , 𝐹)‘𝑀) ∈ ℝ)
72		2z 12002	. . . . . . . . 9 ⊢ 2 ∈ ℤ
73		nndivre 11666	. . . . . . . . . . . 12 ⊢ (((2 · 𝑁) ∈ ℝ ∧ 3 ∈ ℕ) → ((2 · 𝑁) / 3) ∈ ℝ)
74	20, 23, 73	sylancl 589	. . . . . . . . . . 11 ⊢ (𝜑 → ((2 · 𝑁) / 3) ∈ ℝ)
75	74	flcld 13163	. . . . . . . . . 10 ⊢ (𝜑 → (⌊‘((2 · 𝑁) / 3)) ∈ ℤ)
76	63, 75	eqeltrid 2894	. . . . . . . . 9 ⊢ (𝜑 → 𝐾 ∈ ℤ)
77		zmulcl 12019	. . . . . . . . 9 ⊢ ((2 ∈ ℤ ∧ 𝐾 ∈ ℤ) → (2 · 𝐾) ∈ ℤ)
78	72, 76, 77	sylancr 590	. . . . . . . 8 ⊢ (𝜑 → (2 · 𝐾) ∈ ℤ)
79	2	nnzi 11994	. . . . . . . 8 ⊢ 5 ∈ ℤ
80		zsubcl 12012	. . . . . . . 8 ⊢ (((2 · 𝐾) ∈ ℤ ∧ 5 ∈ ℤ) → ((2 · 𝐾) − 5) ∈ ℤ)
81	78, 79, 80	sylancl 589	. . . . . . 7 ⊢ (𝜑 → ((2 · 𝐾) − 5) ∈ ℤ)
82	81	zred 12075	. . . . . 6 ⊢ (𝜑 → ((2 · 𝐾) − 5) ∈ ℝ)
83		rpcxpcl 25267	. . . . . 6 ⊢ ((2 ∈ ℝ⁺ ∧ ((2 · 𝐾) − 5) ∈ ℝ) → (2↑_𝑐((2 · 𝐾) − 5)) ∈ ℝ⁺)
84	31, 82, 83	sylancr 590	. . . . 5 ⊢ (𝜑 → (2↑_𝑐((2 · 𝐾) − 5)) ∈ ℝ⁺)
85	84	rpred 12419	. . . 4 ⊢ (𝜑 → (2↑_𝑐((2 · 𝐾) − 5)) ∈ ℝ)
86	71, 85	remulcld 10660	. . 3 ⊢ (𝜑 → ((seq1( · , 𝐹)‘𝑀) · (2↑_𝑐((2 · 𝐾) − 5))) ∈ ℝ)
87	3, 62, 55, 63	bposlem3 25870	. . . 4 ⊢ (𝜑 → (seq1( · , 𝐹)‘𝐾) = ((2 · 𝑁)C𝑁))
88		elfzuz3 12899	. . . . . . . . . 10 ⊢ (𝑀 ∈ (3...𝐾) → 𝐾 ∈ (ℤ_≥‘𝑀))
89	65, 88	syl 17	. . . . . . . . 9 ⊢ (𝜑 → 𝐾 ∈ (ℤ_≥‘𝑀))
90	55, 59, 69, 89	pcmptdvds 16220	. . . . . . . 8 ⊢ (𝜑 → (seq1( · , 𝐹)‘𝑀) ∥ (seq1( · , 𝐹)‘𝐾))
91	70	nnzd 12074	. . . . . . . . 9 ⊢ (𝜑 → (seq1( · , 𝐹)‘𝑀) ∈ ℤ)
92	70	nnne0d 11675	. . . . . . . . 9 ⊢ (𝜑 → (seq1( · , 𝐹)‘𝑀) ≠ 0)
93		uztrn 12249	. . . . . . . . . . . . 13 ⊢ ((𝐾 ∈ (ℤ_≥‘𝑀) ∧ 𝑀 ∈ (ℤ_≥‘3)) → 𝐾 ∈ (ℤ_≥‘3))
94	89, 67, 93	syl2anc 587	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐾 ∈ (ℤ_≥‘3))
95		eluznn 12306	. . . . . . . . . . . 12 ⊢ ((3 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘3)) → 𝐾 ∈ ℕ)
96	23, 94, 95	sylancr 590	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐾 ∈ ℕ)
97	61, 96	ffvelrnd 6829	. . . . . . . . . 10 ⊢ (𝜑 → (seq1( · , 𝐹)‘𝐾) ∈ ℕ)
98	97	nnzd 12074	. . . . . . . . 9 ⊢ (𝜑 → (seq1( · , 𝐹)‘𝐾) ∈ ℤ)
99		dvdsval2 15602	. . . . . . . . 9 ⊢ (((seq1( · , 𝐹)‘𝑀) ∈ ℤ ∧ (seq1( · , 𝐹)‘𝑀) ≠ 0 ∧ (seq1( · , 𝐹)‘𝐾) ∈ ℤ) → ((seq1( · , 𝐹)‘𝑀) ∥ (seq1( · , 𝐹)‘𝐾) ↔ ((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) ∈ ℤ))
100	91, 92, 98, 99	syl3anc 1368	. . . . . . . 8 ⊢ (𝜑 → ((seq1( · , 𝐹)‘𝑀) ∥ (seq1( · , 𝐹)‘𝐾) ↔ ((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) ∈ ℤ))
101	90, 100	mpbid 235	. . . . . . 7 ⊢ (𝜑 → ((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) ∈ ℤ)
102	101	zred 12075	. . . . . 6 ⊢ (𝜑 → ((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) ∈ ℝ)
103	69	nnred 11640	. . . . . . . . 9 ⊢ (𝜑 → 𝑀 ∈ ℝ)
104	76	zred 12075	. . . . . . . . 9 ⊢ (𝜑 → 𝐾 ∈ ℝ)
105		eluzle 12244	. . . . . . . . . 10 ⊢ (𝐾 ∈ (ℤ_≥‘𝑀) → 𝑀 ≤ 𝐾)
106	89, 105	syl 17	. . . . . . . . 9 ⊢ (𝜑 → 𝑀 ≤ 𝐾)
107		efchtdvds 25744	. . . . . . . . 9 ⊢ ((𝑀 ∈ ℝ ∧ 𝐾 ∈ ℝ ∧ 𝑀 ≤ 𝐾) → (exp‘(θ‘𝑀)) ∥ (exp‘(θ‘𝐾)))
108	103, 104, 106, 107	syl3anc 1368	. . . . . . . 8 ⊢ (𝜑 → (exp‘(θ‘𝑀)) ∥ (exp‘(θ‘𝐾)))
109		efchtcl 25696	. . . . . . . . . . 11 ⊢ (𝑀 ∈ ℝ → (exp‘(θ‘𝑀)) ∈ ℕ)
110	103, 109	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → (exp‘(θ‘𝑀)) ∈ ℕ)
111	110	nnzd 12074	. . . . . . . . 9 ⊢ (𝜑 → (exp‘(θ‘𝑀)) ∈ ℤ)
112	110	nnne0d 11675	. . . . . . . . 9 ⊢ (𝜑 → (exp‘(θ‘𝑀)) ≠ 0)
113		efchtcl 25696	. . . . . . . . . . 11 ⊢ (𝐾 ∈ ℝ → (exp‘(θ‘𝐾)) ∈ ℕ)
114	104, 113	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → (exp‘(θ‘𝐾)) ∈ ℕ)
115	114	nnzd 12074	. . . . . . . . 9 ⊢ (𝜑 → (exp‘(θ‘𝐾)) ∈ ℤ)
116		dvdsval2 15602	. . . . . . . . 9 ⊢ (((exp‘(θ‘𝑀)) ∈ ℤ ∧ (exp‘(θ‘𝑀)) ≠ 0 ∧ (exp‘(θ‘𝐾)) ∈ ℤ) → ((exp‘(θ‘𝑀)) ∥ (exp‘(θ‘𝐾)) ↔ ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) ∈ ℤ))
117	111, 112, 115, 116	syl3anc 1368	. . . . . . . 8 ⊢ (𝜑 → ((exp‘(θ‘𝑀)) ∥ (exp‘(θ‘𝐾)) ↔ ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) ∈ ℤ))
118	108, 117	mpbid 235	. . . . . . 7 ⊢ (𝜑 → ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) ∈ ℤ)
119	118	zred 12075	. . . . . 6 ⊢ (𝜑 → ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) ∈ ℝ)
120		prmz 16009	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑝 ∈ ℙ → 𝑝 ∈ ℤ)
121		fllt 13171	. . . . . . . . . . . . . . . . . 18 ⊢ (((√‘(2 · 𝑁)) ∈ ℝ ∧ 𝑝 ∈ ℤ) → ((√‘(2 · 𝑁)) < 𝑝 ↔ (⌊‘(√‘(2 · 𝑁))) < 𝑝))
122	22, 120, 121	syl2an 598	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → ((√‘(2 · 𝑁)) < 𝑝 ↔ (⌊‘(√‘(2 · 𝑁))) < 𝑝))
123	64	breq1i 5037	. . . . . . . . . . . . . . . . 17 ⊢ (𝑀 < 𝑝 ↔ (⌊‘(√‘(2 · 𝑁))) < 𝑝)
124	122, 123	syl6bbr 292	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → ((√‘(2 · 𝑁)) < 𝑝 ↔ 𝑀 < 𝑝))
125	120	zred 12075	. . . . . . . . . . . . . . . . 17 ⊢ (𝑝 ∈ ℙ → 𝑝 ∈ ℝ)
126		ltnle 10709	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑀 ∈ ℝ ∧ 𝑝 ∈ ℝ) → (𝑀 < 𝑝 ↔ ¬ 𝑝 ≤ 𝑀))
127	103, 125, 126	syl2an 598	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (𝑀 < 𝑝 ↔ ¬ 𝑝 ≤ 𝑀))
128	124, 127	bitrd 282	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → ((√‘(2 · 𝑁)) < 𝑝 ↔ ¬ 𝑝 ≤ 𝑀))
129		bposlem1 25868	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑁 ∈ ℕ ∧ 𝑝 ∈ ℙ) → (𝑝↑(𝑝 pCnt ((2 · 𝑁)C𝑁))) ≤ (2 · 𝑁))
130	5, 129	sylan 583	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (𝑝↑(𝑝 pCnt ((2 · 𝑁)C𝑁))) ≤ (2 · 𝑁))
131	125	adantl 485	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → 𝑝 ∈ ℝ)
132		id 22	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑝 ∈ ℙ → 𝑝 ∈ ℙ)
133		pccl 16176	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑝 ∈ ℙ ∧ ((2 · 𝑁)C𝑁) ∈ ℕ) → (𝑝 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ₀)
134	132, 14, 133	syl2anr 599	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ₀)
135	131, 134	reexpcld 13523	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (𝑝↑(𝑝 pCnt ((2 · 𝑁)C𝑁))) ∈ ℝ)
136	20	adantr 484	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (2 · 𝑁) ∈ ℝ)
137	131	resqcld 13607	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (𝑝↑2) ∈ ℝ)
138		lelttr 10720	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑝↑(𝑝 pCnt ((2 · 𝑁)C𝑁))) ∈ ℝ ∧ (2 · 𝑁) ∈ ℝ ∧ (𝑝↑2) ∈ ℝ) → (((𝑝↑(𝑝 pCnt ((2 · 𝑁)C𝑁))) ≤ (2 · 𝑁) ∧ (2 · 𝑁) < (𝑝↑2)) → (𝑝↑(𝑝 pCnt ((2 · 𝑁)C𝑁))) < (𝑝↑2)))
139	135, 136, 137, 138	syl3anc 1368	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (((𝑝↑(𝑝 pCnt ((2 · 𝑁)C𝑁))) ≤ (2 · 𝑁) ∧ (2 · 𝑁) < (𝑝↑2)) → (𝑝↑(𝑝 pCnt ((2 · 𝑁)C𝑁))) < (𝑝↑2)))
140	130, 139	mpand 694	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → ((2 · 𝑁) < (𝑝↑2) → (𝑝↑(𝑝 pCnt ((2 · 𝑁)C𝑁))) < (𝑝↑2)))
141		resqrtth 14607	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((2 · 𝑁) ∈ ℝ ∧ 0 ≤ (2 · 𝑁)) → ((√‘(2 · 𝑁))↑2) = (2 · 𝑁))
142	20, 21, 141	syl2anc 587	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → ((√‘(2 · 𝑁))↑2) = (2 · 𝑁))
143	142	breq1d 5040	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → (((√‘(2 · 𝑁))↑2) < (𝑝↑2) ↔ (2 · 𝑁) < (𝑝↑2)))
144	143	adantr 484	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (((√‘(2 · 𝑁))↑2) < (𝑝↑2) ↔ (2 · 𝑁) < (𝑝↑2)))
145	134	nn0zd 12073	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt ((2 · 𝑁)C𝑁)) ∈ ℤ)
146	72	a1i 11	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → 2 ∈ ℤ)
147		prmgt1 16031	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑝 ∈ ℙ → 1 < 𝑝)
148	147	adantl 485	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → 1 < 𝑝)
149	131, 145, 146, 148	ltexp2d 13610	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → ((𝑝 pCnt ((2 · 𝑁)C𝑁)) < 2 ↔ (𝑝↑(𝑝 pCnt ((2 · 𝑁)C𝑁))) < (𝑝↑2)))
150	140, 144, 149	3imtr4d 297	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (((√‘(2 · 𝑁))↑2) < (𝑝↑2) → (𝑝 pCnt ((2 · 𝑁)C𝑁)) < 2))
151		df-2 11688	. . . . . . . . . . . . . . . . . 18 ⊢ 2 = (1 + 1)
152	151	breq2i 5038	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑝 pCnt ((2 · 𝑁)C𝑁)) < 2 ↔ (𝑝 pCnt ((2 · 𝑁)C𝑁)) < (1 + 1))
153	150, 152	syl6ib 254	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (((√‘(2 · 𝑁))↑2) < (𝑝↑2) → (𝑝 pCnt ((2 · 𝑁)C𝑁)) < (1 + 1)))
154	22	adantr 484	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (√‘(2 · 𝑁)) ∈ ℝ)
155	20, 21	sqrtge0d 14772	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → 0 ≤ (√‘(2 · 𝑁)))
156	155	adantr 484	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → 0 ≤ (√‘(2 · 𝑁)))
157		prmnn 16008	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑝 ∈ ℙ → 𝑝 ∈ ℕ)
158	157	nnrpd 12417	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑝 ∈ ℙ → 𝑝 ∈ ℝ⁺)
159	158	rpge0d 12423	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑝 ∈ ℙ → 0 ≤ 𝑝)
160	159	adantl 485	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → 0 ≤ 𝑝)
161	154, 131, 156, 160	lt2sqd 13615	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → ((√‘(2 · 𝑁)) < 𝑝 ↔ ((√‘(2 · 𝑁))↑2) < (𝑝↑2)))
162		1z 12000	. . . . . . . . . . . . . . . . 17 ⊢ 1 ∈ ℤ
163		zleltp1 12021	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑝 pCnt ((2 · 𝑁)C𝑁)) ∈ ℤ ∧ 1 ∈ ℤ) → ((𝑝 pCnt ((2 · 𝑁)C𝑁)) ≤ 1 ↔ (𝑝 pCnt ((2 · 𝑁)C𝑁)) < (1 + 1)))
164	145, 162, 163	sylancl 589	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → ((𝑝 pCnt ((2 · 𝑁)C𝑁)) ≤ 1 ↔ (𝑝 pCnt ((2 · 𝑁)C𝑁)) < (1 + 1)))
165	153, 161, 164	3imtr4d 297	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → ((√‘(2 · 𝑁)) < 𝑝 → (𝑝 pCnt ((2 · 𝑁)C𝑁)) ≤ 1))
166	128, 165	sylbird 263	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (¬ 𝑝 ≤ 𝑀 → (𝑝 pCnt ((2 · 𝑁)C𝑁)) ≤ 1))
167	166	imp 410	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℙ) ∧ ¬ 𝑝 ≤ 𝑀) → (𝑝 pCnt ((2 · 𝑁)C𝑁)) ≤ 1)
168	167	adantrl 715	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀)) → (𝑝 pCnt ((2 · 𝑁)C𝑁)) ≤ 1)
169		iftrue 4431	. . . . . . . . . . . . 13 ⊢ ((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀) → if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), (𝑝 pCnt ((2 · 𝑁)C𝑁)), 0) = (𝑝 pCnt ((2 · 𝑁)C𝑁)))
170	169	adantl 485	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀)) → if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), (𝑝 pCnt ((2 · 𝑁)C𝑁)), 0) = (𝑝 pCnt ((2 · 𝑁)C𝑁)))
171		iftrue 4431	. . . . . . . . . . . . 13 ⊢ ((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀) → if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), 1, 0) = 1)
172	171	adantl 485	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀)) → if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), 1, 0) = 1)
173	168, 170, 172	3brtr4d 5062	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑝 ∈ ℙ) ∧ (𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀)) → if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), (𝑝 pCnt ((2 · 𝑁)C𝑁)), 0) ≤ if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), 1, 0))
174		0le0 11726	. . . . . . . . . . . . 13 ⊢ 0 ≤ 0
175		iffalse 4434	. . . . . . . . . . . . . 14 ⊢ (¬ (𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀) → if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), (𝑝 pCnt ((2 · 𝑁)C𝑁)), 0) = 0)
176		iffalse 4434	. . . . . . . . . . . . . 14 ⊢ (¬ (𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀) → if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), 1, 0) = 0)
177	175, 176	breq12d 5043	. . . . . . . . . . . . 13 ⊢ (¬ (𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀) → (if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), (𝑝 pCnt ((2 · 𝑁)C𝑁)), 0) ≤ if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), 1, 0) ↔ 0 ≤ 0))
178	174, 177	mpbiri 261	. . . . . . . . . . . 12 ⊢ (¬ (𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀) → if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), (𝑝 pCnt ((2 · 𝑁)C𝑁)), 0) ≤ if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), 1, 0))
179	178	adantl 485	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑝 ∈ ℙ) ∧ ¬ (𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀)) → if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), (𝑝 pCnt ((2 · 𝑁)C𝑁)), 0) ≤ if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), 1, 0))
180	173, 179	pm2.61dan 812	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), (𝑝 pCnt ((2 · 𝑁)C𝑁)), 0) ≤ if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), 1, 0))
181	59	adantr 484	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → ∀𝑛 ∈ ℙ (𝑛 pCnt ((2 · 𝑁)C𝑁)) ∈ ℕ₀)
182	69	adantr 484	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → 𝑀 ∈ ℕ)
183		simpr 488	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → 𝑝 ∈ ℙ)
184		oveq1 7142	. . . . . . . . . . 11 ⊢ (𝑛 = 𝑝 → (𝑛 pCnt ((2 · 𝑁)C𝑁)) = (𝑝 pCnt ((2 · 𝑁)C𝑁)))
185	89	adantr 484	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → 𝐾 ∈ (ℤ_≥‘𝑀))
186	55, 181, 182, 183, 184, 185	pcmpt2 16219	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt ((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀))) = if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), (𝑝 pCnt ((2 · 𝑁)C𝑁)), 0))
187		eqid 2798	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)) = (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1))
188	187	prmorcht 25763	. . . . . . . . . . . . . . 15 ⊢ (𝐾 ∈ ℕ → (exp‘(θ‘𝐾)) = (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)))‘𝐾))
189	96, 188	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (exp‘(θ‘𝐾)) = (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)))‘𝐾))
190	187	prmorcht 25763	. . . . . . . . . . . . . . 15 ⊢ (𝑀 ∈ ℕ → (exp‘(θ‘𝑀)) = (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)))‘𝑀))
191	69, 190	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (exp‘(θ‘𝑀)) = (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)))‘𝑀))
192	189, 191	oveq12d 7153	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) = ((seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)))‘𝐾) / (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)))‘𝑀)))
193	192	adantr 484	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) = ((seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)))‘𝐾) / (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)))‘𝑀)))
194	193	oveq2d 7151	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀)))) = (𝑝 pCnt ((seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)))‘𝐾) / (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)))‘𝑀))))
195		nncn 11633	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ ℕ → 𝑛 ∈ ℂ)
196	195	exp1d 13501	. . . . . . . . . . . . . . 15 ⊢ (𝑛 ∈ ℕ → (𝑛↑1) = 𝑛)
197	196	ifeq1d 4443	. . . . . . . . . . . . . 14 ⊢ (𝑛 ∈ ℕ → if(𝑛 ∈ ℙ, (𝑛↑1), 1) = if(𝑛 ∈ ℙ, 𝑛, 1))
198	197	mpteq2ia 5121	. . . . . . . . . . . . 13 ⊢ (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, (𝑛↑1), 1)) = (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1))
199	198	eqcomi 2807	. . . . . . . . . . . 12 ⊢ (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)) = (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, (𝑛↑1), 1))
200		1nn0 11901	. . . . . . . . . . . . . . 15 ⊢ 1 ∈ ℕ₀
201	200	a1i 11	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑛 ∈ ℙ) → 1 ∈ ℕ₀)
202	201	ralrimiva 3149	. . . . . . . . . . . . 13 ⊢ (𝜑 → ∀𝑛 ∈ ℙ 1 ∈ ℕ₀)
203	202	adantr 484	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → ∀𝑛 ∈ ℙ 1 ∈ ℕ₀)
204		eqidd 2799	. . . . . . . . . . . 12 ⊢ (𝑛 = 𝑝 → 1 = 1)
205	199, 203, 182, 183, 204, 185	pcmpt2 16219	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt ((seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)))‘𝐾) / (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, 𝑛, 1)))‘𝑀))) = if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), 1, 0))
206	194, 205	eqtrd 2833	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀)))) = if((𝑝 ≤ 𝐾 ∧ ¬ 𝑝 ≤ 𝑀), 1, 0))
207	180, 186, 206	3brtr4d 5062	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt ((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀))) ≤ (𝑝 pCnt ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀)))))
208	207	ralrimiva 3149	. . . . . . . 8 ⊢ (𝜑 → ∀𝑝 ∈ ℙ (𝑝 pCnt ((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀))) ≤ (𝑝 pCnt ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀)))))
209		pc2dvds 16205	. . . . . . . . 9 ⊢ ((((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) ∈ ℤ ∧ ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) ∈ ℤ) → (((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) ∥ ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) ↔ ∀𝑝 ∈ ℙ (𝑝 pCnt ((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀))) ≤ (𝑝 pCnt ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))))))
210	101, 118, 209	syl2anc 587	. . . . . . . 8 ⊢ (𝜑 → (((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) ∥ ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) ↔ ∀𝑝 ∈ ℙ (𝑝 pCnt ((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀))) ≤ (𝑝 pCnt ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))))))
211	208, 210	mpbird 260	. . . . . . 7 ⊢ (𝜑 → ((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) ∥ ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))))
212	114	nnred 11640	. . . . . . . . . 10 ⊢ (𝜑 → (exp‘(θ‘𝐾)) ∈ ℝ)
213	110	nnred 11640	. . . . . . . . . 10 ⊢ (𝜑 → (exp‘(θ‘𝑀)) ∈ ℝ)
214	114	nngt0d 11674	. . . . . . . . . 10 ⊢ (𝜑 → 0 < (exp‘(θ‘𝐾)))
215	110	nngt0d 11674	. . . . . . . . . 10 ⊢ (𝜑 → 0 < (exp‘(θ‘𝑀)))
216	212, 213, 214, 215	divgt0d 11564	. . . . . . . . 9 ⊢ (𝜑 → 0 < ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))))
217		elnnz 11979	. . . . . . . . 9 ⊢ (((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) ∈ ℕ ↔ (((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) ∈ ℤ ∧ 0 < ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀)))))
218	118, 216, 217	sylanbrc 586	. . . . . . . 8 ⊢ (𝜑 → ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) ∈ ℕ)
219		dvdsle 15652	. . . . . . . 8 ⊢ ((((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) ∈ ℤ ∧ ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) ∈ ℕ) → (((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) ∥ ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) → ((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) ≤ ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀)))))
220	101, 218, 219	syl2anc 587	. . . . . . 7 ⊢ (𝜑 → (((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) ∥ ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) → ((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) ≤ ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀)))))
221	211, 220	mpd 15	. . . . . 6 ⊢ (𝜑 → ((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) ≤ ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))))
222		nndivre 11666	. . . . . . . 8 ⊢ (((exp‘(θ‘𝐾)) ∈ ℝ ∧ 4 ∈ ℕ) → ((exp‘(θ‘𝐾)) / 4) ∈ ℝ)
223	212, 1, 222	sylancl 589	. . . . . . 7 ⊢ (𝜑 → ((exp‘(θ‘𝐾)) / 4) ∈ ℝ)
224		4re 11709	. . . . . . . . . 10 ⊢ 4 ∈ ℝ
225	224	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → 4 ∈ ℝ)
226		6re 11715	. . . . . . . . . 10 ⊢ 6 ∈ ℝ
227	226	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → 6 ∈ ℝ)
228		4lt6 11807	. . . . . . . . . 10 ⊢ 4 < 6
229	228	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → 4 < 6)
230		cht3 25758	. . . . . . . . . . . 12 ⊢ (θ‘3) = (log‘6)
231	230	fveq2i 6648	. . . . . . . . . . 11 ⊢ (exp‘(θ‘3)) = (exp‘(log‘6))
232		6pos 11735	. . . . . . . . . . . . 13 ⊢ 0 < 6
233	226, 232	elrpii 12380	. . . . . . . . . . . 12 ⊢ 6 ∈ ℝ⁺
234		reeflog 25172	. . . . . . . . . . . 12 ⊢ (6 ∈ ℝ⁺ → (exp‘(log‘6)) = 6)
235	233, 234	ax-mp 5	. . . . . . . . . . 11 ⊢ (exp‘(log‘6)) = 6
236	231, 235	eqtri 2821	. . . . . . . . . 10 ⊢ (exp‘(θ‘3)) = 6
237		3re 11705	. . . . . . . . . . . . 13 ⊢ 3 ∈ ℝ
238	237	a1i 11	. . . . . . . . . . . 12 ⊢ (𝜑 → 3 ∈ ℝ)
239		eluzle 12244	. . . . . . . . . . . . 13 ⊢ (𝑀 ∈ (ℤ_≥‘3) → 3 ≤ 𝑀)
240	67, 239	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → 3 ≤ 𝑀)
241		chtwordi 25741	. . . . . . . . . . . 12 ⊢ ((3 ∈ ℝ ∧ 𝑀 ∈ ℝ ∧ 3 ≤ 𝑀) → (θ‘3) ≤ (θ‘𝑀))
242	238, 103, 240, 241	syl3anc 1368	. . . . . . . . . . 11 ⊢ (𝜑 → (θ‘3) ≤ (θ‘𝑀))
243		chtcl 25694	. . . . . . . . . . . . 13 ⊢ (3 ∈ ℝ → (θ‘3) ∈ ℝ)
244	237, 243	ax-mp 5	. . . . . . . . . . . 12 ⊢ (θ‘3) ∈ ℝ
245		chtcl 25694	. . . . . . . . . . . . 13 ⊢ (𝑀 ∈ ℝ → (θ‘𝑀) ∈ ℝ)
246	103, 245	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → (θ‘𝑀) ∈ ℝ)
247		efle 15463	. . . . . . . . . . . 12 ⊢ (((θ‘3) ∈ ℝ ∧ (θ‘𝑀) ∈ ℝ) → ((θ‘3) ≤ (θ‘𝑀) ↔ (exp‘(θ‘3)) ≤ (exp‘(θ‘𝑀))))
248	244, 246, 247	sylancr 590	. . . . . . . . . . 11 ⊢ (𝜑 → ((θ‘3) ≤ (θ‘𝑀) ↔ (exp‘(θ‘3)) ≤ (exp‘(θ‘𝑀))))
249	242, 248	mpbid 235	. . . . . . . . . 10 ⊢ (𝜑 → (exp‘(θ‘3)) ≤ (exp‘(θ‘𝑀)))
250	236, 249	eqbrtrrid 5066	. . . . . . . . 9 ⊢ (𝜑 → 6 ≤ (exp‘(θ‘𝑀)))
251	225, 227, 213, 229, 250	ltletrd 10789	. . . . . . . 8 ⊢ (𝜑 → 4 < (exp‘(θ‘𝑀)))
252		4pos 11732	. . . . . . . . . 10 ⊢ 0 < 4
253	252	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → 0 < 4)
254		ltdiv2 11515	. . . . . . . . 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 1383	. . . . . . . 8 ⊢ (𝜑 → (4 < (exp‘(θ‘𝑀)) ↔ ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) < ((exp‘(θ‘𝐾)) / 4)))
256	251, 255	mpbid 235	. . . . . . 7 ⊢ (𝜑 → ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) < ((exp‘(θ‘𝐾)) / 4))
257	26	a1i 11	. . . . . . . . . . . . 13 ⊢ (𝜑 → 2 ∈ ℝ)
258		2lt3 11797	. . . . . . . . . . . . . 14 ⊢ 2 < 3
259	258	a1i 11	. . . . . . . . . . . . 13 ⊢ (𝜑 → 2 < 3)
260	238, 103, 104, 240, 106	letrd 10786	. . . . . . . . . . . . 13 ⊢ (𝜑 → 3 ≤ 𝐾)
261	257, 238, 104, 259, 260	ltletrd 10789	. . . . . . . . . . . 12 ⊢ (𝜑 → 2 < 𝐾)
262		chtub 25796	. . . . . . . . . . . 12 ⊢ ((𝐾 ∈ ℝ ∧ 2 < 𝐾) → (θ‘𝐾) < ((log‘2) · ((2 · 𝐾) − 3)))
263	104, 261, 262	syl2anc 587	. . . . . . . . . . 11 ⊢ (𝜑 → (θ‘𝐾) < ((log‘2) · ((2 · 𝐾) − 3)))
264		chtcl 25694	. . . . . . . . . . . . 13 ⊢ (𝐾 ∈ ℝ → (θ‘𝐾) ∈ ℝ)
265	104, 264	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → (θ‘𝐾) ∈ ℝ)
266		relogcl 25167	. . . . . . . . . . . . . 14 ⊢ (2 ∈ ℝ⁺ → (log‘2) ∈ ℝ)
267	31, 266	ax-mp 5	. . . . . . . . . . . . 13 ⊢ (log‘2) ∈ ℝ
268		3z 12003	. . . . . . . . . . . . . . 15 ⊢ 3 ∈ ℤ
269		zsubcl 12012	. . . . . . . . . . . . . . 15 ⊢ (((2 · 𝐾) ∈ ℤ ∧ 3 ∈ ℤ) → ((2 · 𝐾) − 3) ∈ ℤ)
270	78, 268, 269	sylancl 589	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((2 · 𝐾) − 3) ∈ ℤ)
271	270	zred 12075	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((2 · 𝐾) − 3) ∈ ℝ)
272		remulcl 10611	. . . . . . . . . . . . 13 ⊢ (((log‘2) ∈ ℝ ∧ ((2 · 𝐾) − 3) ∈ ℝ) → ((log‘2) · ((2 · 𝐾) − 3)) ∈ ℝ)
273	267, 271, 272	sylancr 590	. . . . . . . . . . . 12 ⊢ (𝜑 → ((log‘2) · ((2 · 𝐾) − 3)) ∈ ℝ)
274		eflt 15462	. . . . . . . . . . . 12 ⊢ (((θ‘𝐾) ∈ ℝ ∧ ((log‘2) · ((2 · 𝐾) − 3)) ∈ ℝ) → ((θ‘𝐾) < ((log‘2) · ((2 · 𝐾) − 3)) ↔ (exp‘(θ‘𝐾)) < (exp‘((log‘2) · ((2 · 𝐾) − 3)))))
275	265, 273, 274	syl2anc 587	. . . . . . . . . . 11 ⊢ (𝜑 → ((θ‘𝐾) < ((log‘2) · ((2 · 𝐾) − 3)) ↔ (exp‘(θ‘𝐾)) < (exp‘((log‘2) · ((2 · 𝐾) − 3)))))
276	263, 275	mpbid 235	. . . . . . . . . 10 ⊢ (𝜑 → (exp‘(θ‘𝐾)) < (exp‘((log‘2) · ((2 · 𝐾) − 3))))
277		reexplog 25186	. . . . . . . . . . . 12 ⊢ ((2 ∈ ℝ⁺ ∧ ((2 · 𝐾) − 3) ∈ ℤ) → (2↑((2 · 𝐾) − 3)) = (exp‘(((2 · 𝐾) − 3) · (log‘2))))
278	31, 270, 277	sylancr 590	. . . . . . . . . . 11 ⊢ (𝜑 → (2↑((2 · 𝐾) − 3)) = (exp‘(((2 · 𝐾) − 3) · (log‘2))))
279	270	zcnd 12076	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((2 · 𝐾) − 3) ∈ ℂ)
280	267	recni 10644	. . . . . . . . . . . . 13 ⊢ (log‘2) ∈ ℂ
281		mulcom 10612	. . . . . . . . . . . . 13 ⊢ ((((2 · 𝐾) − 3) ∈ ℂ ∧ (log‘2) ∈ ℂ) → (((2 · 𝐾) − 3) · (log‘2)) = ((log‘2) · ((2 · 𝐾) − 3)))
282	279, 280, 281	sylancl 589	. . . . . . . . . . . 12 ⊢ (𝜑 → (((2 · 𝐾) − 3) · (log‘2)) = ((log‘2) · ((2 · 𝐾) − 3)))
283	282	fveq2d 6649	. . . . . . . . . . 11 ⊢ (𝜑 → (exp‘(((2 · 𝐾) − 3) · (log‘2))) = (exp‘((log‘2) · ((2 · 𝐾) − 3))))
284	278, 283	eqtrd 2833	. . . . . . . . . 10 ⊢ (𝜑 → (2↑((2 · 𝐾) − 3)) = (exp‘((log‘2) · ((2 · 𝐾) − 3))))
285	276, 284	breqtrrd 5058	. . . . . . . . 9 ⊢ (𝜑 → (exp‘(θ‘𝐾)) < (2↑((2 · 𝐾) − 3)))
286		3p2e5 11776	. . . . . . . . . . . . . . . 16 ⊢ (3 + 2) = 5
287	286	oveq1i 7145	. . . . . . . . . . . . . . 15 ⊢ ((3 + 2) − 2) = (5 − 2)
288		3cn 11706	. . . . . . . . . . . . . . . 16 ⊢ 3 ∈ ℂ
289		2cn 11700	. . . . . . . . . . . . . . . 16 ⊢ 2 ∈ ℂ
290	288, 289	pncan3oi 10891	. . . . . . . . . . . . . . 15 ⊢ ((3 + 2) − 2) = 3
291	287, 290	eqtr3i 2823	. . . . . . . . . . . . . 14 ⊢ (5 − 2) = 3
292	291	oveq2i 7146	. . . . . . . . . . . . 13 ⊢ ((2 · 𝐾) − (5 − 2)) = ((2 · 𝐾) − 3)
293	78	zcnd 12076	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (2 · 𝐾) ∈ ℂ)
294		5cn 11713	. . . . . . . . . . . . . . 15 ⊢ 5 ∈ ℂ
295		subsub 10905	. . . . . . . . . . . . . . 15 ⊢ (((2 · 𝐾) ∈ ℂ ∧ 5 ∈ ℂ ∧ 2 ∈ ℂ) → ((2 · 𝐾) − (5 − 2)) = (((2 · 𝐾) − 5) + 2))
296	294, 289, 295	mp3an23 1450	. . . . . . . . . . . . . 14 ⊢ ((2 · 𝐾) ∈ ℂ → ((2 · 𝐾) − (5 − 2)) = (((2 · 𝐾) − 5) + 2))
297	293, 296	syl 17	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((2 · 𝐾) − (5 − 2)) = (((2 · 𝐾) − 5) + 2))
298	292, 297	syl5eqr 2847	. . . . . . . . . . . 12 ⊢ (𝜑 → ((2 · 𝐾) − 3) = (((2 · 𝐾) − 5) + 2))
299	298	oveq2d 7151	. . . . . . . . . . 11 ⊢ (𝜑 → (2↑_𝑐((2 · 𝐾) − 3)) = (2↑_𝑐(((2 · 𝐾) − 5) + 2)))
300		2ne0 11729	. . . . . . . . . . . 12 ⊢ 2 ≠ 0
301		cxpexpz 25258	. . . . . . . . . . . 12 ⊢ ((2 ∈ ℂ ∧ 2 ≠ 0 ∧ ((2 · 𝐾) − 3) ∈ ℤ) → (2↑_𝑐((2 · 𝐾) − 3)) = (2↑((2 · 𝐾) − 3)))
302	289, 300, 270, 301	mp3an12i 1462	. . . . . . . . . . 11 ⊢ (𝜑 → (2↑_𝑐((2 · 𝐾) − 3)) = (2↑((2 · 𝐾) − 3)))
303	81	zcnd 12076	. . . . . . . . . . . 12 ⊢ (𝜑 → ((2 · 𝐾) − 5) ∈ ℂ)
304		2cnne0 11835	. . . . . . . . . . . . 13 ⊢ (2 ∈ ℂ ∧ 2 ≠ 0)
305		cxpadd 25270	. . . . . . . . . . . . 13 ⊢ (((2 ∈ ℂ ∧ 2 ≠ 0) ∧ ((2 · 𝐾) − 5) ∈ ℂ ∧ 2 ∈ ℂ) → (2↑_𝑐(((2 · 𝐾) − 5) + 2)) = ((2↑_𝑐((2 · 𝐾) − 5)) · (2↑_𝑐2)))
306	304, 289, 305	mp3an13 1449	. . . . . . . . . . . 12 ⊢ (((2 · 𝐾) − 5) ∈ ℂ → (2↑_𝑐(((2 · 𝐾) − 5) + 2)) = ((2↑_𝑐((2 · 𝐾) − 5)) · (2↑_𝑐2)))
307	303, 306	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → (2↑_𝑐(((2 · 𝐾) − 5) + 2)) = ((2↑_𝑐((2 · 𝐾) − 5)) · (2↑_𝑐2)))
308	299, 302, 307	3eqtr3d 2841	. . . . . . . . . 10 ⊢ (𝜑 → (2↑((2 · 𝐾) − 3)) = ((2↑_𝑐((2 · 𝐾) − 5)) · (2↑_𝑐2)))
309		2nn0 11902	. . . . . . . . . . . . 13 ⊢ 2 ∈ ℕ₀
310		cxpexp 25259	. . . . . . . . . . . . 13 ⊢ ((2 ∈ ℂ ∧ 2 ∈ ℕ₀) → (2↑_𝑐2) = (2↑2))
311	289, 309, 310	mp2an 691	. . . . . . . . . . . 12 ⊢ (2↑_𝑐2) = (2↑2)
312		sq2 13556	. . . . . . . . . . . 12 ⊢ (2↑2) = 4
313	311, 312	eqtri 2821	. . . . . . . . . . 11 ⊢ (2↑_𝑐2) = 4
314	313	oveq2i 7146	. . . . . . . . . 10 ⊢ ((2↑_𝑐((2 · 𝐾) − 5)) · (2↑_𝑐2)) = ((2↑_𝑐((2 · 𝐾) − 5)) · 4)
315	308, 314	eqtrdi 2849	. . . . . . . . 9 ⊢ (𝜑 → (2↑((2 · 𝐾) − 3)) = ((2↑_𝑐((2 · 𝐾) − 5)) · 4))
316	285, 315	breqtrd 5056	. . . . . . . 8 ⊢ (𝜑 → (exp‘(θ‘𝐾)) < ((2↑_𝑐((2 · 𝐾) − 5)) · 4))
317	224, 252	pm3.2i 474	. . . . . . . . . 10 ⊢ (4 ∈ ℝ ∧ 0 < 4)
318	317	a1i 11	. . . . . . . . 9 ⊢ (𝜑 → (4 ∈ ℝ ∧ 0 < 4))
319		ltdivmul2 11506	. . . . . . . . 9 ⊢ (((exp‘(θ‘𝐾)) ∈ ℝ ∧ (2↑_𝑐((2 · 𝐾) − 5)) ∈ ℝ ∧ (4 ∈ ℝ ∧ 0 < 4)) → (((exp‘(θ‘𝐾)) / 4) < (2↑_𝑐((2 · 𝐾) − 5)) ↔ (exp‘(θ‘𝐾)) < ((2↑_𝑐((2 · 𝐾) − 5)) · 4)))
320	212, 85, 318, 319	syl3anc 1368	. . . . . . . 8 ⊢ (𝜑 → (((exp‘(θ‘𝐾)) / 4) < (2↑_𝑐((2 · 𝐾) − 5)) ↔ (exp‘(θ‘𝐾)) < ((2↑_𝑐((2 · 𝐾) − 5)) · 4)))
321	316, 320	mpbird 260	. . . . . . 7 ⊢ (𝜑 → ((exp‘(θ‘𝐾)) / 4) < (2↑_𝑐((2 · 𝐾) − 5)))
322	119, 223, 85, 256, 321	lttrd 10790	. . . . . 6 ⊢ (𝜑 → ((exp‘(θ‘𝐾)) / (exp‘(θ‘𝑀))) < (2↑_𝑐((2 · 𝐾) − 5)))
323	102, 119, 85, 221, 322	lelttrd 10787	. . . . 5 ⊢ (𝜑 → ((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) < (2↑_𝑐((2 · 𝐾) − 5)))
324	97	nnred 11640	. . . . . 6 ⊢ (𝜑 → (seq1( · , 𝐹)‘𝐾) ∈ ℝ)
325		nnre 11632	. . . . . . . 8 ⊢ ((seq1( · , 𝐹)‘𝑀) ∈ ℕ → (seq1( · , 𝐹)‘𝑀) ∈ ℝ)
326		nngt0 11656	. . . . . . . 8 ⊢ ((seq1( · , 𝐹)‘𝑀) ∈ ℕ → 0 < (seq1( · , 𝐹)‘𝑀))
327	325, 326	jca 515	. . . . . . 7 ⊢ ((seq1( · , 𝐹)‘𝑀) ∈ ℕ → ((seq1( · , 𝐹)‘𝑀) ∈ ℝ ∧ 0 < (seq1( · , 𝐹)‘𝑀)))
328	70, 327	syl 17	. . . . . 6 ⊢ (𝜑 → ((seq1( · , 𝐹)‘𝑀) ∈ ℝ ∧ 0 < (seq1( · , 𝐹)‘𝑀)))
329		ltdivmul 11504	. . . . . 6 ⊢ (((seq1( · , 𝐹)‘𝐾) ∈ ℝ ∧ (2↑_𝑐((2 · 𝐾) − 5)) ∈ ℝ ∧ ((seq1( · , 𝐹)‘𝑀) ∈ ℝ ∧ 0 < (seq1( · , 𝐹)‘𝑀))) → (((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) < (2↑_𝑐((2 · 𝐾) − 5)) ↔ (seq1( · , 𝐹)‘𝐾) < ((seq1( · , 𝐹)‘𝑀) · (2↑_𝑐((2 · 𝐾) − 5)))))
330	324, 85, 328, 329	syl3anc 1368	. . . . 5 ⊢ (𝜑 → (((seq1( · , 𝐹)‘𝐾) / (seq1( · , 𝐹)‘𝑀)) < (2↑_𝑐((2 · 𝐾) − 5)) ↔ (seq1( · , 𝐹)‘𝐾) < ((seq1( · , 𝐹)‘𝑀) · (2↑_𝑐((2 · 𝐾) − 5)))))
331	323, 330	mpbid 235	. . . 4 ⊢ (𝜑 → (seq1( · , 𝐹)‘𝐾) < ((seq1( · , 𝐹)‘𝑀) · (2↑_𝑐((2 · 𝐾) − 5))))
332	87, 331	eqbrtrrd 5054	. . 3 ⊢ (𝜑 → ((2 · 𝑁)C𝑁) < ((seq1( · , 𝐹)‘𝑀) · (2↑_𝑐((2 · 𝐾) − 5))))
333	30, 85	remulcld 10660	. . . 4 ⊢ (𝜑 → (((2 · 𝑁)↑_𝑐(((√‘(2 · 𝑁)) / 3) + 2)) · (2↑_𝑐((2 · 𝐾) − 5))) ∈ ℝ)
334	3, 62, 55, 63, 64	bposlem5 25872	. . . . 5 ⊢ (𝜑 → (seq1( · , 𝐹)‘𝑀) ≤ ((2 · 𝑁)↑_𝑐(((√‘(2 · 𝑁)) / 3) + 2)))
335	71, 30, 84	lemul1d 12462	. . . . 5 ⊢ (𝜑 → ((seq1( · , 𝐹)‘𝑀) ≤ ((2 · 𝑁)↑_𝑐(((√‘(2 · 𝑁)) / 3) + 2)) ↔ ((seq1( · , 𝐹)‘𝑀) · (2↑_𝑐((2 · 𝐾) − 5))) ≤ (((2 · 𝑁)↑_𝑐(((√‘(2 · 𝑁)) / 3) + 2)) · (2↑_𝑐((2 · 𝐾) − 5)))))
336	334, 335	mpbid 235	. . . 4 ⊢ (𝜑 → ((seq1( · , 𝐹)‘𝑀) · (2↑_𝑐((2 · 𝐾) − 5))) ≤ (((2 · 𝑁)↑_𝑐(((√‘(2 · 𝑁)) / 3) + 2)) · (2↑_𝑐((2 · 𝐾) − 5))))
337	78	zred 12075	. . . . . . 7 ⊢ (𝜑 → (2 · 𝐾) ∈ ℝ)
338	37	a1i 11	. . . . . . 7 ⊢ (𝜑 → 5 ∈ ℝ)
339		flle 13164	. . . . . . . . . . 11 ⊢ (((2 · 𝑁) / 3) ∈ ℝ → (⌊‘((2 · 𝑁) / 3)) ≤ ((2 · 𝑁) / 3))
340	74, 339	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → (⌊‘((2 · 𝑁) / 3)) ≤ ((2 · 𝑁) / 3))
341	63, 340	eqbrtrid 5065	. . . . . . . . 9 ⊢ (𝜑 → 𝐾 ≤ ((2 · 𝑁) / 3))
342		2pos 11728	. . . . . . . . . . . 12 ⊢ 0 < 2
343	26, 342	pm3.2i 474	. . . . . . . . . . 11 ⊢ (2 ∈ ℝ ∧ 0 < 2)
344	343	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → (2 ∈ ℝ ∧ 0 < 2))
345		lemul2 11482	. . . . . . . . . 10 ⊢ ((𝐾 ∈ ℝ ∧ ((2 · 𝑁) / 3) ∈ ℝ ∧ (2 ∈ ℝ ∧ 0 < 2)) → (𝐾 ≤ ((2 · 𝑁) / 3) ↔ (2 · 𝐾) ≤ (2 · ((2 · 𝑁) / 3))))
346	104, 74, 344, 345	syl3anc 1368	. . . . . . . . 9 ⊢ (𝜑 → (𝐾 ≤ ((2 · 𝑁) / 3) ↔ (2 · 𝐾) ≤ (2 · ((2 · 𝑁) / 3))))
347	341, 346	mpbid 235	. . . . . . . 8 ⊢ (𝜑 → (2 · 𝐾) ≤ (2 · ((2 · 𝑁) / 3)))
348	18	nncnd 11641	. . . . . . . . . 10 ⊢ (𝜑 → (2 · 𝑁) ∈ ℂ)
349		3ne0 11731	. . . . . . . . . . . 12 ⊢ 3 ≠ 0
350	288, 349	pm3.2i 474	. . . . . . . . . . 11 ⊢ (3 ∈ ℂ ∧ 3 ≠ 0)
351		divass 11305	. . . . . . . . . . 11 ⊢ ((2 ∈ ℂ ∧ (2 · 𝑁) ∈ ℂ ∧ (3 ∈ ℂ ∧ 3 ≠ 0)) → ((2 · (2 · 𝑁)) / 3) = (2 · ((2 · 𝑁) / 3)))
352	289, 350, 351	mp3an13 1449	. . . . . . . . . 10 ⊢ ((2 · 𝑁) ∈ ℂ → ((2 · (2 · 𝑁)) / 3) = (2 · ((2 · 𝑁) / 3)))
353	348, 352	syl 17	. . . . . . . . 9 ⊢ (𝜑 → ((2 · (2 · 𝑁)) / 3) = (2 · ((2 · 𝑁) / 3)))
354		2t2e4 11789	. . . . . . . . . . . 12 ⊢ (2 · 2) = 4
355	354	oveq1i 7145	. . . . . . . . . . 11 ⊢ ((2 · 2) · 𝑁) = (4 · 𝑁)
356	5	nncnd 11641	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑁 ∈ ℂ)
357		mulass 10614	. . . . . . . . . . . 12 ⊢ ((2 ∈ ℂ ∧ 2 ∈ ℂ ∧ 𝑁 ∈ ℂ) → ((2 · 2) · 𝑁) = (2 · (2 · 𝑁)))
358	289, 289, 356, 357	mp3an12i 1462	. . . . . . . . . . 11 ⊢ (𝜑 → ((2 · 2) · 𝑁) = (2 · (2 · 𝑁)))
359	355, 358	syl5reqr 2848	. . . . . . . . . 10 ⊢ (𝜑 → (2 · (2 · 𝑁)) = (4 · 𝑁))
360	359	oveq1d 7150	. . . . . . . . 9 ⊢ (𝜑 → ((2 · (2 · 𝑁)) / 3) = ((4 · 𝑁) / 3))
361	353, 360	eqtr3d 2835	. . . . . . . 8 ⊢ (𝜑 → (2 · ((2 · 𝑁) / 3)) = ((4 · 𝑁) / 3))
362	347, 361	breqtrd 5056	. . . . . . 7 ⊢ (𝜑 → (2 · 𝐾) ≤ ((4 · 𝑁) / 3))
363	337, 36, 338, 362	lesub1dd 11245	. . . . . 6 ⊢ (𝜑 → ((2 · 𝐾) − 5) ≤ (((4 · 𝑁) / 3) − 5))
364		1lt2 11796	. . . . . . . 8 ⊢ 1 < 2
365	364	a1i 11	. . . . . . 7 ⊢ (𝜑 → 1 < 2)
366	257, 365, 82, 39	cxpled 25311	. . . . . 6 ⊢ (𝜑 → (((2 · 𝐾) − 5) ≤ (((4 · 𝑁) / 3) − 5) ↔ (2↑_𝑐((2 · 𝐾) − 5)) ≤ (2↑_𝑐(((4 · 𝑁) / 3) − 5))))
367	363, 366	mpbid 235	. . . . 5 ⊢ (𝜑 → (2↑_𝑐((2 · 𝐾) − 5)) ≤ (2↑_𝑐(((4 · 𝑁) / 3) − 5)))
368	85, 42, 29	lemul2d 12463	. . . . 5 ⊢ (𝜑 → ((2↑_𝑐((2 · 𝐾) − 5)) ≤ (2↑_𝑐(((4 · 𝑁) / 3) − 5)) ↔ (((2 · 𝑁)↑_𝑐(((√‘(2 · 𝑁)) / 3) + 2)) · (2↑_𝑐((2 · 𝐾) − 5))) ≤ (((2 · 𝑁)↑_𝑐(((√‘(2 · 𝑁)) / 3) + 2)) · (2↑_𝑐(((4 · 𝑁) / 3) − 5)))))
369	367, 368	mpbid 235	. . . 4 ⊢ (𝜑 → (((2 · 𝑁)↑_𝑐(((√‘(2 · 𝑁)) / 3) + 2)) · (2↑_𝑐((2 · 𝐾) − 5))) ≤ (((2 · 𝑁)↑_𝑐(((√‘(2 · 𝑁)) / 3) + 2)) · (2↑_𝑐(((4 · 𝑁) / 3) − 5))))
370	86, 333, 43, 336, 369	letrd 10786	. . 3 ⊢ (𝜑 → ((seq1( · , 𝐹)‘𝑀) · (2↑_𝑐((2 · 𝐾) − 5))) ≤ (((2 · 𝑁)↑_𝑐(((√‘(2 · 𝑁)) / 3) + 2)) · (2↑_𝑐(((4 · 𝑁) / 3) − 5))))
371	15, 86, 43, 332, 370	ltletrd 10789	. 2 ⊢ (𝜑 → ((2 · 𝑁)C𝑁) < (((2 · 𝑁)↑_𝑐(((√‘(2 · 𝑁)) / 3) + 2)) · (2↑_𝑐(((4 · 𝑁) / 3) − 5))))
372	10, 15, 43, 54, 371	lttrd 10790	1 ⊢ (𝜑 → ((4↑𝑁) / 𝑁) < (((2 · 𝑁)↑_𝑐(((√‘(2 · 𝑁)) / 3) + 2)) · (2↑_𝑐(((4 · 𝑁) / 3) − 5))))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 209 ∧ wa 399 = wceq 1538 ∈ wcel 2111 ≠ wne 2987 ∀wral 3106 ∃wrex 3107 ifcif 4425 class class class wbr 5030 ↦ cmpt 5110 ⟶wf 6320 ‘cfv 6324 (class class class)co 7135 ℂcc 10524 ℝcr 10525 0cc0 10526 1c1 10527 + caddc 10529 · cmul 10531 < clt 10664 ≤ cle 10665 − cmin 10859 / cdiv 11286 ℕcn 11625 2c2 11680 3c3 11681 4c4 11682 5c5 11683 6c6 11684 ℕ₀cn0 11885 ℤcz 11969 ℤ_≥cuz 12231 ℝ⁺crp 12377 ...cfz 12885 ⌊cfl 13155 seqcseq 13364 ↑cexp 13425 Ccbc 13658 √csqrt 14584 expce 15407 ∥ cdvds 15599 ℙcprime 16005 pCnt cpc 16163 logclog 25146 ↑_𝑐ccxp 25147 θccht 25676

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1797 ax-4 1811 ax-5 1911 ax-6 1970 ax-7 2015 ax-8 2113 ax-9 2121 ax-10 2142 ax-11 2158 ax-12 2175 ax-ext 2770 ax-rep 5154 ax-sep 5167 ax-nul 5174 ax-pow 5231 ax-pr 5295 ax-un 7441 ax-inf2 9088 ax-cnex 10582 ax-resscn 10583 ax-1cn 10584 ax-icn 10585 ax-addcl 10586 ax-addrcl 10587 ax-mulcl 10588 ax-mulrcl 10589 ax-mulcom 10590 ax-addass 10591 ax-mulass 10592 ax-distr 10593 ax-i2m1 10594 ax-1ne0 10595 ax-1rid 10596 ax-rnegex 10597 ax-rrecex 10598 ax-cnre 10599 ax-pre-lttri 10600 ax-pre-lttrn 10601 ax-pre-ltadd 10602 ax-pre-mulgt0 10603 ax-pre-sup 10604 ax-addf 10605 ax-mulf 10606

This theorem depends on definitions: df-bi 210 df-an 400 df-or 845 df-3or 1085 df-3an 1086 df-tru 1541 df-fal 1551 df-ex 1782 df-nf 1786 df-sb 2070 df-mo 2598 df-eu 2629 df-clab 2777 df-cleq 2791 df-clel 2870 df-nfc 2938 df-ne 2988 df-nel 3092 df-ral 3111 df-rex 3112 df-reu 3113 df-rmo 3114 df-rab 3115 df-v 3443 df-sbc 3721 df-csb 3829 df-dif 3884 df-un 3886 df-in 3888 df-ss 3898 df-pss 3900 df-nul 4244 df-if 4426 df-pw 4499 df-sn 4526 df-pr 4528 df-tp 4530 df-op 4532 df-uni 4801 df-int 4839 df-iun 4883 df-iin 4884 df-br 5031 df-opab 5093 df-mpt 5111 df-tr 5137 df-id 5425 df-eprel 5430 df-po 5438 df-so 5439 df-fr 5478 df-se 5479 df-we 5480 df-xp 5525 df-rel 5526 df-cnv 5527 df-co 5528 df-dm 5529 df-rn 5530 df-res 5531 df-ima 5532 df-pred 6116 df-ord 6162 df-on 6163 df-lim 6164 df-suc 6165 df-iota 6283 df-fun 6326 df-fn 6327 df-f 6328 df-f1 6329 df-fo 6330 df-f1o 6331 df-fv 6332 df-isom 6333 df-riota 7093 df-ov 7138 df-oprab 7139 df-mpo 7140 df-of 7389 df-om 7561 df-1st 7671 df-2nd 7672 df-supp 7814 df-wrecs 7930 df-recs 7991 df-rdg 8029 df-1o 8085 df-2o 8086 df-oadd 8089 df-er 8272 df-map 8391 df-pm 8392 df-ixp 8445 df-en 8493 df-dom 8494 df-sdom 8495 df-fin 8496 df-fsupp 8818 df-fi 8859 df-sup 8890 df-inf 8891 df-oi 8958 df-dju 9314 df-card 9352 df-pnf 10666 df-mnf 10667 df-xr 10668 df-ltxr 10669 df-le 10670 df-sub 10861 df-neg 10862 df-div 11287 df-nn 11626 df-2 11688 df-3 11689 df-4 11690 df-5 11691 df-6 11692 df-7 11693 df-8 11694 df-9 11695 df-n0 11886 df-xnn0 11956 df-z 11970 df-dec 12087 df-uz 12232 df-q 12337 df-rp 12378 df-xneg 12495 df-xadd 12496 df-xmul 12497 df-ioo 12730 df-ioc 12731 df-ico 12732 df-icc 12733 df-fz 12886 df-fzo 13029 df-fl 13157 df-mod 13233 df-seq 13365 df-exp 13426 df-fac 13630 df-bc 13659 df-hash 13687 df-shft 14418 df-cj 14450 df-re 14451 df-im 14452 df-sqrt 14586 df-abs 14587 df-limsup 14820 df-clim 14837 df-rlim 14838 df-sum 15035 df-ef 15413 df-sin 15415 df-cos 15416 df-pi 15418 df-dvds 15600 df-gcd 15834 df-prm 16006 df-pc 16164 df-struct 16477 df-ndx 16478 df-slot 16479 df-base 16481 df-sets 16482 df-ress 16483 df-plusg 16570 df-mulr 16571 df-starv 16572 df-sca 16573 df-vsca 16574 df-ip 16575 df-tset 16576 df-ple 16577 df-ds 16579 df-unif 16580 df-hom 16581 df-cco 16582 df-rest 16688 df-topn 16689 df-0g 16707 df-gsum 16708 df-topgen 16709 df-pt 16710 df-prds 16713 df-xrs 16767 df-qtop 16772 df-imas 16773 df-xps 16775 df-mre 16849 df-mrc 16850 df-acs 16852 df-mgm 17844 df-sgrp 17893 df-mnd 17904 df-submnd 17949 df-mulg 18217 df-cntz 18439 df-cmn 18900 df-psmet 20083 df-xmet 20084 df-met 20085 df-bl 20086 df-mopn 20087 df-fbas 20088 df-fg 20089 df-cnfld 20092 df-top 21499 df-topon 21516 df-topsp 21538 df-bases 21551 df-cld 21624 df-ntr 21625 df-cls 21626 df-nei 21703 df-lp 21741 df-perf 21742 df-cn 21832 df-cnp 21833 df-haus 21920 df-tx 22167 df-hmeo 22360 df-fil 22451 df-fm 22543 df-flim 22544 df-flf 22545 df-xms 22927 df-ms 22928 df-tms 22929 df-cncf 23483 df-limc 24469 df-dv 24470 df-log 25148 df-cxp 25149 df-cht 25682 df-ppi 25685

This theorem is referenced by: bposlem9 25876

W3C validator