Theorem ostth3 23579

Description: - Lemma for ostth 23580: p-adic case. (Contributed by Mario Carneiro, 10-Sep-2014.)

Hypotheses

Ref	Expression
qrng.q	|- Q = (ℂfld ↾s QQ )
qabsabv.a	|- A = (AbsVal ` Q )
padic.j	|- J = ( q e. Prime |-> ( x e. QQ |-> if ( x = 0 , 0 , ( q ^ -u ( q pCnt x ) ) ) ) )
ostth.k	|- K = ( x e. QQ |-> if ( x = 0 , 0 , 1 ) )
ostth.1	|- ( ph -> F e. A )
ostth3.2	|- ( ph -> A. n e. NN -. 1 < ( F ` n ) )
ostth3.3	|- ( ph -> P e. Prime )
ostth3.4	|- ( ph -> ( F ` P ) < 1 )
ostth3.5	|- R = -u ( ( log ` ( F ` P ) ) / ( log ` P ) )
ostth3.6	|- S = if ( ( F ` P ) <_ ( F ` p ) , ( F ` p ) , ( F ` P ) )

Assertion

Ref	Expression
ostth3	|- ( ph -> E. a e. RR+ F = ( y e. QQ |-> ( ( ( J ` P ) ` y ) ^c a ) ) )

Distinct variable groups:   n, p, y   n, K   x, n, a, p, q, y, ph   J, a, p, y   S, a   A, a, n, p, q, x, y   Q, n, x, y   F, a, n, p, q, y   P, a, p, q, x, y   R, a, p, q, y   x, F

Allowed substitution hints:   P( n)   Q( q, p, a)   R( x, n)   S( x, y, n, q, p)   J( x, n, q)   K( x, y, q, p, a)

Proof of Theorem ostth3

Dummy variables k b are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		ostth3.5	. . . 4 |- R = -u ( ( log ` ( F ` P ) ) / ( log ` P ) )
2		ostth.1	. . . . . . . . 9 |- ( ph -> F e. A )
3		ostth3.3	. . . . . . . . . . . . 13 |- ( ph -> P e. Prime )
4		prmuz2 14094	. . . . . . . . . . . . 13 |- ( P e. Prime -> P e. ( ZZ>= ` 2 ) )
5	3, 4	syl 16	. . . . . . . . . . . 12 |- ( ph -> P e. ( ZZ>= ` 2 ) )
6		eluz2b2 11154	. . . . . . . . . . . 12 |- ( P e. ( ZZ>= ` 2 ) <-> ( P e. NN /\ 1 < P ) )
7	5, 6	sylib 196	. . . . . . . . . . 11 |- ( ph -> ( P e. NN /\ 1 < P ) )
8	7	simpld 459	. . . . . . . . . 10 |- ( ph -> P e. NN )
9		nnq 11195	. . . . . . . . . 10 |- ( P e. NN -> P e. QQ )
10	8, 9	syl 16	. . . . . . . . 9 |- ( ph -> P e. QQ )
11		qabsabv.a	. . . . . . . . . 10 |- A = (AbsVal ` Q )
12		qrng.q	. . . . . . . . . . 11 |- Q = (ℂfld ↾s QQ )
13	12	qrngbas 23560	. . . . . . . . . 10 |- QQ = ( Base ` Q )
14	11, 13	abvcl 17273	. . . . . . . . 9 |- ( ( F e. A /\ P e. QQ ) -> ( F ` P ) e. RR )
15	2, 10, 14	syl2anc 661	. . . . . . . 8 |- ( ph -> ( F ` P ) e. RR )
16	8	nnne0d 10580	. . . . . . . . 9 |- ( ph -> P =/= 0 )
17	12	qrng0 23562	. . . . . . . . . 10 |- 0 = ( 0g ` Q )
18	11, 13, 17	abvgt0 17277	. . . . . . . . 9 |- ( ( F e. A /\ P e. QQ /\ P =/= 0 ) -> 0 < ( F ` P ) )
19	2, 10, 16, 18	syl3anc 1228	. . . . . . . 8 |- ( ph -> 0 < ( F ` P ) )
20	15, 19	elrpd 11254	. . . . . . 7 |- ( ph -> ( F ` P ) e. RR+ )
21	20	relogcld 22764	. . . . . 6 |- ( ph -> ( log ` ( F ` P ) ) e. RR )
22	8	nnred 10551	. . . . . . 7 |- ( ph -> P e. RR )
23	7	simprd 463	. . . . . . 7 |- ( ph -> 1 < P )
24	22, 23	rplogcld 22770	. . . . . 6 |- ( ph -> ( log ` P ) e. RR+ )
25	21, 24	rerpdivcld 11283	. . . . 5 |- ( ph -> ( ( log ` ( F ` P ) ) / ( log ` P ) ) e. RR )
26	25	renegcld 9986	. . . 4 |- ( ph -> -u ( ( log ` ( F ` P ) ) / ( log ` P ) ) e. RR )
27	1, 26	syl5eqel 2559	. . 3 |- ( ph -> R e. RR )
28		ostth3.4	. . . . . . . . 9 |- ( ph -> ( F ` P ) < 1 )
29		1rp 11224	. . . . . . . . . 10 |- 1 e. RR+
30		logltb 22740	. . . . . . . . . 10 |- ( ( ( F ` P ) e. RR+ /\ 1 e. RR+ ) -> ( ( F ` P ) < 1 <-> ( log ` ( F ` P ) ) < ( log ` 1 ) ) )
31	20, 29, 30	sylancl 662	. . . . . . . . 9 |- ( ph -> ( ( F ` P ) < 1 <-> ( log ` ( F ` P ) ) < ( log ` 1 ) ) )
32	28, 31	mpbid 210	. . . . . . . 8 |- ( ph -> ( log ` ( F ` P ) ) < ( log ` 1 ) )
33		log1 22726	. . . . . . . 8 |- ( log ` 1 ) = 0
34	32, 33	syl6breq 4486	. . . . . . 7 |- ( ph -> ( log ` ( F ` P ) ) < 0 )
35	24	rpcnd 11258	. . . . . . . 8 |- ( ph -> ( log ` P ) e. CC )
36	35	mul01d 9778	. . . . . . 7 |- ( ph -> ( ( log ` P ) x. 0 ) = 0 )
37	34, 36	breqtrrd 4473	. . . . . 6 |- ( ph -> ( log ` ( F ` P ) ) < ( ( log ` P ) x. 0 ) )
38		0red 9597	. . . . . . 7 |- ( ph -> 0 e. RR )
39	21, 38, 24	ltdivmuld 11303	. . . . . 6 |- ( ph -> ( ( ( log ` ( F ` P ) ) / ( log ` P ) ) < 0 <-> ( log ` ( F ` P ) ) < ( ( log ` P ) x. 0 ) ) )
40	37, 39	mpbird 232	. . . . 5 |- ( ph -> ( ( log ` ( F ` P ) ) / ( log ` P ) ) < 0 )
41	25	lt0neg1d 10122	. . . . 5 |- ( ph -> ( ( ( log ` ( F ` P ) ) / ( log ` P ) ) < 0 <-> 0 < -u ( ( log ` ( F ` P ) ) / ( log ` P ) ) ) )
42	40, 41	mpbid 210	. . . 4 |- ( ph -> 0 < -u ( ( log ` ( F ` P ) ) / ( log ` P ) ) )
43	42, 1	syl6breqr 4487	. . 3 |- ( ph -> 0 < R )
44	27, 43	elrpd 11254	. 2 |- ( ph -> R e. RR+ )
45		padic.j	. . . . 5 |- J = ( q e. Prime |-> ( x e. QQ |-> if ( x = 0 , 0 , ( q ^ -u ( q pCnt x ) ) ) ) )
46	12, 11, 45	padicabvcxp 23573	. . . 4 |- ( ( P e. Prime /\ R e. RR+ ) -> ( y e. QQ |-> ( ( ( J ` P ) ` y ) ^c R ) ) e. A )
47	3, 44, 46	syl2anc 661	. . 3 |- ( ph -> ( y e. QQ |-> ( ( ( J ` P ) ` y ) ^c R ) ) e. A )
48		fveq2 5866	. . . . . . . . . 10 |- ( y = P -> ( ( J ` P ) ` y ) = ( ( J ` P ) ` P ) )
49	48	oveq1d 6299	. . . . . . . . 9 |- ( y = P -> ( ( ( J ` P ) ` y ) ^c R ) = ( ( ( J ` P ) ` P ) ^c R ) )
50		eqid 2467	. . . . . . . . 9 |- ( y e. QQ |-> ( ( ( J ` P ) ` y ) ^c R ) ) = ( y e. QQ |-> ( ( ( J ` P ) ` y ) ^c R ) )
51		ovex 6309	. . . . . . . . 9 |- ( ( ( J ` P ) ` P ) ^c R ) e. _V
52	49, 50, 51	fvmpt 5950	. . . . . . . 8 |- ( P e. QQ -> ( ( y e. QQ |-> ( ( ( J ` P ) ` y ) ^c R ) ) ` P ) = ( ( ( J ` P ) ` P ) ^c R ) )
53	10, 52	syl 16	. . . . . . 7 |- ( ph -> ( ( y e. QQ |-> ( ( ( J ` P ) ` y ) ^c R ) ) ` P ) = ( ( ( J ` P ) ` P ) ^c R ) )
54	45	padicval 23558	. . . . . . . . . 10 |- ( ( P e. Prime /\ P e. QQ ) -> ( ( J ` P ) ` P ) = if ( P = 0 , 0 , ( P ^ -u ( P pCnt P ) ) ) )
55	3, 10, 54	syl2anc 661	. . . . . . . . 9 |- ( ph -> ( ( J ` P ) ` P ) = if ( P = 0 , 0 , ( P ^ -u ( P pCnt P ) ) ) )
56	16	neneqd 2669	. . . . . . . . . 10 |- ( ph -> -. P = 0 )
57		iffalse 3948	. . . . . . . . . 10 |- ( -. P = 0 -> if ( P = 0 , 0 , ( P ^ -u ( P pCnt P ) ) ) = ( P ^ -u ( P pCnt P ) ) )
58	56, 57	syl 16	. . . . . . . . 9 |- ( ph -> if ( P = 0 , 0 , ( P ^ -u ( P pCnt P ) ) ) = ( P ^ -u ( P pCnt P ) ) )
59	8	nncnd 10552	. . . . . . . . . . . . . . 15 |- ( ph -> P e. CC )
60	59	exp1d 12273	. . . . . . . . . . . . . 14 |- ( ph -> ( P ^ 1 ) = P )
61	60	oveq2d 6300	. . . . . . . . . . . . 13 |- ( ph -> ( P pCnt ( P ^ 1 ) ) = ( P pCnt P ) )
62		1z 10894	. . . . . . . . . . . . . 14 |- 1 e. ZZ
63		pcid 14255	. . . . . . . . . . . . . 14 |- ( ( P e. Prime /\ 1 e. ZZ ) -> ( P pCnt ( P ^ 1 ) ) = 1 )
64	3, 62, 63	sylancl 662	. . . . . . . . . . . . 13 |- ( ph -> ( P pCnt ( P ^ 1 ) ) = 1 )
65	61, 64	eqtr3d 2510	. . . . . . . . . . . 12 |- ( ph -> ( P pCnt P ) = 1 )
66	65	negeqd 9814	. . . . . . . . . . 11 |- ( ph -> -u ( P pCnt P ) = -u 1 )
67	66	oveq2d 6300	. . . . . . . . . 10 |- ( ph -> ( P ^ -u ( P pCnt P ) ) = ( P ^ -u 1 ) )
68		neg1z 10899	. . . . . . . . . . . 12 |- -u 1 e. ZZ
69	68	a1i 11	. . . . . . . . . . 11 |- ( ph -> -u 1 e. ZZ )
70	59, 16, 69	cxpexpzd 22848	. . . . . . . . . 10 |- ( ph -> ( P ^c -u 1 ) = ( P ^ -u 1 ) )
71	67, 70	eqtr4d 2511	. . . . . . . . 9 |- ( ph -> ( P ^ -u ( P pCnt P ) ) = ( P ^c -u 1 ) )
72	55, 58, 71	3eqtrd 2512	. . . . . . . 8 |- ( ph -> ( ( J ` P ) ` P ) = ( P ^c -u 1 ) )
73	72	oveq1d 6299	. . . . . . 7 |- ( ph -> ( ( ( J ` P ) ` P ) ^c R ) = ( ( P ^c -u 1 ) ^c R ) )
74	27	recnd 9622	. . . . . . . . . . 11 |- ( ph -> R e. CC )
75	74	mulm1d 10008	. . . . . . . . . 10 |- ( ph -> ( -u 1 x. R ) = -u R )
76	1	negeqi 9813	. . . . . . . . . . 11 |- -u R = -u -u ( ( log ` ( F ` P ) ) / ( log ` P ) )
77	25	recnd 9622	. . . . . . . . . . . 12 |- ( ph -> ( ( log ` ( F ` P ) ) / ( log ` P ) ) e. CC )
78	77	negnegd 9921	. . . . . . . . . . 11 |- ( ph -> -u -u ( ( log ` ( F ` P ) ) / ( log ` P ) ) = ( ( log ` ( F ` P ) ) / ( log ` P ) ) )
79	76, 78	syl5eq 2520	. . . . . . . . . 10 |- ( ph -> -u R = ( ( log ` ( F ` P ) ) / ( log ` P ) ) )
80	75, 79	eqtrd 2508	. . . . . . . . 9 |- ( ph -> ( -u 1 x. R ) = ( ( log ` ( F ` P ) ) / ( log ` P ) ) )
81	80	oveq2d 6300	. . . . . . . 8 |- ( ph -> ( P ^c ( -u 1 x. R ) ) = ( P ^c ( ( log ` ( F ` P ) ) / ( log ` P ) ) ) )
82	8	nnrpd 11255	. . . . . . . . 9 |- ( ph -> P e. RR+ )
83		neg1rr 10640	. . . . . . . . . 10 |- -u 1 e. RR
84	83	a1i 11	. . . . . . . . 9 |- ( ph -> -u 1 e. RR )
85	82, 84, 74	cxpmuld 22871	. . . . . . . 8 |- ( ph -> ( P ^c ( -u 1 x. R ) ) = ( ( P ^c -u 1 ) ^c R ) )
86	59, 16, 77	cxpefd 22849	. . . . . . . . 9 |- ( ph -> ( P ^c ( ( log ` ( F ` P ) ) / ( log ` P ) ) ) = ( exp ` ( ( ( log ` ( F ` P ) ) / ( log ` P ) ) x. ( log ` P ) ) ) )
87	21	recnd 9622	. . . . . . . . . . 11 |- ( ph -> ( log ` ( F ` P ) ) e. CC )
88	24	rpne0d 11261	. . . . . . . . . . 11 |- ( ph -> ( log ` P ) =/= 0 )
89	87, 35, 88	divcan1d 10321	. . . . . . . . . 10 |- ( ph -> ( ( ( log ` ( F ` P ) ) / ( log ` P ) ) x. ( log ` P ) ) = ( log ` ( F ` P ) ) )
90	89	fveq2d 5870	. . . . . . . . 9 |- ( ph -> ( exp ` ( ( ( log ` ( F ` P ) ) / ( log ` P ) ) x. ( log ` P ) ) ) = ( exp ` ( log ` ( F ` P ) ) ) )
91	20	reeflogd 22765	. . . . . . . . 9 |- ( ph -> ( exp ` ( log ` ( F ` P ) ) ) = ( F ` P ) )
92	86, 90, 91	3eqtrd 2512	. . . . . . . 8 |- ( ph -> ( P ^c ( ( log ` ( F ` P ) ) / ( log ` P ) ) ) = ( F ` P ) )
93	81, 85, 92	3eqtr3d 2516	. . . . . . 7 |- ( ph -> ( ( P ^c -u 1 ) ^c R ) = ( F ` P ) )
94	53, 73, 93	3eqtrrd 2513	. . . . . 6 |- ( ph -> ( F ` P ) = ( ( y e. QQ |-> ( ( ( J ` P ) ` y ) ^c R ) ) ` P ) )
95		fveq2 5866	. . . . . . 7 |- ( P = p -> ( F ` P ) = ( F ` p ) )
96		fveq2 5866	. . . . . . 7 |- ( P = p -> ( ( y e. QQ |-> ( ( ( J ` P ) ` y ) ^c R ) ) ` P ) = ( ( y e. QQ |-> ( ( ( J ` P ) ` y ) ^c R ) ) ` p ) )
97	95, 96	eqeq12d 2489	. . . . . 6 |- ( P = p -> ( ( F ` P ) = ( ( y e. QQ |-> ( ( ( J ` P ) ` y ) ^c R ) ) ` P ) <-> ( F ` p ) = ( ( y e. QQ |-> ( ( ( J ` P ) ` y ) ^c R ) ) ` p ) ) )
98	94, 97	syl5ibcom 220	. . . . 5 |- ( ph -> ( P = p -> ( F ` p ) = ( ( y e. QQ |-> ( ( ( J ` P ) ` y ) ^c R ) ) ` p ) ) )
99	98	adantr 465	. . . 4 |- ( ( ph /\ p e. Prime ) -> ( P = p -> ( F ` p ) = ( ( y e. QQ |-> ( ( ( J ` P ) ` y ) ^c R ) ) ` p ) ) )
100		prmnn 14079	. . . . . . . . 9 |- ( p e. Prime -> p e. NN )
101	100	ad2antlr 726	. . . . . . . 8 |- ( ( ( ph /\ p e. Prime ) /\ P =/= p ) -> p e. NN )
102		nnq 11195	. . . . . . . 8 |- ( p e. NN -> p e. QQ )
103	101, 102	syl 16	. . . . . . 7 |- ( ( ( ph /\ p e. Prime ) /\ P =/= p ) -> p e. QQ )
104		fveq2 5866	. . . . . . . . 9 |- ( y = p -> ( ( J ` P ) ` y ) = ( ( J ` P ) ` p ) )
105	104	oveq1d 6299	. . . . . . . 8 |- ( y = p -> ( ( ( J ` P ) ` y ) ^c R ) = ( ( ( J ` P ) ` p ) ^c R ) )
106		ovex 6309	. . . . . . . 8 |- ( ( ( J ` P ) ` p ) ^c R ) e. _V
107	105, 50, 106	fvmpt 5950	. . . . . . 7 |- ( p e. QQ -> ( ( y e. QQ |-> ( ( ( J ` P ) ` y ) ^c R ) ) ` p ) = ( ( ( J ` P ) ` p ) ^c R ) )
108	103, 107	syl 16	. . . . . 6 |- ( ( ( ph /\ p e. Prime ) /\ P =/= p ) -> ( ( y e. QQ |-> ( ( ( J ` P ) ` y ) ^c R ) ) ` p ) = ( ( ( J ` P ) ` p ) ^c R ) )
109	74	ad2antrr 725	. . . . . . . 8 |- ( ( ( ph /\ p e. Prime ) /\ P =/= p ) -> R e. CC )
110	109	1cxpd 22844	. . . . . . 7 |- ( ( ( ph /\ p e. Prime ) /\ P =/= p ) -> ( 1 ^c R ) = 1 )
111	3	ad2antrr 725	. . . . . . . . . 10 |- ( ( ( ph /\ p e. Prime ) /\ P =/= p ) -> P e. Prime )
112	45	padicval 23558	. . . . . . . . . 10 |- ( ( P e. Prime /\ p e. QQ ) -> ( ( J ` P ) ` p ) = if ( p = 0 , 0 , ( P ^ -u ( P pCnt p ) ) ) )
113	111, 103, 112	syl2anc 661	. . . . . . . . 9 |- ( ( ( ph /\ p e. Prime ) /\ P =/= p ) -> ( ( J ` P ) ` p ) = if ( p = 0 , 0 , ( P ^ -u ( P pCnt p ) ) ) )
114	101	nnne0d 10580	. . . . . . . . . . 11 |- ( ( ( ph /\ p e. Prime ) /\ P =/= p ) -> p =/= 0 )
115	114	neneqd 2669	. . . . . . . . . 10 |- ( ( ( ph /\ p e. Prime ) /\ P =/= p ) -> -. p = 0 )
116		iffalse 3948	. . . . . . . . . 10 |- ( -. p = 0 -> if ( p = 0 , 0 , ( P ^ -u ( P pCnt p ) ) ) = ( P ^ -u ( P pCnt p ) ) )
117	115, 116	syl 16	. . . . . . . . 9 |- ( ( ( ph /\ p e. Prime ) /\ P =/= p ) -> if ( p = 0 , 0 , ( P ^ -u ( P pCnt p ) ) ) = ( P ^ -u ( P pCnt p ) ) )
118		pceq0 14253	. . . . . . . . . . . . . . . 16 |- ( ( P e. Prime /\ p e. NN ) -> ( ( P pCnt p ) = 0 <-> -. P || p ) )
119	3, 100, 118	syl2an 477	. . . . . . . . . . . . . . 15 |- ( ( ph /\ p e. Prime ) -> ( ( P pCnt p ) = 0 <-> -. P || p ) )
120		dvdsprm 14099	. . . . . . . . . . . . . . . . 17 |- ( ( P e. ( ZZ>= ` 2 ) /\ p e. Prime ) -> ( P || p <-> P = p ) )
121	5, 120	sylan 471	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ p e. Prime ) -> ( P || p <-> P = p ) )
122	121	necon3bbid 2714	. . . . . . . . . . . . . . 15 |- ( ( ph /\ p e. Prime ) -> ( -. P || p <-> P =/= p ) )
123	119, 122	bitrd 253	. . . . . . . . . . . . . 14 |- ( ( ph /\ p e. Prime ) -> ( ( P pCnt p ) = 0 <-> P =/= p ) )
124	123	biimpar 485	. . . . . . . . . . . . 13 |- ( ( ( ph /\ p e. Prime ) /\ P =/= p ) -> ( P pCnt p ) = 0 )
125	124	negeqd 9814	. . . . . . . . . . . 12 |- ( ( ( ph /\ p e. Prime ) /\ P =/= p ) -> -u ( P pCnt p ) = -u 0 )
126		neg0 9865	. . . . . . . . . . . 12 |- -u 0 = 0
127	125, 126	syl6eq 2524	. . . . . . . . . . 11 |- ( ( ( ph /\ p e. Prime ) /\ P =/= p ) -> -u ( P pCnt p ) = 0 )
128	127	oveq2d 6300	. . . . . . . . . 10 |- ( ( ( ph /\ p e. Prime ) /\ P =/= p ) -> ( P ^ -u ( P pCnt p ) ) = ( P ^ 0 ) )
129	59	ad2antrr 725	. . . . . . . . . . 11 |- ( ( ( ph /\ p e. Prime ) /\ P =/= p ) -> P e. CC )
130	129	exp0d 12272	. . . . . . . . . 10 |- ( ( ( ph /\ p e. Prime ) /\ P =/= p ) -> ( P ^ 0 ) = 1 )
131	128, 130	eqtrd 2508	. . . . . . . . 9 |- ( ( ( ph /\ p e. Prime ) /\ P =/= p ) -> ( P ^ -u ( P pCnt p ) ) = 1 )
132	113, 117, 131	3eqtrd 2512	. . . . . . . 8 |- ( ( ( ph /\ p e. Prime ) /\ P =/= p ) -> ( ( J ` P ) ` p ) = 1 )
133	132	oveq1d 6299	. . . . . . 7 |- ( ( ( ph /\ p e. Prime ) /\ P =/= p ) -> ( ( ( J ` P ) ` p ) ^c R ) = ( 1 ^c R ) )
134		2re 10605	. . . . . . . . . . . . 13 |- 2 e. RR
135	134	a1i 11	. . . . . . . . . . . 12 |- ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) -> 2 e. RR )
136		ostth3.6	. . . . . . . . . . . . . 14 |- S = if ( ( F ` P ) <_ ( F ` p ) , ( F ` p ) , ( F ` P ) )
137	2	ad2antrr 725	. . . . . . . . . . . . . . . . . 18 |- ( ( ( ph /\ p e. Prime ) /\ P =/= p ) -> F e. A )
138	11, 13	abvcl 17273	. . . . . . . . . . . . . . . . . 18 |- ( ( F e. A /\ p e. QQ ) -> ( F ` p ) e. RR )
139	137, 103, 138	syl2anc 661	. . . . . . . . . . . . . . . . 17 |- ( ( ( ph /\ p e. Prime ) /\ P =/= p ) -> ( F ` p ) e. RR )
140	11, 13, 17	abvgt0 17277	. . . . . . . . . . . . . . . . . 18 |- ( ( F e. A /\ p e. QQ /\ p =/= 0 ) -> 0 < ( F ` p ) )
141	137, 103, 114, 140	syl3anc 1228	. . . . . . . . . . . . . . . . 17 |- ( ( ( ph /\ p e. Prime ) /\ P =/= p ) -> 0 < ( F ` p ) )
142	139, 141	elrpd 11254	. . . . . . . . . . . . . . . 16 |- ( ( ( ph /\ p e. Prime ) /\ P =/= p ) -> ( F ` p ) e. RR+ )
143	142	adantrr 716	. . . . . . . . . . . . . . 15 |- ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) -> ( F ` p ) e. RR+ )
144	20	ad2antrr 725	. . . . . . . . . . . . . . 15 |- ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) -> ( F ` P ) e. RR+ )
145		ifcl 3981	. . . . . . . . . . . . . . 15 |- ( ( ( F ` p ) e. RR+ /\ ( F ` P ) e. RR+ ) -> if ( ( F ` P ) <_ ( F ` p ) , ( F ` p ) , ( F ` P ) ) e. RR+ )
146	143, 144, 145	syl2anc 661	. . . . . . . . . . . . . 14 |- ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) -> if ( ( F ` P ) <_ ( F ` p ) , ( F ` p ) , ( F ` P ) ) e. RR+ )
147	136, 146	syl5eqel 2559	. . . . . . . . . . . . 13 |- ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) -> S e. RR+ )
148	147	rprecred 11267	. . . . . . . . . . . 12 |- ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) -> ( 1 / S ) e. RR )
149		simprr 756	. . . . . . . . . . . . . . 15 |- ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) -> ( F ` p ) < 1 )
150	28	ad2antrr 725	. . . . . . . . . . . . . . 15 |- ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) -> ( F ` P ) < 1 )
151		breq1 4450	. . . . . . . . . . . . . . . 16 |- ( ( F ` p ) = if ( ( F ` P ) <_ ( F ` p ) , ( F ` p ) , ( F ` P ) ) -> ( ( F ` p ) < 1 <-> if ( ( F ` P ) <_ ( F ` p ) , ( F ` p ) , ( F ` P ) ) < 1 ) )
152		breq1 4450	. . . . . . . . . . . . . . . 16 |- ( ( F ` P ) = if ( ( F ` P ) <_ ( F ` p ) , ( F ` p ) , ( F ` P ) ) -> ( ( F ` P ) < 1 <-> if ( ( F ` P ) <_ ( F ` p ) , ( F ` p ) , ( F ` P ) ) < 1 ) )
153	151, 152	ifboth 3975	. . . . . . . . . . . . . . 15 |- ( ( ( F ` p ) < 1 /\ ( F ` P ) < 1 ) -> if ( ( F ` P ) <_ ( F ` p ) , ( F ` p ) , ( F ` P ) ) < 1 )
154	149, 150, 153	syl2anc 661	. . . . . . . . . . . . . 14 |- ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) -> if ( ( F ` P ) <_ ( F ` p ) , ( F ` p ) , ( F ` P ) ) < 1 )
155	136, 154	syl5eqbr 4480	. . . . . . . . . . . . 13 |- ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) -> S < 1 )
156	147	reclt1d 11269	. . . . . . . . . . . . 13 |- ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) -> ( S < 1 <-> 1 < ( 1 / S ) ) )
157	155, 156	mpbid 210	. . . . . . . . . . . 12 |- ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) -> 1 < ( 1 / S ) )
158		expnbnd 12263	. . . . . . . . . . . 12 |- ( ( 2 e. RR /\ ( 1 / S ) e. RR /\ 1 < ( 1 / S ) ) -> E. k e. NN 2 < ( ( 1 / S ) ^ k ) )
159	135, 148, 157, 158	syl3anc 1228	. . . . . . . . . . 11 |- ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) -> E. k e. NN 2 < ( ( 1 / S ) ^ k ) )
160	147	rpcnd 11258	. . . . . . . . . . . . . . . . 17 |- ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) -> S e. CC )
161	160	adantr 465	. . . . . . . . . . . . . . . 16 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ k e. NN ) -> S e. CC )
162	147	rpne0d 11261	. . . . . . . . . . . . . . . . 17 |- ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) -> S =/= 0 )
163	162	adantr 465	. . . . . . . . . . . . . . . 16 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ k e. NN ) -> S =/= 0 )
164		nnz 10886	. . . . . . . . . . . . . . . . 17 |- ( k e. NN -> k e. ZZ )
165	164	adantl 466	. . . . . . . . . . . . . . . 16 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ k e. NN ) -> k e. ZZ )
166	161, 163, 165	exprecd 12286	. . . . . . . . . . . . . . 15 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ k e. NN ) -> ( ( 1 / S ) ^ k ) = ( 1 / ( S ^ k ) ) )
167	2	ad3antrrr 729	. . . . . . . . . . . . . . . . . 18 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ k e. NN ) -> F e. A )
168		ax-1ne0 9561	. . . . . . . . . . . . . . . . . 18 |- 1 =/= 0
169	12	qrng1 23563	. . . . . . . . . . . . . . . . . . 19 |- 1 = ( 1r ` Q )
170	11, 169, 17	abv1z 17281	. . . . . . . . . . . . . . . . . 18 |- ( ( F e. A /\ 1 =/= 0 ) -> ( F ` 1 ) = 1 )
171	167, 168, 170	sylancl 662	. . . . . . . . . . . . . . . . 17 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ k e. NN ) -> ( F ` 1 ) = 1 )
172	8	ad2antrr 725	. . . . . . . . . . . . . . . . . . . . 21 |- ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) -> P e. NN )
173		nnnn0 10802	. . . . . . . . . . . . . . . . . . . . 21 |- ( k e. NN -> k e. NN0 )
174		nnexpcl 12147	. . . . . . . . . . . . . . . . . . . . 21 |- ( ( P e. NN /\ k e. NN0 ) -> ( P ^ k ) e. NN )
175	172, 173, 174	syl2an 477	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ k e. NN ) -> ( P ^ k ) e. NN )
176	175	nnzd 10965	. . . . . . . . . . . . . . . . . . 19 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ k e. NN ) -> ( P ^ k ) e. ZZ )
177	100	ad2antlr 726	. . . . . . . . . . . . . . . . . . . . 21 |- ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) -> p e. NN )
178		nnexpcl 12147	. . . . . . . . . . . . . . . . . . . . 21 |- ( ( p e. NN /\ k e. NN0 ) -> ( p ^ k ) e. NN )
179	177, 173, 178	syl2an 477	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ k e. NN ) -> ( p ^ k ) e. NN )
180	179	nnzd 10965	. . . . . . . . . . . . . . . . . . 19 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ k e. NN ) -> ( p ^ k ) e. ZZ )
181		bezout 14039	. . . . . . . . . . . . . . . . . . 19 |- ( ( ( P ^ k ) e. ZZ /\ ( p ^ k ) e. ZZ ) -> E. a e. ZZ E. b e. ZZ ( ( P ^ k ) gcd ( p ^ k ) ) = ( ( ( P ^ k ) x. a ) + ( ( p ^ k ) x. b ) ) )
182	176, 180, 181	syl2anc 661	. . . . . . . . . . . . . . . . . 18 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ k e. NN ) -> E. a e. ZZ E. b e. ZZ ( ( P ^ k ) gcd ( p ^ k ) ) = ( ( ( P ^ k ) x. a ) + ( ( p ^ k ) x. b ) ) )
183		simprl 755	. . . . . . . . . . . . . . . . . . . . . . . . . 26 |- ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) -> P =/= p )
184	3	ad2antrr 725	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) -> P e. Prime )
185		simplr 754	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) -> p e. Prime )
186		prmrp 14101	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ( ( P e. Prime /\ p e. Prime ) -> ( ( P gcd p ) = 1 <-> P =/= p ) )
187	184, 185, 186	syl2anc 661	. . . . . . . . . . . . . . . . . . . . . . . . . 26 |- ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) -> ( ( P gcd p ) = 1 <-> P =/= p ) )
188	183, 187	mpbird 232	. . . . . . . . . . . . . . . . . . . . . . . . 25 |- ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) -> ( P gcd p ) = 1 )
189	188	adantr 465	. . . . . . . . . . . . . . . . . . . . . . . 24 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ k e. NN ) -> ( P gcd p ) = 1 )
190	172	adantr 465	. . . . . . . . . . . . . . . . . . . . . . . . 25 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ k e. NN ) -> P e. NN )
191	177	adantr 465	. . . . . . . . . . . . . . . . . . . . . . . . 25 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ k e. NN ) -> p e. NN )
192		simpr 461	. . . . . . . . . . . . . . . . . . . . . . . . 25 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ k e. NN ) -> k e. NN )
193		rppwr 14054	. . . . . . . . . . . . . . . . . . . . . . . . 25 |- ( ( P e. NN /\ p e. NN /\ k e. NN ) -> ( ( P gcd p ) = 1 -> ( ( P ^ k ) gcd ( p ^ k ) ) = 1 ) )
194	190, 191, 192, 193	syl3anc 1228	. . . . . . . . . . . . . . . . . . . . . . . 24 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ k e. NN ) -> ( ( P gcd p ) = 1 -> ( ( P ^ k ) gcd ( p ^ k ) ) = 1 ) )
195	189, 194	mpd 15	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ k e. NN ) -> ( ( P ^ k ) gcd ( p ^ k ) ) = 1 )
196	195	adantrr 716	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( ( P ^ k ) gcd ( p ^ k ) ) = 1 )
197	196	eqeq1d 2469	. . . . . . . . . . . . . . . . . . . . 21 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( ( ( P ^ k ) gcd ( p ^ k ) ) = ( ( ( P ^ k ) x. a ) + ( ( p ^ k ) x. b ) ) <-> 1 = ( ( ( P ^ k ) x. a ) + ( ( p ^ k ) x. b ) ) ) )
198	2	ad3antrrr 729	. . . . . . . . . . . . . . . . . . . . . . . 24 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> F e. A )
199	175	adantrr 716	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( P ^ k ) e. NN )
200		nnq 11195	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ( ( P ^ k ) e. NN -> ( P ^ k ) e. QQ )
201	199, 200	syl 16	. . . . . . . . . . . . . . . . . . . . . . . . . 26 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( P ^ k ) e. QQ )
202		simprrl 763	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> a e. ZZ )
203		zq 11188	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ( a e. ZZ -> a e. QQ )
204	202, 203	syl 16	. . . . . . . . . . . . . . . . . . . . . . . . . 26 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> a e. QQ )
205		qmulcl 11200	. . . . . . . . . . . . . . . . . . . . . . . . . 26 |- ( ( ( P ^ k ) e. QQ /\ a e. QQ ) -> ( ( P ^ k ) x. a ) e. QQ )
206	201, 204, 205	syl2anc 661	. . . . . . . . . . . . . . . . . . . . . . . . 25 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( ( P ^ k ) x. a ) e. QQ )
207	179	adantrr 716	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( p ^ k ) e. NN )
208		nnq 11195	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ( ( p ^ k ) e. NN -> ( p ^ k ) e. QQ )
209	207, 208	syl 16	. . . . . . . . . . . . . . . . . . . . . . . . . 26 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( p ^ k ) e. QQ )
210		simprrr 764	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> b e. ZZ )
211		zq 11188	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ( b e. ZZ -> b e. QQ )
212	210, 211	syl 16	. . . . . . . . . . . . . . . . . . . . . . . . . 26 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> b e. QQ )
213		qmulcl 11200	. . . . . . . . . . . . . . . . . . . . . . . . . 26 |- ( ( ( p ^ k ) e. QQ /\ b e. QQ ) -> ( ( p ^ k ) x. b ) e. QQ )
214	209, 212, 213	syl2anc 661	. . . . . . . . . . . . . . . . . . . . . . . . 25 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( ( p ^ k ) x. b ) e. QQ )
215		qaddcl 11198	. . . . . . . . . . . . . . . . . . . . . . . . 25 |- ( ( ( ( P ^ k ) x. a ) e. QQ /\ ( ( p ^ k ) x. b ) e. QQ ) -> ( ( ( P ^ k ) x. a ) + ( ( p ^ k ) x. b ) ) e. QQ )
216	206, 214, 215	syl2anc 661	. . . . . . . . . . . . . . . . . . . . . . . 24 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( ( ( P ^ k ) x. a ) + ( ( p ^ k ) x. b ) ) e. QQ )
217	11, 13	abvcl 17273	. . . . . . . . . . . . . . . . . . . . . . . 24 |- ( ( F e. A /\ ( ( ( P ^ k ) x. a ) + ( ( p ^ k ) x. b ) ) e. QQ ) -> ( F ` ( ( ( P ^ k ) x. a ) + ( ( p ^ k ) x. b ) ) ) e. RR )
218	198, 216, 217	syl2anc 661	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( F ` ( ( ( P ^ k ) x. a ) + ( ( p ^ k ) x. b ) ) ) e. RR )
219	11, 13	abvcl 17273	. . . . . . . . . . . . . . . . . . . . . . . . 25 |- ( ( F e. A /\ ( ( P ^ k ) x. a ) e. QQ ) -> ( F ` ( ( P ^ k ) x. a ) ) e. RR )
220	198, 206, 219	syl2anc 661	. . . . . . . . . . . . . . . . . . . . . . . 24 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( F ` ( ( P ^ k ) x. a ) ) e. RR )
221	11, 13	abvcl 17273	. . . . . . . . . . . . . . . . . . . . . . . . 25 |- ( ( F e. A /\ ( ( p ^ k ) x. b ) e. QQ ) -> ( F ` ( ( p ^ k ) x. b ) ) e. RR )
222	198, 214, 221	syl2anc 661	. . . . . . . . . . . . . . . . . . . . . . . 24 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( F ` ( ( p ^ k ) x. b ) ) e. RR )
223	220, 222	readdcld 9623	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( ( F ` ( ( P ^ k ) x. a ) ) + ( F ` ( ( p ^ k ) x. b ) ) ) e. RR )
224		rpexpcl 12153	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ( ( S e. RR+ /\ k e. ZZ ) -> ( S ^ k ) e. RR+ )
225	147, 164, 224	syl2an 477	. . . . . . . . . . . . . . . . . . . . . . . . . 26 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ k e. NN ) -> ( S ^ k ) e. RR+ )
226	225	rpred 11256	. . . . . . . . . . . . . . . . . . . . . . . . 25 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ k e. NN ) -> ( S ^ k ) e. RR )
227	226	adantrr 716	. . . . . . . . . . . . . . . . . . . . . . . 24 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( S ^ k ) e. RR )
228		remulcl 9577	. . . . . . . . . . . . . . . . . . . . . . . 24 |- ( ( 2 e. RR /\ ( S ^ k ) e. RR ) -> ( 2 x. ( S ^ k ) ) e. RR )
229	134, 227, 228	sylancr 663	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( 2 x. ( S ^ k ) ) e. RR )
230		qex 11194	. . . . . . . . . . . . . . . . . . . . . . . . . 26 |- QQ e. _V
231		cnfldadd 18224	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- + = ( +g ` ℂfld )
232	12, 231	ressplusg 14597	. . . . . . . . . . . . . . . . . . . . . . . . . 26 |- ( QQ e. _V -> + = ( +g ` Q ) )
233	230, 232	ax-mp 5	. . . . . . . . . . . . . . . . . . . . . . . . 25 |- + = ( +g ` Q )
234	11, 13, 233	abvtri 17279	. . . . . . . . . . . . . . . . . . . . . . . 24 |- ( ( F e. A /\ ( ( P ^ k ) x. a ) e. QQ /\ ( ( p ^ k ) x. b ) e. QQ ) -> ( F ` ( ( ( P ^ k ) x. a ) + ( ( p ^ k ) x. b ) ) ) <_ ( ( F ` ( ( P ^ k ) x. a ) ) + ( F ` ( ( p ^ k ) x. b ) ) ) )
235	198, 206, 214, 234	syl3anc 1228	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( F ` ( ( ( P ^ k ) x. a ) + ( ( p ^ k ) x. b ) ) ) <_ ( ( F ` ( ( P ^ k ) x. a ) ) + ( F ` ( ( p ^ k ) x. b ) ) ) )
236		cnfldmul 18225	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 |- x. = ( .r ` ℂfld )
237	12, 236	ressmulr 14608	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 |- ( QQ e. _V -> x. = ( .r ` Q ) )
238	230, 237	ax-mp 5	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 |- x. = ( .r ` Q )
239	11, 13, 238	abvmul 17278	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- ( ( F e. A /\ ( P ^ k ) e. QQ /\ a e. QQ ) -> ( F ` ( ( P ^ k ) x. a ) ) = ( ( F ` ( P ^ k ) ) x. ( F ` a ) ) )
240	198, 201, 204, 239	syl3anc 1228	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( F ` ( ( P ^ k ) x. a ) ) = ( ( F ` ( P ^ k ) ) x. ( F ` a ) ) )
241	10	ad3antrrr 729	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> P e. QQ )
242	173	ad2antrl 727	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> k e. NN0 )
243	12, 11	qabvexp 23567	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 |- ( ( F e. A /\ P e. QQ /\ k e. NN0 ) -> ( F ` ( P ^ k ) ) = ( ( F ` P ) ^ k ) )
244	198, 241, 242, 243	syl3anc 1228	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( F ` ( P ^ k ) ) = ( ( F ` P ) ^ k ) )
245	244	oveq1d 6299	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( ( F ` ( P ^ k ) ) x. ( F ` a ) ) = ( ( ( F ` P ) ^ k ) x. ( F ` a ) ) )
246	240, 245	eqtrd 2508	. . . . . . . . . . . . . . . . . . . . . . . . . 26 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( F ` ( ( P ^ k ) x. a ) ) = ( ( ( F ` P ) ^ k ) x. ( F ` a ) ) )
247	198, 241, 14	syl2anc 661	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( F ` P ) e. RR )
248	247, 242	reexpcld 12295	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( ( F ` P ) ^ k ) e. RR )
249	11, 13	abvcl 17273	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 |- ( ( F e. A /\ a e. QQ ) -> ( F ` a ) e. RR )
250	198, 204, 249	syl2anc 661	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( F ` a ) e. RR )
251	248, 250	remulcld 9624	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( ( ( F ` P ) ^ k ) x. ( F ` a ) ) e. RR )
252		elz 10866	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 |- ( a e. ZZ <-> ( a e. RR /\ ( a = 0 \/ a e. NN \/ -u a e. NN ) ) )
253	252	simprbi 464	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 |- ( a e. ZZ -> ( a = 0 \/ a e. NN \/ -u a e. NN ) )
254	253	adantl 466	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 |- ( ( ph /\ a e. ZZ ) -> ( a = 0 \/ a e. NN \/ -u a e. NN ) )
255	11, 17	abv0 17280	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 |- ( F e. A -> ( F ` 0 ) = 0 )
256	2, 255	syl 16	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 |- ( ph -> ( F ` 0 ) = 0 )
257		0le1 10076	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 |- 0 <_ 1
258	256, 257	syl6eqbr 4484	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 |- ( ph -> ( F ` 0 ) <_ 1 )
259	258	adantr 465	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 |- ( ( ph /\ a e. ZZ ) -> ( F ` 0 ) <_ 1 )
260		fveq2 5866	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 |- ( a = 0 -> ( F ` a ) = ( F ` 0 ) )
261	260	breq1d 4457	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 |- ( a = 0 -> ( ( F ` a ) <_ 1 <-> ( F ` 0 ) <_ 1 ) )
262	259, 261	syl5ibrcom 222	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 |- ( ( ph /\ a e. ZZ ) -> ( a = 0 -> ( F ` a ) <_ 1 ) )
263		ostth3.2	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 |- ( ph -> A. n e. NN -. 1 < ( F ` n ) )
264		nnq 11195	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40 |- ( n e. NN -> n e. QQ )
265	11, 13	abvcl 17273	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40 |- ( ( F e. A /\ n e. QQ ) -> ( F ` n ) e. RR )
266	2, 264, 265	syl2an 477	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39 |- ( ( ph /\ n e. NN ) -> ( F ` n ) e. RR )
267		1re 9595	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39 |- 1 e. RR
268		lenlt 9663	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39 |- ( ( ( F ` n ) e. RR /\ 1 e. RR ) -> ( ( F ` n ) <_ 1 <-> -. 1 < ( F ` n ) ) )
269	266, 267, 268	sylancl 662	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 |- ( ( ph /\ n e. NN ) -> ( ( F ` n ) <_ 1 <-> -. 1 < ( F ` n ) ) )
270	269	ralbidva 2900	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 |- ( ph -> ( A. n e. NN ( F ` n ) <_ 1 <-> A. n e. NN -. 1 < ( F ` n ) ) )
271	263, 270	mpbird 232	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 |- ( ph -> A. n e. NN ( F ` n ) <_ 1 )
272		fveq2 5866	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 |- ( n = a -> ( F ` n ) = ( F ` a ) )
273	272	breq1d 4457	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 |- ( n = a -> ( ( F ` n ) <_ 1 <-> ( F ` a ) <_ 1 ) )
274	273	rspccv 3211	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 |- ( A. n e. NN ( F ` n ) <_ 1 -> ( a e. NN -> ( F ` a ) <_ 1 ) )
275	271, 274	syl 16	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 |- ( ph -> ( a e. NN -> ( F ` a ) <_ 1 ) )
276	275	adantr 465	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 |- ( ( ph /\ a e. ZZ ) -> ( a e. NN -> ( F ` a ) <_ 1 ) )
277	2	adantr 465	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 |- ( ( ph /\ ( a e. ZZ /\ -u a e. NN ) ) -> F e. A )
278	203	ad2antrl 727	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 |- ( ( ph /\ ( a e. ZZ /\ -u a e. NN ) ) -> a e. QQ )
279		eqid 2467	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 |- ( invg ` Q ) = ( invg ` Q )
280	11, 13, 279	abvneg 17283	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 |- ( ( F e. A /\ a e. QQ ) -> ( F ` ( ( invg ` Q ) ` a ) ) = ( F ` a ) )
281	277, 278, 280	syl2anc 661	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 |- ( ( ph /\ ( a e. ZZ /\ -u a e. NN ) ) -> ( F ` ( ( invg ` Q ) ` a ) ) = ( F ` a ) )
282	12	qrngneg 23564	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39 |- ( a e. QQ -> ( ( invg ` Q ) ` a ) = -u a )
283	278, 282	syl 16	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 |- ( ( ph /\ ( a e. ZZ /\ -u a e. NN ) ) -> ( ( invg ` Q ) ` a ) = -u a )
284		simprr 756	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 |- ( ( ph /\ ( a e. ZZ /\ -u a e. NN ) ) -> -u a e. NN )
285	283, 284	eqeltrd 2555	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 |- ( ( ph /\ ( a e. ZZ /\ -u a e. NN ) ) -> ( ( invg ` Q ) ` a ) e. NN )
286	271	adantr 465	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 |- ( ( ph /\ ( a e. ZZ /\ -u a e. NN ) ) -> A. n e. NN ( F ` n ) <_ 1 )
287		fveq2 5866	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39 |- ( n = ( ( invg ` Q ) ` a ) -> ( F ` n ) = ( F ` ( ( invg ` Q ) ` a ) ) )
288	287	breq1d 4457	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 |- ( n = ( ( invg ` Q ) ` a ) -> ( ( F ` n ) <_ 1 <-> ( F ` ( ( invg ` Q ) ` a ) ) <_ 1 ) )
289	288	rspcv 3210	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 |- ( ( ( invg ` Q ) ` a ) e. NN -> ( A. n e. NN ( F ` n ) <_ 1 -> ( F ` ( ( invg ` Q ) ` a ) ) <_ 1 ) )
290	285, 286, 289	sylc 60	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 |- ( ( ph /\ ( a e. ZZ /\ -u a e. NN ) ) -> ( F ` ( ( invg ` Q ) ` a ) ) <_ 1 )
291	281, 290	eqbrtrrd 4469	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 |- ( ( ph /\ ( a e. ZZ /\ -u a e. NN ) ) -> ( F ` a ) <_ 1 )
292	291	expr 615	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 |- ( ( ph /\ a e. ZZ ) -> ( -u a e. NN -> ( F ` a ) <_ 1 ) )
293	262, 276, 292	3jaod 1292	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 |- ( ( ph /\ a e. ZZ ) -> ( ( a = 0 \/ a e. NN \/ -u a e. NN ) -> ( F ` a ) <_ 1 ) )
294	254, 293	mpd 15	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 |- ( ( ph /\ a e. ZZ ) -> ( F ` a ) <_ 1 )
295	294	ralrimiva 2878	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 |- ( ph -> A. a e. ZZ ( F ` a ) <_ 1 )
296	295	ad3antrrr 729	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> A. a e. ZZ ( F ` a ) <_ 1 )
297		rsp 2830	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 |- ( A. a e. ZZ ( F ` a ) <_ 1 -> ( a e. ZZ -> ( F ` a ) <_ 1 ) )
298	296, 202, 297	sylc 60	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( F ` a ) <_ 1 )
299	267	a1i 11	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> 1 e. RR )
300	164	ad2antrl 727	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> k e. ZZ )
301	19	ad3antrrr 729	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> 0 < ( F ` P ) )
302		expgt0 12167	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 |- ( ( ( F ` P ) e. RR /\ k e. ZZ /\ 0 < ( F ` P ) ) -> 0 < ( ( F ` P ) ^ k ) )
303	247, 300, 301, 302	syl3anc 1228	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> 0 < ( ( F ` P ) ^ k ) )
304		lemul2 10395	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 |- ( ( ( F ` a ) e. RR /\ 1 e. RR /\ ( ( ( F ` P ) ^ k ) e. RR /\ 0 < ( ( F ` P ) ^ k ) ) ) -> ( ( F ` a ) <_ 1 <-> ( ( ( F ` P ) ^ k ) x. ( F ` a ) ) <_ ( ( ( F ` P ) ^ k ) x. 1 ) ) )
305	250, 299, 248, 303, 304	syl112anc 1232	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( ( F ` a ) <_ 1 <-> ( ( ( F ` P ) ^ k ) x. ( F ` a ) ) <_ ( ( ( F ` P ) ^ k ) x. 1 ) ) )
306	298, 305	mpbid 210	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( ( ( F ` P ) ^ k ) x. ( F ` a ) ) <_ ( ( ( F ` P ) ^ k ) x. 1 ) )
307	248	recnd 9622	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( ( F ` P ) ^ k ) e. CC )
308	307	mulid1d 9613	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( ( ( F ` P ) ^ k ) x. 1 ) = ( ( F ` P ) ^ k ) )
309	306, 308	breqtrd 4471	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( ( ( F ` P ) ^ k ) x. ( F ` a ) ) <_ ( ( F ` P ) ^ k ) )
310	147	rpred 11256	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 |- ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) -> S e. RR )
311	310	adantr 465	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> S e. RR )
312	144	adantr 465	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( F ` P ) e. RR+ )
313	312	rpge0d 11260	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> 0 <_ ( F ` P ) )
314	177	adantr 465	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> p e. NN )
315	314, 102	syl 16	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> p e. QQ )
316	198, 315, 138	syl2anc 661	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( F ` p ) e. RR )
317		max1 11386	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 |- ( ( ( F ` P ) e. RR /\ ( F ` p ) e. RR ) -> ( F ` P ) <_ if ( ( F ` P ) <_ ( F ` p ) , ( F ` p ) , ( F ` P ) ) )
318	247, 316, 317	syl2anc 661	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( F ` P ) <_ if ( ( F ` P ) <_ ( F ` p ) , ( F ` p ) , ( F ` P ) ) )
319	318, 136	syl6breqr 4487	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( F ` P ) <_ S )
320		leexp1a 12192	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- ( ( ( ( F ` P ) e. RR /\ S e. RR /\ k e. NN0 ) /\ ( 0 <_ ( F ` P ) /\ ( F ` P ) <_ S ) ) -> ( ( F ` P ) ^ k ) <_ ( S ^ k ) )
321	247, 311, 242, 313, 319, 320	syl32anc 1236	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( ( F ` P ) ^ k ) <_ ( S ^ k ) )
322	251, 248, 227, 309, 321	letrd 9738	. . . . . . . . . . . . . . . . . . . . . . . . . 26 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( ( ( F ` P ) ^ k ) x. ( F ` a ) ) <_ ( S ^ k ) )
323	246, 322	eqbrtrd 4467	. . . . . . . . . . . . . . . . . . . . . . . . 25 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( F ` ( ( P ^ k ) x. a ) ) <_ ( S ^ k ) )
324	11, 13, 238	abvmul 17278	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- ( ( F e. A /\ ( p ^ k ) e. QQ /\ b e. QQ ) -> ( F ` ( ( p ^ k ) x. b ) ) = ( ( F ` ( p ^ k ) ) x. ( F ` b ) ) )
325	198, 209, 212, 324	syl3anc 1228	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( F ` ( ( p ^ k ) x. b ) ) = ( ( F ` ( p ^ k ) ) x. ( F ` b ) ) )
326	12, 11	qabvexp 23567	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 |- ( ( F e. A /\ p e. QQ /\ k e. NN0 ) -> ( F ` ( p ^ k ) ) = ( ( F ` p ) ^ k ) )
327	198, 315, 242, 326	syl3anc 1228	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( F ` ( p ^ k ) ) = ( ( F ` p ) ^ k ) )
328	327	oveq1d 6299	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( ( F ` ( p ^ k ) ) x. ( F ` b ) ) = ( ( ( F ` p ) ^ k ) x. ( F ` b ) ) )
329	325, 328	eqtrd 2508	. . . . . . . . . . . . . . . . . . . . . . . . . 26 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( F ` ( ( p ^ k ) x. b ) ) = ( ( ( F ` p ) ^ k ) x. ( F ` b ) ) )
330	316, 242	reexpcld 12295	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( ( F ` p ) ^ k ) e. RR )
331	11, 13	abvcl 17273	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 |- ( ( F e. A /\ b e. QQ ) -> ( F ` b ) e. RR )
332	198, 212, 331	syl2anc 661	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( F ` b ) e. RR )
333	330, 332	remulcld 9624	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( ( ( F ` p ) ^ k ) x. ( F ` b ) ) e. RR )
334		fveq2 5866	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 |- ( a = b -> ( F ` a ) = ( F ` b ) )
335	334	breq1d 4457	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 |- ( a = b -> ( ( F ` a ) <_ 1 <-> ( F ` b ) <_ 1 ) )
336	335	rspcv 3210	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 |- ( b e. ZZ -> ( A. a e. ZZ ( F ` a ) <_ 1 -> ( F ` b ) <_ 1 ) )
337	210, 296, 336	sylc 60	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( F ` b ) <_ 1 )
338	314	nnne0d 10580	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> p =/= 0 )
339	198, 315, 338, 140	syl3anc 1228	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> 0 < ( F ` p ) )
340		expgt0 12167	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 |- ( ( ( F ` p ) e. RR /\ k e. ZZ /\ 0 < ( F ` p ) ) -> 0 < ( ( F ` p ) ^ k ) )
341	316, 300, 339, 340	syl3anc 1228	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> 0 < ( ( F ` p ) ^ k ) )
342		lemul2 10395	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 |- ( ( ( F ` b ) e. RR /\ 1 e. RR /\ ( ( ( F ` p ) ^ k ) e. RR /\ 0 < ( ( F ` p ) ^ k ) ) ) -> ( ( F ` b ) <_ 1 <-> ( ( ( F ` p ) ^ k ) x. ( F ` b ) ) <_ ( ( ( F ` p ) ^ k ) x. 1 ) ) )
343	332, 299, 330, 341, 342	syl112anc 1232	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( ( F ` b ) <_ 1 <-> ( ( ( F ` p ) ^ k ) x. ( F ` b ) ) <_ ( ( ( F ` p ) ^ k ) x. 1 ) ) )
344	337, 343	mpbid 210	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( ( ( F ` p ) ^ k ) x. ( F ` b ) ) <_ ( ( ( F ` p ) ^ k ) x. 1 ) )
345	330	recnd 9622	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( ( F ` p ) ^ k ) e. CC )
346	345	mulid1d 9613	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( ( ( F ` p ) ^ k ) x. 1 ) = ( ( F ` p ) ^ k ) )
347	344, 346	breqtrd 4471	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( ( ( F ` p ) ^ k ) x. ( F ` b ) ) <_ ( ( F ` p ) ^ k ) )
348	143	adantr 465	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( F ` p ) e. RR+ )
349	348	rpge0d 11260	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> 0 <_ ( F ` p ) )
350		max2 11388	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 |- ( ( ( F ` P ) e. RR /\ ( F ` p ) e. RR ) -> ( F ` p ) <_ if ( ( F ` P ) <_ ( F ` p ) , ( F ` p ) , ( F ` P ) ) )
351	247, 316, 350	syl2anc 661	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( F ` p ) <_ if ( ( F ` P ) <_ ( F ` p ) , ( F ` p ) , ( F ` P ) ) )
352	351, 136	syl6breqr 4487	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( F ` p ) <_ S )
353		leexp1a 12192	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 |- ( ( ( ( F ` p ) e. RR /\ S e. RR /\ k e. NN0 ) /\ ( 0 <_ ( F ` p ) /\ ( F ` p ) <_ S ) ) -> ( ( F ` p ) ^ k ) <_ ( S ^ k ) )
354	316, 311, 242, 349, 352, 353	syl32anc 1236	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( ( F ` p ) ^ k ) <_ ( S ^ k ) )
355	333, 330, 227, 347, 354	letrd 9738	. . . . . . . . . . . . . . . . . . . . . . . . . 26 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( ( ( F ` p ) ^ k ) x. ( F ` b ) ) <_ ( S ^ k ) )
356	329, 355	eqbrtrd 4467	. . . . . . . . . . . . . . . . . . . . . . . . 25 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( F ` ( ( p ^ k ) x. b ) ) <_ ( S ^ k ) )
357	220, 222, 227, 227, 323, 356	le2addd 10170	. . . . . . . . . . . . . . . . . . . . . . . 24 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( ( F ` ( ( P ^ k ) x. a ) ) + ( F ` ( ( p ^ k ) x. b ) ) ) <_ ( ( S ^ k ) + ( S ^ k ) ) )
358	225	rpcnd 11258	. . . . . . . . . . . . . . . . . . . . . . . . . 26 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ k e. NN ) -> ( S ^ k ) e. CC )
359	358	2timesd 10781	. . . . . . . . . . . . . . . . . . . . . . . . 25 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ k e. NN ) -> ( 2 x. ( S ^ k ) ) = ( ( S ^ k ) + ( S ^ k ) ) )
360	359	adantrr 716	. . . . . . . . . . . . . . . . . . . . . . . 24 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( 2 x. ( S ^ k ) ) = ( ( S ^ k ) + ( S ^ k ) ) )
361	357, 360	breqtrrd 4473	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( ( F ` ( ( P ^ k ) x. a ) ) + ( F ` ( ( p ^ k ) x. b ) ) ) <_ ( 2 x. ( S ^ k ) ) )
362	218, 223, 229, 235, 361	letrd 9738	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( F ` ( ( ( P ^ k ) x. a ) + ( ( p ^ k ) x. b ) ) ) <_ ( 2 x. ( S ^ k ) ) )
363		fveq2 5866	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( 1 = ( ( ( P ^ k ) x. a ) + ( ( p ^ k ) x. b ) ) -> ( F ` 1 ) = ( F ` ( ( ( P ^ k ) x. a ) + ( ( p ^ k ) x. b ) ) ) )
364	363	breq1d 4457	. . . . . . . . . . . . . . . . . . . . . 22 |- ( 1 = ( ( ( P ^ k ) x. a ) + ( ( p ^ k ) x. b ) ) -> ( ( F ` 1 ) <_ ( 2 x. ( S ^ k ) ) <-> ( F ` ( ( ( P ^ k ) x. a ) + ( ( p ^ k ) x. b ) ) ) <_ ( 2 x. ( S ^ k ) ) ) )
365	362, 364	syl5ibrcom 222	. . . . . . . . . . . . . . . . . . . . 21 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( 1 = ( ( ( P ^ k ) x. a ) + ( ( p ^ k ) x. b ) ) -> ( F ` 1 ) <_ ( 2 x. ( S ^ k ) ) ) )
366	197, 365	sylbid 215	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ ( k e. NN /\ ( a e. ZZ /\ b e. ZZ ) ) ) -> ( ( ( P ^ k ) gcd ( p ^ k ) ) = ( ( ( P ^ k ) x. a ) + ( ( p ^ k ) x. b ) ) -> ( F ` 1 ) <_ ( 2 x. ( S ^ k ) ) ) )
367	366	anassrs 648	. . . . . . . . . . . . . . . . . . 19 |- ( ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ k e. NN ) /\ ( a e. ZZ /\ b e. ZZ ) ) -> ( ( ( P ^ k ) gcd ( p ^ k ) ) = ( ( ( P ^ k ) x. a ) + ( ( p ^ k ) x. b ) ) -> ( F ` 1 ) <_ ( 2 x. ( S ^ k ) ) ) )
368	367	rexlimdvva 2962	. . . . . . . . . . . . . . . . . 18 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ k e. NN ) -> ( E. a e. ZZ E. b e. ZZ ( ( P ^ k ) gcd ( p ^ k ) ) = ( ( ( P ^ k ) x. a ) + ( ( p ^ k ) x. b ) ) -> ( F ` 1 ) <_ ( 2 x. ( S ^ k ) ) ) )
369	182, 368	mpd 15	. . . . . . . . . . . . . . . . 17 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ k e. NN ) -> ( F ` 1 ) <_ ( 2 x. ( S ^ k ) ) )
370	171, 369	eqbrtrrd 4469	. . . . . . . . . . . . . . . 16 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ k e. NN ) -> 1 <_ ( 2 x. ( S ^ k ) ) )
371	225	rpregt0d 11262	. . . . . . . . . . . . . . . . 17 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ k e. NN ) -> ( ( S ^ k ) e. RR /\ 0 < ( S ^ k ) ) )
372		ledivmul2 10422	. . . . . . . . . . . . . . . . . 18 |- ( ( 1 e. RR /\ 2 e. RR /\ ( ( S ^ k ) e. RR /\ 0 < ( S ^ k ) ) ) -> ( ( 1 / ( S ^ k ) ) <_ 2 <-> 1 <_ ( 2 x. ( S ^ k ) ) ) )
373	267, 134, 372	mp3an12 1314	. . . . . . . . . . . . . . . . 17 |- ( ( ( S ^ k ) e. RR /\ 0 < ( S ^ k ) ) -> ( ( 1 / ( S ^ k ) ) <_ 2 <-> 1 <_ ( 2 x. ( S ^ k ) ) ) )
374	371, 373	syl 16	. . . . . . . . . . . . . . . 16 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ k e. NN ) -> ( ( 1 / ( S ^ k ) ) <_ 2 <-> 1 <_ ( 2 x. ( S ^ k ) ) ) )
375	370, 374	mpbird 232	. . . . . . . . . . . . . . 15 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ k e. NN ) -> ( 1 / ( S ^ k ) ) <_ 2 )
376	166, 375	eqbrtrd 4467	. . . . . . . . . . . . . 14 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ k e. NN ) -> ( ( 1 / S ) ^ k ) <_ 2 )
377		reexpcl 12151	. . . . . . . . . . . . . . . 16 |- ( ( ( 1 / S ) e. RR /\ k e. NN0 ) -> ( ( 1 / S ) ^ k ) e. RR )
378	148, 173, 377	syl2an 477	. . . . . . . . . . . . . . 15 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ k e. NN ) -> ( ( 1 / S ) ^ k ) e. RR )
379		lenlt 9663	. . . . . . . . . . . . . . 15 |- ( ( ( ( 1 / S ) ^ k ) e. RR /\ 2 e. RR ) -> ( ( ( 1 / S ) ^ k ) <_ 2 <-> -. 2 < ( ( 1 / S ) ^ k ) ) )
380	378, 134, 379	sylancl 662	. . . . . . . . . . . . . 14 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ k e. NN ) -> ( ( ( 1 / S ) ^ k ) <_ 2 <-> -. 2 < ( ( 1 / S ) ^ k ) ) )
381	376, 380	mpbid 210	. . . . . . . . . . . . 13 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ k e. NN ) -> -. 2 < ( ( 1 / S ) ^ k ) )
382	381	pm2.21d 106	. . . . . . . . . . . 12 |- ( ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) /\ k e. NN ) -> ( 2 < ( ( 1 / S ) ^ k ) -> -. ( F ` p ) < 1 ) )
383	382	rexlimdva 2955	. . . . . . . . . . 11 |- ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) -> ( E. k e. NN 2 < ( ( 1 / S ) ^ k ) -> -. ( F ` p ) < 1 ) )
384	159, 383	mpd 15	. . . . . . . . . 10 |- ( ( ( ph /\ p e. Prime ) /\ ( P =/= p /\ ( F ` p ) < 1 ) ) -> -. ( F ` p ) < 1 )
385	384	expr 615	. . . . . . . . 9 |- ( ( ( ph /\ p e. Prime ) /\ P =/= p ) -> ( ( F ` p ) < 1 -> -. ( F ` p ) < 1 ) )
386	385	pm2.01d 169	. . . . . . . 8 |- ( ( ( ph /\ p e. Prime ) /\ P =/= p ) -> -. ( F ` p ) < 1 )
387	263	ad2antrr 725	. . . . . . . . 9 |- ( ( ( ph /\ p e. Prime ) /\ P =/= p ) -> A. n e. NN -. 1 < ( F ` n ) )
388		fveq2 5866	. . . . . . . . . . . 12 |- ( n = p -> ( F ` n ) = ( F ` p ) )
389	388	breq2d 4459	. . . . . . . . . . 11 |- ( n = p -> ( 1 < ( F ` n ) <-> 1 < ( F ` p ) ) )
390	389	notbid 294	. . . . . . . . . 10 |- ( n = p -> ( -. 1 < ( F ` n ) <-> -. 1 < ( F ` p ) ) )
391	390	rspcv 3210	. . . . . . . . 9 |- ( p e. NN -> ( A. n e. NN -. 1 < ( F ` n ) -> -. 1 < ( F ` p ) ) )
392	101, 387, 391	sylc 60	. . . . . . . 8 |- ( ( ( ph /\ p e. Prime ) /\ P =/= p ) -> -. 1 < ( F ` p ) )
393		lttri3 9668	. . . . . . . . 9 |- ( ( ( F ` p ) e. RR /\ 1 e. RR ) -> ( ( F ` p ) = 1 <-> ( -. ( F ` p ) < 1 /\ -. 1 < ( F ` p ) ) ) )
394	139, 267, 393	sylancl 662	. . . . . . . 8 |- ( ( ( ph /\ p e. Prime ) /\ P =/= p ) -> ( ( F ` p ) = 1 <-> ( -. ( F ` p ) < 1 /\ -. 1 < ( F ` p ) ) ) )
395	386, 392, 394	mpbir2and 920	. . . . . . 7 |- ( ( ( ph /\ p e. Prime ) /\ P =/= p ) -> ( F ` p ) = 1 )
396	110, 133, 395	3eqtr4d 2518	. . . . . 6 |- ( ( ( ph /\ p e. Prime ) /\ P =/= p ) -> ( ( ( J ` P ) ` p ) ^c R ) = ( F ` p ) )
397	108, 396	eqtr2d 2509	. . . . 5 |- ( ( ( ph /\ p e. Prime ) /\ P =/= p ) -> ( F ` p ) = ( ( y e. QQ |-> ( ( ( J ` P ) ` y ) ^c R ) ) ` p ) )
398	397	ex 434	. . . 4 |- ( ( ph /\ p e. Prime ) -> ( P =/= p -> ( F ` p ) = ( ( y e. QQ |-> ( ( ( J ` P ) ` y ) ^c R ) ) ` p ) ) )
399	99, 398	pm2.61dne 2784	. . 3 |- ( ( ph /\ p e. Prime ) -> ( F ` p ) = ( ( y e. QQ |-> ( ( ( J ` P ) ` y ) ^c R ) ) ` p ) )
400	12, 11, 2, 47, 399	ostthlem2 23569	. 2 |- ( ph -> F = ( y e. QQ |-> ( ( ( J ` P ) ` y ) ^c R ) ) )
401		oveq2 6292	. . . . 5 |- ( a = R -> ( ( ( J ` P ) ` y ) ^c a ) = ( ( ( J ` P ) ` y ) ^c R ) )
402	401	mpteq2dv 4534	. . . 4 |- ( a = R -> ( y e. QQ |-> ( ( ( J ` P ) ` y ) ^c a ) ) = ( y e. QQ |-> ( ( ( J ` P ) ` y ) ^c R ) ) )
403	402	eqeq2d 2481	. . 3 |- ( a = R -> ( F = ( y e. QQ |-> ( ( ( J ` P ) ` y ) ^c a ) ) <-> F = ( y e. QQ |-> ( ( ( J ` P ) ` y ) ^c R ) ) ) )
404	403	rspcev 3214	. 2 |- ( ( R e. RR+ /\ F = ( y e. QQ |-> ( ( ( J ` P ) ` y ) ^c R ) ) ) -> E. a e. RR+ F = ( y e. QQ |-> ( ( ( J ` P ) ` y ) ^c a ) ) )
405	44, 400, 404	syl2anc 661	1 |- ( ph -> E. a e. RR+ F = ( y e. QQ |-> ( ( ( J ` P ) ` y ) ^c a ) ) )

Syntax hints:   -. wn 3   -> wi 4   <-> wb 184   /\ wa 369   \/ w3o 972   = wceq 1379   e. wcel 1767   =/= wne 2662   A.wral 2814   E.wrex 2815   _Vcvv 3113   ifcif 3939   class class class wbr 4447   |-> cmpt 4505   ` cfv 5588  (class class class)co 6284   CCcc 9490   RRcr 9491   0cc0 9492   1c1 9493   + caddc 9495   x. cmul 9497   < clt 9628   <_ cle 9629   -ucneg 9806   / cdiv 10206   NNcn 10536   2c2 10585   NN0cn0 10795   ZZcz 10864   ZZ>=cuz 11082   QQcq 11182   RR+crp 11220   ^cexp 12134   expce 13659   || cdivides 13847   gcd cgcd 14003   Primecprime 14076   pCnt cpc 14219   ↾_s cress 14491   +g cplusg 14555   .rcmulr 14556   invgcminusg 15728  AbsValcabv 17265  ℂ_fldccnfld 18219   logclog 22698   ^c ccxp 22699

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1601  ax-4 1612  ax-5 1680  ax-6 1719  ax-7 1739  ax-8 1769  ax-9 1771  ax-10 1786  ax-11 1791  ax-12 1803  ax-13 1968  ax-ext 2445  ax-rep 4558  ax-sep 4568  ax-nul 4576  ax-pow 4625  ax-pr 4686  ax-un 6576  ax-inf2 8058  ax-cnex 9548  ax-resscn 9549  ax-1cn 9550  ax-icn 9551  ax-addcl 9552  ax-addrcl 9553  ax-mulcl 9554  ax-mulrcl 9555  ax-mulcom 9556  ax-addass 9557  ax-mulass 9558  ax-distr 9559  ax-i2m1 9560  ax-1ne0 9561  ax-1rid 9562  ax-rnegex 9563  ax-rrecex 9564  ax-cnre 9565  ax-pre-lttri 9566  ax-pre-lttrn 9567  ax-pre-ltadd 9568  ax-pre-mulgt0 9569  ax-pre-sup 9570  ax-addf 9571  ax-mulf 9572

This theorem depends on definitions:  df-bi 185  df-or 370  df-an 371  df-3or 974  df-3an 975  df-tru 1382  df-fal 1385  df-ex 1597  df-nf 1600  df-sb 1712  df-eu 2279  df-mo 2280  df-clab 2453  df-cleq 2459  df-clel 2462  df-nfc 2617  df-ne 2664  df-nel 2665  df-ral 2819  df-rex 2820  df-reu 2821  df-rmo 2822  df-rab 2823  df-v 3115  df-sbc 3332  df-csb 3436  df-dif 3479  df-un 3481  df-in 3483  df-ss 3490  df-pss 3492  df-nul 3786  df-if 3940  df-pw 4012  df-sn 4028  df-pr 4030  df-tp 4032  df-op 4034  df-uni 4246  df-int 4283  df-iun 4327  df-iin 4328  df-br 4448  df-opab 4506  df-mpt 4507  df-tr 4541  df-eprel 4791  df-id 4795  df-po 4800  df-so 4801  df-fr 4838  df-se 4839  df-we 4840  df-ord 4881  df-on 4882  df-lim 4883  df-suc 4884  df-xp 5005  df-rel 5006  df-cnv 5007  df-co 5008  df-dm 5009  df-rn 5010  df-res 5011  df-ima 5012  df-iota 5551  df-fun 5590  df-fn 5591  df-f 5592  df-f1 5593  df-fo 5594  df-f1o 5595  df-fv 5596  df-isom 5597  df-riota 6245  df-ov 6287  df-oprab 6288  df-mpt2 6289  df-of 6524  df-om 6685  df-1st 6784  df-2nd 6785  df-supp 6902  df-tpos 6955  df-recs 7042  df-rdg 7076  df-1o 7130  df-2o 7131  df-oadd 7134  df-er 7311  df-map 7422  df-pm 7423  df-ixp 7470  df-en 7517  df-dom 7518  df-sdom 7519  df-fin 7520  df-fsupp 7830  df-fi 7871  df-sup 7901  df-oi 7935  df-card 8320  df-cda 8548  df-pnf 9630  df-mnf 9631  df-xr 9632  df-ltxr 9633  df-le 9634  df-sub 9807  df-neg 9808  df-div 10207  df-nn 10537  df-2 10594  df-3 10595  df-4 10596  df-5 10597  df-6 10598  df-7 10599  df-8 10600  df-9 10601  df-10 10602  df-n0 10796  df-z 10865  df-dec 10977  df-uz 11083  df-q 11183  df-rp 11221  df-xneg 11318  df-xadd 11319  df-xmul 11320  df-ioo 11533  df-ioc 11534  df-ico 11535  df-icc 11536  df-fz 11673  df-fzo 11793  df-fl 11897  df-mod 11965  df-seq 12076  df-exp 12135  df-fac 12322  df-bc 12349  df-hash 12374  df-shft 12863  df-cj 12895  df-re 12896  df-im 12897  df-sqrt 13031  df-abs 13032  df-limsup 13257  df-clim 13274  df-rlim 13275  df-sum 13472  df-ef 13665  df-sin 13667  df-cos 13668  df-pi 13670  df-dvds 13848  df-gcd 14004  df-prm 14077  df-pc 14220  df-struct 14492  df-ndx 14493  df-slot 14494  df-base 14495  df-sets 14496  df-ress 14497  df-plusg 14568  df-mulr 14569  df-starv 14570  df-sca 14571  df-vsca 14572  df-ip 14573  df-tset 14574  df-ple 14575  df-ds 14577  df-unif 14578  df-hom 14579  df-cco 14580  df-rest 14678  df-topn 14679  df-0g 14697  df-gsum 14698  df-topgen 14699  df-pt 14700  df-prds 14703  df-xrs 14757  df-qtop 14762  df-imas 14763  df-xps 14765  df-mre 14841  df-mrc 14842  df-acs 14844  df-mnd 15732  df-submnd 15787  df-grp 15867  df-minusg 15868  df-mulg 15870  df-subg 16003  df-cntz 16160  df-cmn 16606  df-mgp 16944  df-ur 16956  df-rng 17002  df-cring 17003  df-oppr 17073  df-dvdsr 17091  df-unit 17092  df-invr 17122  df-dvr 17133  df-drng 17198  df-subrg 17227  df-abv 17266  df-psmet 18210  df-xmet 18211  df-met 18212  df-bl 18213  df-mopn 18214  df-fbas 18215  df-fg