Theorem ovoliunlem1 23270

Description: Lemma for ovoliun 23273. (Contributed by Mario Carneiro, 12-Jun-2014.)

Hypotheses

Ref	Expression
ovoliun.t	|- T = seq 1 ( + , G )
ovoliun.g	|- G = ( n e. NN |-> ( vol* ` A ) )
ovoliun.a	|- ( ( ph /\ n e. NN ) -> A C_ RR )
ovoliun.v	|- ( ( ph /\ n e. NN ) -> ( vol* ` A ) e. RR )
ovoliun.r	|- ( ph -> sup ( ran T , RR* , < ) e. RR )
ovoliun.b	|- ( ph -> B e. RR+ )
ovoliun.s	|- S = seq 1 ( + , ( ( abs o. - ) o. ( F ` n ) ) )
ovoliun.u	|- U = seq 1 ( + , ( ( abs o. - ) o. H ) )
ovoliun.h	|- H = ( k e. NN |-> ( ( F ` ( 1st ` ( J ` k ) ) ) ` ( 2nd ` ( J ` k ) ) ) )
ovoliun.j	|- ( ph -> J : NN -1-1-onto-> ( NN X. NN ) )
ovoliun.f	|- ( ph -> F : NN --> ( ( <_ i^i ( RR X. RR ) ) ^m NN ) )
ovoliun.x1	|- ( ( ph /\ n e. NN ) -> A C_ U. ran ( (,) o. ( F ` n ) ) )
ovoliun.x2	|- ( ( ph /\ n e. NN ) -> sup ( ran S , RR* , < ) <_ ( ( vol* ` A ) + ( B / ( 2 ^ n ) ) ) )
ovoliun.k	|- ( ph -> K e. NN )
ovoliun.l1	|- ( ph -> L e. ZZ )
ovoliun.l2	|- ( ph -> A. w e. ( 1 ... K ) ( 1st ` ( J ` w ) ) <_ L )

Assertion

Ref	Expression
ovoliunlem1	|- ( ph -> ( U ` K ) <_ ( sup ( ran T , RR* , < ) + B ) )

Distinct variable groups:   A, k   k, n, B   k, F, n   w, k, J, n   n, K, w   k, L, n, w   n, H   ph, k, n   S, k   k, G   T, k   n, G   T, n

Allowed substitution hints:   ph( w)   A( w, n)   B( w)   S( w, n)   T( w)   U( w, k, n)   F( w)   G( w)   H( w, k)   K( k)

Proof of Theorem ovoliunlem1

Dummy variables j m x y z i are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		fveq2 6191	. . . . . . . . 9 |- ( j = ( J ` m ) -> ( 1st ` j ) = ( 1st ` ( J ` m ) ) )
2	1	fveq2d 6195	. . . . . . . 8 |- ( j = ( J ` m ) -> ( F ` ( 1st ` j ) ) = ( F ` ( 1st ` ( J ` m ) ) ) )
3		fveq2 6191	. . . . . . . 8 |- ( j = ( J ` m ) -> ( 2nd ` j ) = ( 2nd ` ( J ` m ) ) )
4	2, 3	fveq12d 6197	. . . . . . 7 |- ( j = ( J ` m ) -> ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) = ( ( F ` ( 1st ` ( J ` m ) ) ) ` ( 2nd ` ( J ` m ) ) ) )
5	4	fveq2d 6195	. . . . . 6 |- ( j = ( J ` m ) -> ( 2nd ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) = ( 2nd ` ( ( F ` ( 1st ` ( J ` m ) ) ) ` ( 2nd ` ( J ` m ) ) ) ) )
6	4	fveq2d 6195	. . . . . 6 |- ( j = ( J ` m ) -> ( 1st ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) = ( 1st ` ( ( F ` ( 1st ` ( J ` m ) ) ) ` ( 2nd ` ( J ` m ) ) ) ) )
7	5, 6	oveq12d 6668	. . . . 5 |- ( j = ( J ` m ) -> ( ( 2nd ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) - ( 1st ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) ) = ( ( 2nd ` ( ( F ` ( 1st ` ( J ` m ) ) ) ` ( 2nd ` ( J ` m ) ) ) ) - ( 1st ` ( ( F ` ( 1st ` ( J ` m ) ) ) ` ( 2nd ` ( J ` m ) ) ) ) ) )
8		fzfid 12772	. . . . 5 |- ( ph -> ( 1 ... K ) e. Fin )
9		ovoliun.j	. . . . . . 7 |- ( ph -> J : NN -1-1-onto-> ( NN X. NN ) )
10		f1of1 6136	. . . . . . 7 |- ( J : NN -1-1-onto-> ( NN X. NN ) -> J : NN -1-1-> ( NN X. NN ) )
11	9, 10	syl 17	. . . . . 6 |- ( ph -> J : NN -1-1-> ( NN X. NN ) )
12		elfznn 12370	. . . . . . 7 |- ( m e. ( 1 ... K ) -> m e. NN )
13	12	ssriv 3607	. . . . . 6 |- ( 1 ... K ) C_ NN
14		f1ores 6151	. . . . . 6 |- ( ( J : NN -1-1-> ( NN X. NN ) /\ ( 1 ... K ) C_ NN ) -> ( J |` ( 1 ... K ) ) : ( 1 ... K ) -1-1-onto-> ( J " ( 1 ... K ) ) )
15	11, 13, 14	sylancl 694	. . . . 5 |- ( ph -> ( J |` ( 1 ... K ) ) : ( 1 ... K ) -1-1-onto-> ( J " ( 1 ... K ) ) )
16		fvres 6207	. . . . . 6 |- ( m e. ( 1 ... K ) -> ( ( J |` ( 1 ... K ) ) ` m ) = ( J ` m ) )
17	16	adantl 482	. . . . 5 |- ( ( ph /\ m e. ( 1 ... K ) ) -> ( ( J |` ( 1 ... K ) ) ` m ) = ( J ` m ) )
18		inss2 3834	. . . . . . . . 9 |- ( <_ i^i ( RR X. RR ) ) C_ ( RR X. RR )
19		ovoliun.f	. . . . . . . . . . . . 13 |- ( ph -> F : NN --> ( ( <_ i^i ( RR X. RR ) ) ^m NN ) )
20	19	adantr 481	. . . . . . . . . . . 12 |- ( ( ph /\ j e. ( J " ( 1 ... K ) ) ) -> F : NN --> ( ( <_ i^i ( RR X. RR ) ) ^m NN ) )
21		imassrn 5477	. . . . . . . . . . . . . . 15 |- ( J " ( 1 ... K ) ) C_ ran J
22		f1of 6137	. . . . . . . . . . . . . . . . 17 |- ( J : NN -1-1-onto-> ( NN X. NN ) -> J : NN --> ( NN X. NN ) )
23	9, 22	syl 17	. . . . . . . . . . . . . . . 16 |- ( ph -> J : NN --> ( NN X. NN ) )
24		frn 6053	. . . . . . . . . . . . . . . 16 |- ( J : NN --> ( NN X. NN ) -> ran J C_ ( NN X. NN ) )
25	23, 24	syl 17	. . . . . . . . . . . . . . 15 |- ( ph -> ran J C_ ( NN X. NN ) )
26	21, 25	syl5ss 3614	. . . . . . . . . . . . . 14 |- ( ph -> ( J " ( 1 ... K ) ) C_ ( NN X. NN ) )
27	26	sselda 3603	. . . . . . . . . . . . 13 |- ( ( ph /\ j e. ( J " ( 1 ... K ) ) ) -> j e. ( NN X. NN ) )
28		xp1st 7198	. . . . . . . . . . . . 13 |- ( j e. ( NN X. NN ) -> ( 1st ` j ) e. NN )
29	27, 28	syl 17	. . . . . . . . . . . 12 |- ( ( ph /\ j e. ( J " ( 1 ... K ) ) ) -> ( 1st ` j ) e. NN )
30	20, 29	ffvelrnd 6360	. . . . . . . . . . 11 |- ( ( ph /\ j e. ( J " ( 1 ... K ) ) ) -> ( F ` ( 1st ` j ) ) e. ( ( <_ i^i ( RR X. RR ) ) ^m NN ) )
31		reex 10027	. . . . . . . . . . . . . 14 |- RR e. _V
32	31, 31	xpex 6962	. . . . . . . . . . . . 13 |- ( RR X. RR ) e. _V
33	32	inex2 4800	. . . . . . . . . . . 12 |- ( <_ i^i ( RR X. RR ) ) e. _V
34		nnex 11026	. . . . . . . . . . . 12 |- NN e. _V
35	33, 34	elmap 7886	. . . . . . . . . . 11 |- ( ( F ` ( 1st ` j ) ) e. ( ( <_ i^i ( RR X. RR ) ) ^m NN ) <-> ( F ` ( 1st ` j ) ) : NN --> ( <_ i^i ( RR X. RR ) ) )
36	30, 35	sylib 208	. . . . . . . . . 10 |- ( ( ph /\ j e. ( J " ( 1 ... K ) ) ) -> ( F ` ( 1st ` j ) ) : NN --> ( <_ i^i ( RR X. RR ) ) )
37		xp2nd 7199	. . . . . . . . . . 11 |- ( j e. ( NN X. NN ) -> ( 2nd ` j ) e. NN )
38	27, 37	syl 17	. . . . . . . . . 10 |- ( ( ph /\ j e. ( J " ( 1 ... K ) ) ) -> ( 2nd ` j ) e. NN )
39	36, 38	ffvelrnd 6360	. . . . . . . . 9 |- ( ( ph /\ j e. ( J " ( 1 ... K ) ) ) -> ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) e. ( <_ i^i ( RR X. RR ) ) )
40	18, 39	sseldi 3601	. . . . . . . 8 |- ( ( ph /\ j e. ( J " ( 1 ... K ) ) ) -> ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) e. ( RR X. RR ) )
41		xp2nd 7199	. . . . . . . 8 |- ( ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) e. ( RR X. RR ) -> ( 2nd ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) e. RR )
42	40, 41	syl 17	. . . . . . 7 |- ( ( ph /\ j e. ( J " ( 1 ... K ) ) ) -> ( 2nd ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) e. RR )
43		xp1st 7198	. . . . . . . 8 |- ( ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) e. ( RR X. RR ) -> ( 1st ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) e. RR )
44	40, 43	syl 17	. . . . . . 7 |- ( ( ph /\ j e. ( J " ( 1 ... K ) ) ) -> ( 1st ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) e. RR )
45	42, 44	resubcld 10458	. . . . . 6 |- ( ( ph /\ j e. ( J " ( 1 ... K ) ) ) -> ( ( 2nd ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) - ( 1st ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) ) e. RR )
46	45	recnd 10068	. . . . 5 |- ( ( ph /\ j e. ( J " ( 1 ... K ) ) ) -> ( ( 2nd ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) - ( 1st ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) ) e. CC )
47	7, 8, 15, 17, 46	fsumf1o 14454	. . . 4 |- ( ph -> sum_ j e. ( J " ( 1 ... K ) ) ( ( 2nd ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) - ( 1st ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) ) = sum_ m e. ( 1 ... K ) ( ( 2nd ` ( ( F ` ( 1st ` ( J ` m ) ) ) ` ( 2nd ` ( J ` m ) ) ) ) - ( 1st ` ( ( F ` ( 1st ` ( J ` m ) ) ) ` ( 2nd ` ( J ` m ) ) ) ) ) )
48	19	adantr 481	. . . . . . . . . . 11 |- ( ( ph /\ k e. NN ) -> F : NN --> ( ( <_ i^i ( RR X. RR ) ) ^m NN ) )
49	23	ffvelrnda 6359	. . . . . . . . . . . 12 |- ( ( ph /\ k e. NN ) -> ( J ` k ) e. ( NN X. NN ) )
50		xp1st 7198	. . . . . . . . . . . 12 |- ( ( J ` k ) e. ( NN X. NN ) -> ( 1st ` ( J ` k ) ) e. NN )
51	49, 50	syl 17	. . . . . . . . . . 11 |- ( ( ph /\ k e. NN ) -> ( 1st ` ( J ` k ) ) e. NN )
52	48, 51	ffvelrnd 6360	. . . . . . . . . 10 |- ( ( ph /\ k e. NN ) -> ( F ` ( 1st ` ( J ` k ) ) ) e. ( ( <_ i^i ( RR X. RR ) ) ^m NN ) )
53	33, 34	elmap 7886	. . . . . . . . . 10 |- ( ( F ` ( 1st ` ( J ` k ) ) ) e. ( ( <_ i^i ( RR X. RR ) ) ^m NN ) <-> ( F ` ( 1st ` ( J ` k ) ) ) : NN --> ( <_ i^i ( RR X. RR ) ) )
54	52, 53	sylib 208	. . . . . . . . 9 |- ( ( ph /\ k e. NN ) -> ( F ` ( 1st ` ( J ` k ) ) ) : NN --> ( <_ i^i ( RR X. RR ) ) )
55		xp2nd 7199	. . . . . . . . . 10 |- ( ( J ` k ) e. ( NN X. NN ) -> ( 2nd ` ( J ` k ) ) e. NN )
56	49, 55	syl 17	. . . . . . . . 9 |- ( ( ph /\ k e. NN ) -> ( 2nd ` ( J ` k ) ) e. NN )
57	54, 56	ffvelrnd 6360	. . . . . . . 8 |- ( ( ph /\ k e. NN ) -> ( ( F ` ( 1st ` ( J ` k ) ) ) ` ( 2nd ` ( J ` k ) ) ) e. ( <_ i^i ( RR X. RR ) ) )
58		ovoliun.h	. . . . . . . 8 |- H = ( k e. NN |-> ( ( F ` ( 1st ` ( J ` k ) ) ) ` ( 2nd ` ( J ` k ) ) ) )
59	57, 58	fmptd 6385	. . . . . . 7 |- ( ph -> H : NN --> ( <_ i^i ( RR X. RR ) ) )
60		eqid 2622	. . . . . . . 8 |- ( ( abs o. - ) o. H ) = ( ( abs o. - ) o. H )
61	60	ovolfsval 23239	. . . . . . 7 |- ( ( H : NN --> ( <_ i^i ( RR X. RR ) ) /\ m e. NN ) -> ( ( ( abs o. - ) o. H ) ` m ) = ( ( 2nd ` ( H ` m ) ) - ( 1st ` ( H ` m ) ) ) )
62	59, 12, 61	syl2an 494	. . . . . 6 |- ( ( ph /\ m e. ( 1 ... K ) ) -> ( ( ( abs o. - ) o. H ) ` m ) = ( ( 2nd ` ( H ` m ) ) - ( 1st ` ( H ` m ) ) ) )
63	12	adantl 482	. . . . . . . . 9 |- ( ( ph /\ m e. ( 1 ... K ) ) -> m e. NN )
64		fveq2 6191	. . . . . . . . . . . . 13 |- ( k = m -> ( J ` k ) = ( J ` m ) )
65	64	fveq2d 6195	. . . . . . . . . . . 12 |- ( k = m -> ( 1st ` ( J ` k ) ) = ( 1st ` ( J ` m ) ) )
66	65	fveq2d 6195	. . . . . . . . . . 11 |- ( k = m -> ( F ` ( 1st ` ( J ` k ) ) ) = ( F ` ( 1st ` ( J ` m ) ) ) )
67	64	fveq2d 6195	. . . . . . . . . . 11 |- ( k = m -> ( 2nd ` ( J ` k ) ) = ( 2nd ` ( J ` m ) ) )
68	66, 67	fveq12d 6197	. . . . . . . . . 10 |- ( k = m -> ( ( F ` ( 1st ` ( J ` k ) ) ) ` ( 2nd ` ( J ` k ) ) ) = ( ( F ` ( 1st ` ( J ` m ) ) ) ` ( 2nd ` ( J ` m ) ) ) )
69		fvex 6201	. . . . . . . . . 10 |- ( ( F ` ( 1st ` ( J ` m ) ) ) ` ( 2nd ` ( J ` m ) ) ) e. _V
70	68, 58, 69	fvmpt 6282	. . . . . . . . 9 |- ( m e. NN -> ( H ` m ) = ( ( F ` ( 1st ` ( J ` m ) ) ) ` ( 2nd ` ( J ` m ) ) ) )
71	63, 70	syl 17	. . . . . . . 8 |- ( ( ph /\ m e. ( 1 ... K ) ) -> ( H ` m ) = ( ( F ` ( 1st ` ( J ` m ) ) ) ` ( 2nd ` ( J ` m ) ) ) )
72	71	fveq2d 6195	. . . . . . 7 |- ( ( ph /\ m e. ( 1 ... K ) ) -> ( 2nd ` ( H ` m ) ) = ( 2nd ` ( ( F ` ( 1st ` ( J ` m ) ) ) ` ( 2nd ` ( J ` m ) ) ) ) )
73	71	fveq2d 6195	. . . . . . 7 |- ( ( ph /\ m e. ( 1 ... K ) ) -> ( 1st ` ( H ` m ) ) = ( 1st ` ( ( F ` ( 1st ` ( J ` m ) ) ) ` ( 2nd ` ( J ` m ) ) ) ) )
74	72, 73	oveq12d 6668	. . . . . 6 |- ( ( ph /\ m e. ( 1 ... K ) ) -> ( ( 2nd ` ( H ` m ) ) - ( 1st ` ( H ` m ) ) ) = ( ( 2nd ` ( ( F ` ( 1st ` ( J ` m ) ) ) ` ( 2nd ` ( J ` m ) ) ) ) - ( 1st ` ( ( F ` ( 1st ` ( J ` m ) ) ) ` ( 2nd ` ( J ` m ) ) ) ) ) )
75	62, 74	eqtrd 2656	. . . . 5 |- ( ( ph /\ m e. ( 1 ... K ) ) -> ( ( ( abs o. - ) o. H ) ` m ) = ( ( 2nd ` ( ( F ` ( 1st ` ( J ` m ) ) ) ` ( 2nd ` ( J ` m ) ) ) ) - ( 1st ` ( ( F ` ( 1st ` ( J ` m ) ) ) ` ( 2nd ` ( J ` m ) ) ) ) ) )
76		ovoliun.k	. . . . . 6 |- ( ph -> K e. NN )
77		nnuz 11723	. . . . . 6 |- NN = ( ZZ>= ` 1 )
78	76, 77	syl6eleq 2711	. . . . 5 |- ( ph -> K e. ( ZZ>= ` 1 ) )
79		ffvelrn 6357	. . . . . . . . . . 11 |- ( ( H : NN --> ( <_ i^i ( RR X. RR ) ) /\ m e. NN ) -> ( H ` m ) e. ( <_ i^i ( RR X. RR ) ) )
80	59, 12, 79	syl2an 494	. . . . . . . . . 10 |- ( ( ph /\ m e. ( 1 ... K ) ) -> ( H ` m ) e. ( <_ i^i ( RR X. RR ) ) )
81	18, 80	sseldi 3601	. . . . . . . . 9 |- ( ( ph /\ m e. ( 1 ... K ) ) -> ( H ` m ) e. ( RR X. RR ) )
82		xp2nd 7199	. . . . . . . . 9 |- ( ( H ` m ) e. ( RR X. RR ) -> ( 2nd ` ( H ` m ) ) e. RR )
83	81, 82	syl 17	. . . . . . . 8 |- ( ( ph /\ m e. ( 1 ... K ) ) -> ( 2nd ` ( H ` m ) ) e. RR )
84		xp1st 7198	. . . . . . . . 9 |- ( ( H ` m ) e. ( RR X. RR ) -> ( 1st ` ( H ` m ) ) e. RR )
85	81, 84	syl 17	. . . . . . . 8 |- ( ( ph /\ m e. ( 1 ... K ) ) -> ( 1st ` ( H ` m ) ) e. RR )
86	83, 85	resubcld 10458	. . . . . . 7 |- ( ( ph /\ m e. ( 1 ... K ) ) -> ( ( 2nd ` ( H ` m ) ) - ( 1st ` ( H ` m ) ) ) e. RR )
87	86	recnd 10068	. . . . . 6 |- ( ( ph /\ m e. ( 1 ... K ) ) -> ( ( 2nd ` ( H ` m ) ) - ( 1st ` ( H ` m ) ) ) e. CC )
88	74, 87	eqeltrrd 2702	. . . . 5 |- ( ( ph /\ m e. ( 1 ... K ) ) -> ( ( 2nd ` ( ( F ` ( 1st ` ( J ` m ) ) ) ` ( 2nd ` ( J ` m ) ) ) ) - ( 1st ` ( ( F ` ( 1st ` ( J ` m ) ) ) ` ( 2nd ` ( J ` m ) ) ) ) ) e. CC )
89	75, 78, 88	fsumser 14461	. . . 4 |- ( ph -> sum_ m e. ( 1 ... K ) ( ( 2nd ` ( ( F ` ( 1st ` ( J ` m ) ) ) ` ( 2nd ` ( J ` m ) ) ) ) - ( 1st ` ( ( F ` ( 1st ` ( J ` m ) ) ) ` ( 2nd ` ( J ` m ) ) ) ) ) = ( seq 1 ( + , ( ( abs o. - ) o. H ) ) ` K ) )
90	47, 89	eqtrd 2656	. . 3 |- ( ph -> sum_ j e. ( J " ( 1 ... K ) ) ( ( 2nd ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) - ( 1st ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) ) = ( seq 1 ( + , ( ( abs o. - ) o. H ) ) ` K ) )
91		ovoliun.u	. . . 4 |- U = seq 1 ( + , ( ( abs o. - ) o. H ) )
92	91	fveq1i 6192	. . 3 |- ( U ` K ) = ( seq 1 ( + , ( ( abs o. - ) o. H ) ) ` K )
93	90, 92	syl6eqr 2674	. 2 |- ( ph -> sum_ j e. ( J " ( 1 ... K ) ) ( ( 2nd ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) - ( 1st ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) ) = ( U ` K ) )
94		f1oeng 7974	. . . . . . 7 |- ( ( ( 1 ... K ) e. Fin /\ ( J |` ( 1 ... K ) ) : ( 1 ... K ) -1-1-onto-> ( J " ( 1 ... K ) ) ) -> ( 1 ... K ) ~~ ( J " ( 1 ... K ) ) )
95	8, 15, 94	syl2anc 693	. . . . . 6 |- ( ph -> ( 1 ... K ) ~~ ( J " ( 1 ... K ) ) )
96	95	ensymd 8007	. . . . 5 |- ( ph -> ( J " ( 1 ... K ) ) ~~ ( 1 ... K ) )
97		enfii 8177	. . . . 5 |- ( ( ( 1 ... K ) e. Fin /\ ( J " ( 1 ... K ) ) ~~ ( 1 ... K ) ) -> ( J " ( 1 ... K ) ) e. Fin )
98	8, 96, 97	syl2anc 693	. . . 4 |- ( ph -> ( J " ( 1 ... K ) ) e. Fin )
99	98, 45	fsumrecl 14465	. . 3 |- ( ph -> sum_ j e. ( J " ( 1 ... K ) ) ( ( 2nd ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) - ( 1st ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) ) e. RR )
100		fzfid 12772	. . . . 5 |- ( ph -> ( 1 ... L ) e. Fin )
101		elfznn 12370	. . . . . 6 |- ( n e. ( 1 ... L ) -> n e. NN )
102		ovoliun.v	. . . . . 6 |- ( ( ph /\ n e. NN ) -> ( vol* ` A ) e. RR )
103	101, 102	sylan2 491	. . . . 5 |- ( ( ph /\ n e. ( 1 ... L ) ) -> ( vol* ` A ) e. RR )
104	100, 103	fsumrecl 14465	. . . 4 |- ( ph -> sum_ n e. ( 1 ... L ) ( vol* ` A ) e. RR )
105		ovoliun.b	. . . . . . 7 |- ( ph -> B e. RR+ )
106	105	rpred 11872	. . . . . 6 |- ( ph -> B e. RR )
107		2nn 11185	. . . . . . . 8 |- 2 e. NN
108		nnnn0 11299	. . . . . . . 8 |- ( n e. NN -> n e. NN0 )
109		nnexpcl 12873	. . . . . . . 8 |- ( ( 2 e. NN /\ n e. NN0 ) -> ( 2 ^ n ) e. NN )
110	107, 108, 109	sylancr 695	. . . . . . 7 |- ( n e. NN -> ( 2 ^ n ) e. NN )
111	101, 110	syl 17	. . . . . 6 |- ( n e. ( 1 ... L ) -> ( 2 ^ n ) e. NN )
112		nndivre 11056	. . . . . 6 |- ( ( B e. RR /\ ( 2 ^ n ) e. NN ) -> ( B / ( 2 ^ n ) ) e. RR )
113	106, 111, 112	syl2an 494	. . . . 5 |- ( ( ph /\ n e. ( 1 ... L ) ) -> ( B / ( 2 ^ n ) ) e. RR )
114	100, 113	fsumrecl 14465	. . . 4 |- ( ph -> sum_ n e. ( 1 ... L ) ( B / ( 2 ^ n ) ) e. RR )
115	104, 114	readdcld 10069	. . 3 |- ( ph -> ( sum_ n e. ( 1 ... L ) ( vol* ` A ) + sum_ n e. ( 1 ... L ) ( B / ( 2 ^ n ) ) ) e. RR )
116		ovoliun.r	. . . 4 |- ( ph -> sup ( ran T , RR* , < ) e. RR )
117	116, 106	readdcld 10069	. . 3 |- ( ph -> ( sup ( ran T , RR* , < ) + B ) e. RR )
118		relxp 5227	. . . . . . . . . . . . . . 15 |- Rel ( { n } X. ( ( J " ( 1 ... K ) ) " { n } ) )
119		relres 5426	. . . . . . . . . . . . . . 15 |- Rel ( ( J " ( 1 ... K ) ) |` { n } )
120		opelxp 5146	. . . . . . . . . . . . . . . 16 |- ( <. x , y >. e. ( { n } X. ( ( J " ( 1 ... K ) ) " { n } ) ) <-> ( x e. { n } /\ y e. ( ( J " ( 1 ... K ) ) " { n } ) ) )
121		vex 3203	. . . . . . . . . . . . . . . . . 18 |- y e. _V
122	121	opelres 5401	. . . . . . . . . . . . . . . . 17 |- ( <. x , y >. e. ( ( J " ( 1 ... K ) ) |` { n } ) <-> ( <. x , y >. e. ( J " ( 1 ... K ) ) /\ x e. { n } ) )
123		ancom 466	. . . . . . . . . . . . . . . . 17 |- ( ( x e. { n } /\ <. x , y >. e. ( J " ( 1 ... K ) ) ) <-> ( <. x , y >. e. ( J " ( 1 ... K ) ) /\ x e. { n } ) )
124		elsni 4194	. . . . . . . . . . . . . . . . . . . . 21 |- ( x e. { n } -> x = n )
125	124	opeq1d 4408	. . . . . . . . . . . . . . . . . . . 20 |- ( x e. { n } -> <. x , y >. = <. n , y >. )
126	125	eleq1d 2686	. . . . . . . . . . . . . . . . . . 19 |- ( x e. { n } -> ( <. x , y >. e. ( J " ( 1 ... K ) ) <-> <. n , y >. e. ( J " ( 1 ... K ) ) ) )
127		vex 3203	. . . . . . . . . . . . . . . . . . . 20 |- n e. _V
128	127, 121	elimasn 5490	. . . . . . . . . . . . . . . . . . 19 |- ( y e. ( ( J " ( 1 ... K ) ) " { n } ) <-> <. n , y >. e. ( J " ( 1 ... K ) ) )
129	126, 128	syl6bbr 278	. . . . . . . . . . . . . . . . . 18 |- ( x e. { n } -> ( <. x , y >. e. ( J " ( 1 ... K ) ) <-> y e. ( ( J " ( 1 ... K ) ) " { n } ) ) )
130	129	pm5.32i 669	. . . . . . . . . . . . . . . . 17 |- ( ( x e. { n } /\ <. x , y >. e. ( J " ( 1 ... K ) ) ) <-> ( x e. { n } /\ y e. ( ( J " ( 1 ... K ) ) " { n } ) ) )
131	122, 123, 130	3bitr2ri 289	. . . . . . . . . . . . . . . 16 |- ( ( x e. { n } /\ y e. ( ( J " ( 1 ... K ) ) " { n } ) ) <-> <. x , y >. e. ( ( J " ( 1 ... K ) ) |` { n } ) )
132	120, 131	bitri 264	. . . . . . . . . . . . . . 15 |- ( <. x , y >. e. ( { n } X. ( ( J " ( 1 ... K ) ) " { n } ) ) <-> <. x , y >. e. ( ( J " ( 1 ... K ) ) |` { n } ) )
133	118, 119, 132	eqrelriiv 5214	. . . . . . . . . . . . . 14 |- ( { n } X. ( ( J " ( 1 ... K ) ) " { n } ) ) = ( ( J " ( 1 ... K ) ) |` { n } )
134		df-res 5126	. . . . . . . . . . . . . 14 |- ( ( J " ( 1 ... K ) ) |` { n } ) = ( ( J " ( 1 ... K ) ) i^i ( { n } X. _V ) )
135	133, 134	eqtri 2644	. . . . . . . . . . . . 13 |- ( { n } X. ( ( J " ( 1 ... K ) ) " { n } ) ) = ( ( J " ( 1 ... K ) ) i^i ( { n } X. _V ) )
136	135	a1i 11	. . . . . . . . . . . 12 |- ( ( ph /\ n e. ( 1 ... L ) ) -> ( { n } X. ( ( J " ( 1 ... K ) ) " { n } ) ) = ( ( J " ( 1 ... K ) ) i^i ( { n } X. _V ) ) )
137	136	iuneq2dv 4542	. . . . . . . . . . 11 |- ( ph -> U_ n e. ( 1 ... L ) ( { n } X. ( ( J " ( 1 ... K ) ) " { n } ) ) = U_ n e. ( 1 ... L ) ( ( J " ( 1 ... K ) ) i^i ( { n } X. _V ) ) )
138		iunin2 4584	. . . . . . . . . . 11 |- U_ n e. ( 1 ... L ) ( ( J " ( 1 ... K ) ) i^i ( { n } X. _V ) ) = ( ( J " ( 1 ... K ) ) i^i U_ n e. ( 1 ... L ) ( { n } X. _V ) )
139	137, 138	syl6eq 2672	. . . . . . . . . 10 |- ( ph -> U_ n e. ( 1 ... L ) ( { n } X. ( ( J " ( 1 ... K ) ) " { n } ) ) = ( ( J " ( 1 ... K ) ) i^i U_ n e. ( 1 ... L ) ( { n } X. _V ) ) )
140		relxp 5227	. . . . . . . . . . . . . 14 |- Rel ( NN X. NN )
141		relss 5206	. . . . . . . . . . . . . 14 |- ( ( J " ( 1 ... K ) ) C_ ( NN X. NN ) -> ( Rel ( NN X. NN ) -> Rel ( J " ( 1 ... K ) ) ) )
142	26, 140, 141	mpisyl 21	. . . . . . . . . . . . 13 |- ( ph -> Rel ( J " ( 1 ... K ) ) )
143		ovoliun.l2	. . . . . . . . . . . . . . . . . . 19 |- ( ph -> A. w e. ( 1 ... K ) ( 1st ` ( J ` w ) ) <_ L )
144		ffn 6045	. . . . . . . . . . . . . . . . . . . . 21 |- ( J : NN --> ( NN X. NN ) -> J Fn NN )
145	23, 144	syl 17	. . . . . . . . . . . . . . . . . . . 20 |- ( ph -> J Fn NN )
146		fveq2 6191	. . . . . . . . . . . . . . . . . . . . . 22 |- ( j = ( J ` w ) -> ( 1st ` j ) = ( 1st ` ( J ` w ) ) )
147	146	breq1d 4663	. . . . . . . . . . . . . . . . . . . . 21 |- ( j = ( J ` w ) -> ( ( 1st ` j ) <_ L <-> ( 1st ` ( J ` w ) ) <_ L ) )
148	147	ralima 6498	. . . . . . . . . . . . . . . . . . . 20 |- ( ( J Fn NN /\ ( 1 ... K ) C_ NN ) -> ( A. j e. ( J " ( 1 ... K ) ) ( 1st ` j ) <_ L <-> A. w e. ( 1 ... K ) ( 1st ` ( J ` w ) ) <_ L ) )
149	145, 13, 148	sylancl 694	. . . . . . . . . . . . . . . . . . 19 |- ( ph -> ( A. j e. ( J " ( 1 ... K ) ) ( 1st ` j ) <_ L <-> A. w e. ( 1 ... K ) ( 1st ` ( J ` w ) ) <_ L ) )
150	143, 149	mpbird 247	. . . . . . . . . . . . . . . . . 18 |- ( ph -> A. j e. ( J " ( 1 ... K ) ) ( 1st ` j ) <_ L )
151	150	r19.21bi 2932	. . . . . . . . . . . . . . . . 17 |- ( ( ph /\ j e. ( J " ( 1 ... K ) ) ) -> ( 1st ` j ) <_ L )
152	29, 77	syl6eleq 2711	. . . . . . . . . . . . . . . . . 18 |- ( ( ph /\ j e. ( J " ( 1 ... K ) ) ) -> ( 1st ` j ) e. ( ZZ>= ` 1 ) )
153		ovoliun.l1	. . . . . . . . . . . . . . . . . . 19 |- ( ph -> L e. ZZ )
154	153	adantr 481	. . . . . . . . . . . . . . . . . 18 |- ( ( ph /\ j e. ( J " ( 1 ... K ) ) ) -> L e. ZZ )
155		elfz5 12334	. . . . . . . . . . . . . . . . . 18 |- ( ( ( 1st ` j ) e. ( ZZ>= ` 1 ) /\ L e. ZZ ) -> ( ( 1st ` j ) e. ( 1 ... L ) <-> ( 1st ` j ) <_ L ) )
156	152, 154, 155	syl2anc 693	. . . . . . . . . . . . . . . . 17 |- ( ( ph /\ j e. ( J " ( 1 ... K ) ) ) -> ( ( 1st ` j ) e. ( 1 ... L ) <-> ( 1st ` j ) <_ L ) )
157	151, 156	mpbird 247	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ j e. ( J " ( 1 ... K ) ) ) -> ( 1st ` j ) e. ( 1 ... L ) )
158	157	ralrimiva 2966	. . . . . . . . . . . . . . 15 |- ( ph -> A. j e. ( J " ( 1 ... K ) ) ( 1st ` j ) e. ( 1 ... L ) )
159		vex 3203	. . . . . . . . . . . . . . . . . 18 |- x e. _V
160	159, 121	op1std 7178	. . . . . . . . . . . . . . . . 17 |- ( j = <. x , y >. -> ( 1st ` j ) = x )
161	160	eleq1d 2686	. . . . . . . . . . . . . . . 16 |- ( j = <. x , y >. -> ( ( 1st ` j ) e. ( 1 ... L ) <-> x e. ( 1 ... L ) ) )
162	161	rspccv 3306	. . . . . . . . . . . . . . 15 |- ( A. j e. ( J " ( 1 ... K ) ) ( 1st ` j ) e. ( 1 ... L ) -> ( <. x , y >. e. ( J " ( 1 ... K ) ) -> x e. ( 1 ... L ) ) )
163	158, 162	syl 17	. . . . . . . . . . . . . 14 |- ( ph -> ( <. x , y >. e. ( J " ( 1 ... K ) ) -> x e. ( 1 ... L ) ) )
164		opelxp 5146	. . . . . . . . . . . . . . 15 |- ( <. x , y >. e. ( U_ n e. ( 1 ... L ) { n } X. _V ) <-> ( x e. U_ n e. ( 1 ... L ) { n } /\ y e. _V ) )
165	121	biantru 526	. . . . . . . . . . . . . . 15 |- ( x e. U_ n e. ( 1 ... L ) { n } <-> ( x e. U_ n e. ( 1 ... L ) { n } /\ y e. _V ) )
166		iunid 4575	. . . . . . . . . . . . . . . 16 |- U_ n e. ( 1 ... L ) { n } = ( 1 ... L )
167	166	eleq2i 2693	. . . . . . . . . . . . . . 15 |- ( x e. U_ n e. ( 1 ... L ) { n } <-> x e. ( 1 ... L ) )
168	164, 165, 167	3bitr2i 288	. . . . . . . . . . . . . 14 |- ( <. x , y >. e. ( U_ n e. ( 1 ... L ) { n } X. _V ) <-> x e. ( 1 ... L ) )
169	163, 168	syl6ibr 242	. . . . . . . . . . . . 13 |- ( ph -> ( <. x , y >. e. ( J " ( 1 ... K ) ) -> <. x , y >. e. ( U_ n e. ( 1 ... L ) { n } X. _V ) ) )
170	142, 169	relssdv 5212	. . . . . . . . . . . 12 |- ( ph -> ( J " ( 1 ... K ) ) C_ ( U_ n e. ( 1 ... L ) { n } X. _V ) )
171		xpiundir 5174	. . . . . . . . . . . 12 |- ( U_ n e. ( 1 ... L ) { n } X. _V ) = U_ n e. ( 1 ... L ) ( { n } X. _V )
172	170, 171	syl6sseq 3651	. . . . . . . . . . 11 |- ( ph -> ( J " ( 1 ... K ) ) C_ U_ n e. ( 1 ... L ) ( { n } X. _V ) )
173		df-ss 3588	. . . . . . . . . . 11 |- ( ( J " ( 1 ... K ) ) C_ U_ n e. ( 1 ... L ) ( { n } X. _V ) <-> ( ( J " ( 1 ... K ) ) i^i U_ n e. ( 1 ... L ) ( { n } X. _V ) ) = ( J " ( 1 ... K ) ) )
174	172, 173	sylib 208	. . . . . . . . . 10 |- ( ph -> ( ( J " ( 1 ... K ) ) i^i U_ n e. ( 1 ... L ) ( { n } X. _V ) ) = ( J " ( 1 ... K ) ) )
175	139, 174	eqtrd 2656	. . . . . . . . 9 |- ( ph -> U_ n e. ( 1 ... L ) ( { n } X. ( ( J " ( 1 ... K ) ) " { n } ) ) = ( J " ( 1 ... K ) ) )
176	175, 98	eqeltrd 2701	. . . . . . . 8 |- ( ph -> U_ n e. ( 1 ... L ) ( { n } X. ( ( J " ( 1 ... K ) ) " { n } ) ) e. Fin )
177		ssiun2 4563	. . . . . . . 8 |- ( n e. ( 1 ... L ) -> ( { n } X. ( ( J " ( 1 ... K ) ) " { n } ) ) C_ U_ n e. ( 1 ... L ) ( { n } X. ( ( J " ( 1 ... K ) ) " { n } ) ) )
178		ssfi 8180	. . . . . . . 8 |- ( ( U_ n e. ( 1 ... L ) ( { n } X. ( ( J " ( 1 ... K ) ) " { n } ) ) e. Fin /\ ( { n } X. ( ( J " ( 1 ... K ) ) " { n } ) ) C_ U_ n e. ( 1 ... L ) ( { n } X. ( ( J " ( 1 ... K ) ) " { n } ) ) ) -> ( { n } X. ( ( J " ( 1 ... K ) ) " { n } ) ) e. Fin )
179	176, 177, 178	syl2an 494	. . . . . . 7 |- ( ( ph /\ n e. ( 1 ... L ) ) -> ( { n } X. ( ( J " ( 1 ... K ) ) " { n } ) ) e. Fin )
180		2ndconst 7266	. . . . . . . . . 10 |- ( n e. _V -> ( 2nd |` ( { n } X. ( ( J " ( 1 ... K ) ) " { n } ) ) ) : ( { n } X. ( ( J " ( 1 ... K ) ) " { n } ) ) -1-1-onto-> ( ( J " ( 1 ... K ) ) " { n } ) )
181	127, 180	ax-mp 5	. . . . . . . . 9 |- ( 2nd |` ( { n } X. ( ( J " ( 1 ... K ) ) " { n } ) ) ) : ( { n } X. ( ( J " ( 1 ... K ) ) " { n } ) ) -1-1-onto-> ( ( J " ( 1 ... K ) ) " { n } )
182		f1oeng 7974	. . . . . . . . 9 |- ( ( ( { n } X. ( ( J " ( 1 ... K ) ) " { n } ) ) e. Fin /\ ( 2nd |` ( { n } X. ( ( J " ( 1 ... K ) ) " { n } ) ) ) : ( { n } X. ( ( J " ( 1 ... K ) ) " { n } ) ) -1-1-onto-> ( ( J " ( 1 ... K ) ) " { n } ) ) -> ( { n } X. ( ( J " ( 1 ... K ) ) " { n } ) ) ~~ ( ( J " ( 1 ... K ) ) " { n } ) )
183	179, 181, 182	sylancl 694	. . . . . . . 8 |- ( ( ph /\ n e. ( 1 ... L ) ) -> ( { n } X. ( ( J " ( 1 ... K ) ) " { n } ) ) ~~ ( ( J " ( 1 ... K ) ) " { n } ) )
184	183	ensymd 8007	. . . . . . 7 |- ( ( ph /\ n e. ( 1 ... L ) ) -> ( ( J " ( 1 ... K ) ) " { n } ) ~~ ( { n } X. ( ( J " ( 1 ... K ) ) " { n } ) ) )
185		enfii 8177	. . . . . . 7 |- ( ( ( { n } X. ( ( J " ( 1 ... K ) ) " { n } ) ) e. Fin /\ ( ( J " ( 1 ... K ) ) " { n } ) ~~ ( { n } X. ( ( J " ( 1 ... K ) ) " { n } ) ) ) -> ( ( J " ( 1 ... K ) ) " { n } ) e. Fin )
186	179, 184, 185	syl2anc 693	. . . . . 6 |- ( ( ph /\ n e. ( 1 ... L ) ) -> ( ( J " ( 1 ... K ) ) " { n } ) e. Fin )
187		ffvelrn 6357	. . . . . . . . . . . . . 14 |- ( ( F : NN --> ( ( <_ i^i ( RR X. RR ) ) ^m NN ) /\ n e. NN ) -> ( F ` n ) e. ( ( <_ i^i ( RR X. RR ) ) ^m NN ) )
188	19, 101, 187	syl2an 494	. . . . . . . . . . . . 13 |- ( ( ph /\ n e. ( 1 ... L ) ) -> ( F ` n ) e. ( ( <_ i^i ( RR X. RR ) ) ^m NN ) )
189	33, 34	elmap 7886	. . . . . . . . . . . . 13 |- ( ( F ` n ) e. ( ( <_ i^i ( RR X. RR ) ) ^m NN ) <-> ( F ` n ) : NN --> ( <_ i^i ( RR X. RR ) ) )
190	188, 189	sylib 208	. . . . . . . . . . . 12 |- ( ( ph /\ n e. ( 1 ... L ) ) -> ( F ` n ) : NN --> ( <_ i^i ( RR X. RR ) ) )
191	190	adantrr 753	. . . . . . . . . . 11 |- ( ( ph /\ ( n e. ( 1 ... L ) /\ i e. ( ( J " ( 1 ... K ) ) " { n } ) ) ) -> ( F ` n ) : NN --> ( <_ i^i ( RR X. RR ) ) )
192		imassrn 5477	. . . . . . . . . . . . . 14 |- ( ( J " ( 1 ... K ) ) " { n } ) C_ ran ( J " ( 1 ... K ) )
193	26	adantr 481	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ n e. ( 1 ... L ) ) -> ( J " ( 1 ... K ) ) C_ ( NN X. NN ) )
194		rnss 5354	. . . . . . . . . . . . . . . 16 |- ( ( J " ( 1 ... K ) ) C_ ( NN X. NN ) -> ran ( J " ( 1 ... K ) ) C_ ran ( NN X. NN ) )
195	193, 194	syl 17	. . . . . . . . . . . . . . 15 |- ( ( ph /\ n e. ( 1 ... L ) ) -> ran ( J " ( 1 ... K ) ) C_ ran ( NN X. NN ) )
196		rnxpid 5567	. . . . . . . . . . . . . . 15 |- ran ( NN X. NN ) = NN
197	195, 196	syl6sseq 3651	. . . . . . . . . . . . . 14 |- ( ( ph /\ n e. ( 1 ... L ) ) -> ran ( J " ( 1 ... K ) ) C_ NN )
198	192, 197	syl5ss 3614	. . . . . . . . . . . . 13 |- ( ( ph /\ n e. ( 1 ... L ) ) -> ( ( J " ( 1 ... K ) ) " { n } ) C_ NN )
199	198	sseld 3602	. . . . . . . . . . . 12 |- ( ( ph /\ n e. ( 1 ... L ) ) -> ( i e. ( ( J " ( 1 ... K ) ) " { n } ) -> i e. NN ) )
200	199	impr 649	. . . . . . . . . . 11 |- ( ( ph /\ ( n e. ( 1 ... L ) /\ i e. ( ( J " ( 1 ... K ) ) " { n } ) ) ) -> i e. NN )
201	191, 200	ffvelrnd 6360	. . . . . . . . . 10 |- ( ( ph /\ ( n e. ( 1 ... L ) /\ i e. ( ( J " ( 1 ... K ) ) " { n } ) ) ) -> ( ( F ` n ) ` i ) e. ( <_ i^i ( RR X. RR ) ) )
202	18, 201	sseldi 3601	. . . . . . . . 9 |- ( ( ph /\ ( n e. ( 1 ... L ) /\ i e. ( ( J " ( 1 ... K ) ) " { n } ) ) ) -> ( ( F ` n ) ` i ) e. ( RR X. RR ) )
203		xp2nd 7199	. . . . . . . . 9 |- ( ( ( F ` n ) ` i ) e. ( RR X. RR ) -> ( 2nd ` ( ( F ` n ) ` i ) ) e. RR )
204	202, 203	syl 17	. . . . . . . 8 |- ( ( ph /\ ( n e. ( 1 ... L ) /\ i e. ( ( J " ( 1 ... K ) ) " { n } ) ) ) -> ( 2nd ` ( ( F ` n ) ` i ) ) e. RR )
205		xp1st 7198	. . . . . . . . 9 |- ( ( ( F ` n ) ` i ) e. ( RR X. RR ) -> ( 1st ` ( ( F ` n ) ` i ) ) e. RR )
206	202, 205	syl 17	. . . . . . . 8 |- ( ( ph /\ ( n e. ( 1 ... L ) /\ i e. ( ( J " ( 1 ... K ) ) " { n } ) ) ) -> ( 1st ` ( ( F ` n ) ` i ) ) e. RR )
207	204, 206	resubcld 10458	. . . . . . 7 |- ( ( ph /\ ( n e. ( 1 ... L ) /\ i e. ( ( J " ( 1 ... K ) ) " { n } ) ) ) -> ( ( 2nd ` ( ( F ` n ) ` i ) ) - ( 1st ` ( ( F ` n ) ` i ) ) ) e. RR )
208	207	anassrs 680	. . . . . 6 |- ( ( ( ph /\ n e. ( 1 ... L ) ) /\ i e. ( ( J " ( 1 ... K ) ) " { n } ) ) -> ( ( 2nd ` ( ( F ` n ) ` i ) ) - ( 1st ` ( ( F ` n ) ` i ) ) ) e. RR )
209	186, 208	fsumrecl 14465	. . . . 5 |- ( ( ph /\ n e. ( 1 ... L ) ) -> sum_ i e. ( ( J " ( 1 ... K ) ) " { n } ) ( ( 2nd ` ( ( F ` n ) ` i ) ) - ( 1st ` ( ( F ` n ) ` i ) ) ) e. RR )
210	106, 110, 112	syl2an 494	. . . . . . 7 |- ( ( ph /\ n e. NN ) -> ( B / ( 2 ^ n ) ) e. RR )
211	102, 210	readdcld 10069	. . . . . 6 |- ( ( ph /\ n e. NN ) -> ( ( vol* ` A ) + ( B / ( 2 ^ n ) ) ) e. RR )
212	101, 211	sylan2 491	. . . . 5 |- ( ( ph /\ n e. ( 1 ... L ) ) -> ( ( vol* ` A ) + ( B / ( 2 ^ n ) ) ) e. RR )
213		eqid 2622	. . . . . . . . . . . 12 |- ( ( abs o. - ) o. ( F ` n ) ) = ( ( abs o. - ) o. ( F ` n ) )
214		ovoliun.s	. . . . . . . . . . . 12 |- S = seq 1 ( + , ( ( abs o. - ) o. ( F ` n ) ) )
215	213, 214	ovolsf 23241	. . . . . . . . . . 11 |- ( ( F ` n ) : NN --> ( <_ i^i ( RR X. RR ) ) -> S : NN --> ( 0 [,) +oo ) )
216	190, 215	syl 17	. . . . . . . . . 10 |- ( ( ph /\ n e. ( 1 ... L ) ) -> S : NN --> ( 0 [,) +oo ) )
217		frn 6053	. . . . . . . . . 10 |- ( S : NN --> ( 0 [,) +oo ) -> ran S C_ ( 0 [,) +oo ) )
218	216, 217	syl 17	. . . . . . . . 9 |- ( ( ph /\ n e. ( 1 ... L ) ) -> ran S C_ ( 0 [,) +oo ) )
219		icossxr 12258	. . . . . . . . 9 |- ( 0 [,) +oo ) C_ RR*
220	218, 219	syl6ss 3615	. . . . . . . 8 |- ( ( ph /\ n e. ( 1 ... L ) ) -> ran S C_ RR* )
221		supxrcl 12145	. . . . . . . 8 |- ( ran S C_ RR* -> sup ( ran S , RR* , < ) e. RR* )
222	220, 221	syl 17	. . . . . . 7 |- ( ( ph /\ n e. ( 1 ... L ) ) -> sup ( ran S , RR* , < ) e. RR* )
223		mnfxr 10096	. . . . . . . . 9 |- -oo e. RR*
224	223	a1i 11	. . . . . . . 8 |- ( ( ph /\ n e. ( 1 ... L ) ) -> -oo e. RR* )
225	103	rexrd 10089	. . . . . . . 8 |- ( ( ph /\ n e. ( 1 ... L ) ) -> ( vol* ` A ) e. RR* )
226		mnflt 11957	. . . . . . . . 9 |- ( ( vol* ` A ) e. RR -> -oo < ( vol* ` A ) )
227	103, 226	syl 17	. . . . . . . 8 |- ( ( ph /\ n e. ( 1 ... L ) ) -> -oo < ( vol* ` A ) )
228		ovoliun.x1	. . . . . . . . . 10 |- ( ( ph /\ n e. NN ) -> A C_ U. ran ( (,) o. ( F ` n ) ) )
229	101, 228	sylan2 491	. . . . . . . . 9 |- ( ( ph /\ n e. ( 1 ... L ) ) -> A C_ U. ran ( (,) o. ( F ` n ) ) )
230	214	ovollb 23247	. . . . . . . . 9 |- ( ( ( F ` n ) : NN --> ( <_ i^i ( RR X. RR ) ) /\ A C_ U. ran ( (,) o. ( F ` n ) ) ) -> ( vol* ` A ) <_ sup ( ran S , RR* , < ) )
231	190, 229, 230	syl2anc 693	. . . . . . . 8 |- ( ( ph /\ n e. ( 1 ... L ) ) -> ( vol* ` A ) <_ sup ( ran S , RR* , < ) )
232	224, 225, 222, 227, 231	xrltletrd 11992	. . . . . . 7 |- ( ( ph /\ n e. ( 1 ... L ) ) -> -oo < sup ( ran S , RR* , < ) )
233		ovoliun.x2	. . . . . . . 8 |- ( ( ph /\ n e. NN ) -> sup ( ran S , RR* , < ) <_ ( ( vol* ` A ) + ( B / ( 2 ^ n ) ) ) )
234	101, 233	sylan2 491	. . . . . . 7 |- ( ( ph /\ n e. ( 1 ... L ) ) -> sup ( ran S , RR* , < ) <_ ( ( vol* ` A ) + ( B / ( 2 ^ n ) ) ) )
235		xrre 12000	. . . . . . 7 |- ( ( ( sup ( ran S , RR* , < ) e. RR* /\ ( ( vol* ` A ) + ( B / ( 2 ^ n ) ) ) e. RR ) /\ ( -oo < sup ( ran S , RR* , < ) /\ sup ( ran S , RR* , < ) <_ ( ( vol* ` A ) + ( B / ( 2 ^ n ) ) ) ) ) -> sup ( ran S , RR* , < ) e. RR )
236	222, 212, 232, 234, 235	syl22anc 1327	. . . . . 6 |- ( ( ph /\ n e. ( 1 ... L ) ) -> sup ( ran S , RR* , < ) e. RR )
237		1zzd 11408	. . . . . . . 8 |- ( ( ph /\ n e. ( 1 ... L ) ) -> 1 e. ZZ )
238	213	ovolfsval 23239	. . . . . . . . 9 |- ( ( ( F ` n ) : NN --> ( <_ i^i ( RR X. RR ) ) /\ i e. NN ) -> ( ( ( abs o. - ) o. ( F ` n ) ) ` i ) = ( ( 2nd ` ( ( F ` n ) ` i ) ) - ( 1st ` ( ( F ` n ) ` i ) ) ) )
239	190, 238	sylan 488	. . . . . . . 8 |- ( ( ( ph /\ n e. ( 1 ... L ) ) /\ i e. NN ) -> ( ( ( abs o. - ) o. ( F ` n ) ) ` i ) = ( ( 2nd ` ( ( F ` n ) ` i ) ) - ( 1st ` ( ( F ` n ) ` i ) ) ) )
240	213	ovolfsf 23240	. . . . . . . . . . . . 13 |- ( ( F ` n ) : NN --> ( <_ i^i ( RR X. RR ) ) -> ( ( abs o. - ) o. ( F ` n ) ) : NN --> ( 0 [,) +oo ) )
241	190, 240	syl 17	. . . . . . . . . . . 12 |- ( ( ph /\ n e. ( 1 ... L ) ) -> ( ( abs o. - ) o. ( F ` n ) ) : NN --> ( 0 [,) +oo ) )
242	241	ffvelrnda 6359	. . . . . . . . . . 11 |- ( ( ( ph /\ n e. ( 1 ... L ) ) /\ i e. NN ) -> ( ( ( abs o. - ) o. ( F ` n ) ) ` i ) e. ( 0 [,) +oo ) )
243	239, 242	eqeltrrd 2702	. . . . . . . . . 10 |- ( ( ( ph /\ n e. ( 1 ... L ) ) /\ i e. NN ) -> ( ( 2nd ` ( ( F ` n ) ` i ) ) - ( 1st ` ( ( F ` n ) ` i ) ) ) e. ( 0 [,) +oo ) )
244		elrege0 12278	. . . . . . . . . 10 |- ( ( ( 2nd ` ( ( F ` n ) ` i ) ) - ( 1st ` ( ( F ` n ) ` i ) ) ) e. ( 0 [,) +oo ) <-> ( ( ( 2nd ` ( ( F ` n ) ` i ) ) - ( 1st ` ( ( F ` n ) ` i ) ) ) e. RR /\ 0 <_ ( ( 2nd ` ( ( F ` n ) ` i ) ) - ( 1st ` ( ( F ` n ) ` i ) ) ) ) )
245	243, 244	sylib 208	. . . . . . . . 9 |- ( ( ( ph /\ n e. ( 1 ... L ) ) /\ i e. NN ) -> ( ( ( 2nd ` ( ( F ` n ) ` i ) ) - ( 1st ` ( ( F ` n ) ` i ) ) ) e. RR /\ 0 <_ ( ( 2nd ` ( ( F ` n ) ` i ) ) - ( 1st ` ( ( F ` n ) ` i ) ) ) ) )
246	245	simpld 475	. . . . . . . 8 |- ( ( ( ph /\ n e. ( 1 ... L ) ) /\ i e. NN ) -> ( ( 2nd ` ( ( F ` n ) ` i ) ) - ( 1st ` ( ( F ` n ) ` i ) ) ) e. RR )
247	245	simprd 479	. . . . . . . 8 |- ( ( ( ph /\ n e. ( 1 ... L ) ) /\ i e. NN ) -> 0 <_ ( ( 2nd ` ( ( F ` n ) ` i ) ) - ( 1st ` ( ( F ` n ) ` i ) ) ) )
248		supxrub 12154	. . . . . . . . . . . . . . 15 |- ( ( ran S C_ RR* /\ z e. ran S ) -> z <_ sup ( ran S , RR* , < ) )
249	220, 248	sylan 488	. . . . . . . . . . . . . 14 |- ( ( ( ph /\ n e. ( 1 ... L ) ) /\ z e. ran S ) -> z <_ sup ( ran S , RR* , < ) )
250	249	ralrimiva 2966	. . . . . . . . . . . . 13 |- ( ( ph /\ n e. ( 1 ... L ) ) -> A. z e. ran S z <_ sup ( ran S , RR* , < ) )
251		breq2 4657	. . . . . . . . . . . . . . 15 |- ( x = sup ( ran S , RR* , < ) -> ( z <_ x <-> z <_ sup ( ran S , RR* , < ) ) )
252	251	ralbidv 2986	. . . . . . . . . . . . . 14 |- ( x = sup ( ran S , RR* , < ) -> ( A. z e. ran S z <_ x <-> A. z e. ran S z <_ sup ( ran S , RR* , < ) ) )
253	252	rspcev 3309	. . . . . . . . . . . . 13 |- ( ( sup ( ran S , RR* , < ) e. RR /\ A. z e. ran S z <_ sup ( ran S , RR* , < ) ) -> E. x e. RR A. z e. ran S z <_ x )
254	236, 250, 253	syl2anc 693	. . . . . . . . . . . 12 |- ( ( ph /\ n e. ( 1 ... L ) ) -> E. x e. RR A. z e. ran S z <_ x )
255		ffn 6045	. . . . . . . . . . . . . . 15 |- ( S : NN --> ( 0 [,) +oo ) -> S Fn NN )
256	216, 255	syl 17	. . . . . . . . . . . . . 14 |- ( ( ph /\ n e. ( 1 ... L ) ) -> S Fn NN )
257		breq1 4656	. . . . . . . . . . . . . . 15 |- ( z = ( S ` k ) -> ( z <_ x <-> ( S ` k ) <_ x ) )
258	257	ralrn 6362	. . . . . . . . . . . . . 14 |- ( S Fn NN -> ( A. z e. ran S z <_ x <-> A. k e. NN ( S ` k ) <_ x ) )
259	256, 258	syl 17	. . . . . . . . . . . . 13 |- ( ( ph /\ n e. ( 1 ... L ) ) -> ( A. z e. ran S z <_ x <-> A. k e. NN ( S ` k ) <_ x ) )
260	259	rexbidv 3052	. . . . . . . . . . . 12 |- ( ( ph /\ n e. ( 1 ... L ) ) -> ( E. x e. RR A. z e. ran S z <_ x <-> E. x e. RR A. k e. NN ( S ` k ) <_ x ) )
261	254, 260	mpbid 222	. . . . . . . . . . 11 |- ( ( ph /\ n e. ( 1 ... L ) ) -> E. x e. RR A. k e. NN ( S ` k ) <_ x )
262	77, 214, 237, 239, 246, 247, 261	isumsup2 14578	. . . . . . . . . 10 |- ( ( ph /\ n e. ( 1 ... L ) ) -> S ~~> sup ( ran S , RR , < ) )
263	214, 262	syl5eqbrr 4689	. . . . . . . . 9 |- ( ( ph /\ n e. ( 1 ... L ) ) -> seq 1 ( + , ( ( abs o. - ) o. ( F ` n ) ) ) ~~> sup ( ran S , RR , < ) )
264		climrel 14223	. . . . . . . . . 10 |- Rel ~~>
265	264	releldmi 5362	. . . . . . . . 9 |- ( seq 1 ( + , ( ( abs o. - ) o. ( F ` n ) ) ) ~~> sup ( ran S , RR , < ) -> seq 1 ( + , ( ( abs o. - ) o. ( F ` n ) ) ) e. dom ~~> )
266	263, 265	syl 17	. . . . . . . 8 |- ( ( ph /\ n e. ( 1 ... L ) ) -> seq 1 ( + , ( ( abs o. - ) o. ( F ` n ) ) ) e. dom ~~> )
267	77, 237, 186, 198, 239, 246, 247, 266	isumless 14577	. . . . . . 7 |- ( ( ph /\ n e. ( 1 ... L ) ) -> sum_ i e. ( ( J " ( 1 ... K ) ) " { n } ) ( ( 2nd ` ( ( F ` n ) ` i ) ) - ( 1st ` ( ( F ` n ) ` i ) ) ) <_ sum_ i e. NN ( ( 2nd ` ( ( F ` n ) ` i ) ) - ( 1st ` ( ( F ` n ) ` i ) ) ) )
268	77, 214, 237, 239, 246, 247, 261	isumsup 14579	. . . . . . . 8 |- ( ( ph /\ n e. ( 1 ... L ) ) -> sum_ i e. NN ( ( 2nd ` ( ( F ` n ) ` i ) ) - ( 1st ` ( ( F ` n ) ` i ) ) ) = sup ( ran S , RR , < ) )
269		rge0ssre 12280	. . . . . . . . . 10 |- ( 0 [,) +oo ) C_ RR
270	218, 269	syl6ss 3615	. . . . . . . . 9 |- ( ( ph /\ n e. ( 1 ... L ) ) -> ran S C_ RR )
271		1nn 11031	. . . . . . . . . . . 12 |- 1 e. NN
272		fdm 6051	. . . . . . . . . . . . 13 |- ( S : NN --> ( 0 [,) +oo ) -> dom S = NN )
273	216, 272	syl 17	. . . . . . . . . . . 12 |- ( ( ph /\ n e. ( 1 ... L ) ) -> dom S = NN )
274	271, 273	syl5eleqr 2708	. . . . . . . . . . 11 |- ( ( ph /\ n e. ( 1 ... L ) ) -> 1 e. dom S )
275		ne0i 3921	. . . . . . . . . . 11 |- ( 1 e. dom S -> dom S =/= (/) )
276	274, 275	syl 17	. . . . . . . . . 10 |- ( ( ph /\ n e. ( 1 ... L ) ) -> dom S =/= (/) )
277		dm0rn0 5342	. . . . . . . . . . 11 |- ( dom S = (/) <-> ran S = (/) )
278	277	necon3bii 2846	. . . . . . . . . 10 |- ( dom S =/= (/) <-> ran S =/= (/) )
279	276, 278	sylib 208	. . . . . . . . 9 |- ( ( ph /\ n e. ( 1 ... L ) ) -> ran S =/= (/) )
280		supxrre 12157	. . . . . . . . 9 |- ( ( ran S C_ RR /\ ran S =/= (/) /\ E. x e. RR A. z e. ran S z <_ x ) -> sup ( ran S , RR* , < ) = sup ( ran S , RR , < ) )
281	270, 279, 254, 280	syl3anc 1326	. . . . . . . 8 |- ( ( ph /\ n e. ( 1 ... L ) ) -> sup ( ran S , RR* , < ) = sup ( ran S , RR , < ) )
282	268, 281	eqtr4d 2659	. . . . . . 7 |- ( ( ph /\ n e. ( 1 ... L ) ) -> sum_ i e. NN ( ( 2nd ` ( ( F ` n ) ` i ) ) - ( 1st ` ( ( F ` n ) ` i ) ) ) = sup ( ran S , RR* , < ) )
283	267, 282	breqtrd 4679	. . . . . 6 |- ( ( ph /\ n e. ( 1 ... L ) ) -> sum_ i e. ( ( J " ( 1 ... K ) ) " { n } ) ( ( 2nd ` ( ( F ` n ) ` i ) ) - ( 1st ` ( ( F ` n ) ` i ) ) ) <_ sup ( ran S , RR* , < ) )
284	209, 236, 212, 283, 234	letrd 10194	. . . . 5 |- ( ( ph /\ n e. ( 1 ... L ) ) -> sum_ i e. ( ( J " ( 1 ... K ) ) " { n } ) ( ( 2nd ` ( ( F ` n ) ` i ) ) - ( 1st ` ( ( F ` n ) ` i ) ) ) <_ ( ( vol* ` A ) + ( B / ( 2 ^ n ) ) ) )
285	100, 209, 212, 284	fsumle 14531	. . . 4 |- ( ph -> sum_ n e. ( 1 ... L ) sum_ i e. ( ( J " ( 1 ... K ) ) " { n } ) ( ( 2nd ` ( ( F ` n ) ` i ) ) - ( 1st ` ( ( F ` n ) ` i ) ) ) <_ sum_ n e. ( 1 ... L ) ( ( vol* ` A ) + ( B / ( 2 ^ n ) ) ) )
286		vex 3203	. . . . . . . . . . 11 |- i e. _V
287	127, 286	op1std 7178	. . . . . . . . . 10 |- ( j = <. n , i >. -> ( 1st ` j ) = n )
288	287	fveq2d 6195	. . . . . . . . 9 |- ( j = <. n , i >. -> ( F ` ( 1st ` j ) ) = ( F ` n ) )
289	127, 286	op2ndd 7179	. . . . . . . . 9 |- ( j = <. n , i >. -> ( 2nd ` j ) = i )
290	288, 289	fveq12d 6197	. . . . . . . 8 |- ( j = <. n , i >. -> ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) = ( ( F ` n ) ` i ) )
291	290	fveq2d 6195	. . . . . . 7 |- ( j = <. n , i >. -> ( 2nd ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) = ( 2nd ` ( ( F ` n ) ` i ) ) )
292	290	fveq2d 6195	. . . . . . 7 |- ( j = <. n , i >. -> ( 1st ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) = ( 1st ` ( ( F ` n ) ` i ) ) )
293	291, 292	oveq12d 6668	. . . . . 6 |- ( j = <. n , i >. -> ( ( 2nd ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) - ( 1st ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) ) = ( ( 2nd ` ( ( F ` n ) ` i ) ) - ( 1st ` ( ( F ` n ) ` i ) ) ) )
294	207	recnd 10068	. . . . . 6 |- ( ( ph /\ ( n e. ( 1 ... L ) /\ i e. ( ( J " ( 1 ... K ) ) " { n } ) ) ) -> ( ( 2nd ` ( ( F ` n ) ` i ) ) - ( 1st ` ( ( F ` n ) ` i ) ) ) e. CC )
295	293, 100, 186, 294	fsum2d 14502	. . . . 5 |- ( ph -> sum_ n e. ( 1 ... L ) sum_ i e. ( ( J " ( 1 ... K ) ) " { n } ) ( ( 2nd ` ( ( F ` n ) ` i ) ) - ( 1st ` ( ( F ` n ) ` i ) ) ) = sum_ j e. U_ n e. ( 1 ... L ) ( { n } X. ( ( J " ( 1 ... K ) ) " { n } ) ) ( ( 2nd ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) - ( 1st ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) ) )
296	175	sumeq1d 14431	. . . . 5 |- ( ph -> sum_ j e. U_ n e. ( 1 ... L ) ( { n } X. ( ( J " ( 1 ... K ) ) " { n } ) ) ( ( 2nd ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) - ( 1st ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) ) = sum_ j e. ( J " ( 1 ... K ) ) ( ( 2nd ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) - ( 1st ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) ) )
297	295, 296	eqtrd 2656	. . . 4 |- ( ph -> sum_ n e. ( 1 ... L ) sum_ i e. ( ( J " ( 1 ... K ) ) " { n } ) ( ( 2nd ` ( ( F ` n ) ` i ) ) - ( 1st ` ( ( F ` n ) ` i ) ) ) = sum_ j e. ( J " ( 1 ... K ) ) ( ( 2nd ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) - ( 1st ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) ) )
298	103	recnd 10068	. . . . 5 |- ( ( ph /\ n e. ( 1 ... L ) ) -> ( vol* ` A ) e. CC )
299	113	recnd 10068	. . . . 5 |- ( ( ph /\ n e. ( 1 ... L ) ) -> ( B / ( 2 ^ n ) ) e. CC )
300	100, 298, 299	fsumadd 14470	. . . 4 |- ( ph -> sum_ n e. ( 1 ... L ) ( ( vol* ` A ) + ( B / ( 2 ^ n ) ) ) = ( sum_ n e. ( 1 ... L ) ( vol* ` A ) + sum_ n e. ( 1 ... L ) ( B / ( 2 ^ n ) ) ) )
301	285, 297, 300	3brtr3d 4684	. . 3 |- ( ph -> sum_ j e. ( J " ( 1 ... K ) ) ( ( 2nd ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) - ( 1st ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) ) <_ ( sum_ n e. ( 1 ... L ) ( vol* ` A ) + sum_ n e. ( 1 ... L ) ( B / ( 2 ^ n ) ) ) )
302		1zzd 11408	. . . . . . . . 9 |- ( ph -> 1 e. ZZ )
303		simpr 477	. . . . . . . . . . 11 |- ( ( ph /\ n e. NN ) -> n e. NN )
304		ovoliun.g	. . . . . . . . . . . 12 |- G = ( n e. NN |-> ( vol* ` A ) )
305	304	fvmpt2 6291	. . . . . . . . . . 11 |- ( ( n e. NN /\ ( vol* ` A ) e. RR ) -> ( G ` n ) = ( vol* ` A ) )
306	303, 102, 305	syl2anc 693	. . . . . . . . . 10 |- ( ( ph /\ n e. NN ) -> ( G ` n ) = ( vol* ` A ) )
307	306, 102	eqeltrd 2701	. . . . . . . . 9 |- ( ( ph /\ n e. NN ) -> ( G ` n ) e. RR )
308	77, 302, 307	serfre 12830	. . . . . . . 8 |- ( ph -> seq 1 ( + , G ) : NN --> RR )
309		ovoliun.t	. . . . . . . . 9 |- T = seq 1 ( + , G )
310	309	feq1i 6036	. . . . . . . 8 |- ( T : NN --> RR <-> seq 1 ( + , G ) : NN --> RR )
311	308, 310	sylibr 224	. . . . . . 7 |- ( ph -> T : NN --> RR )
312		frn 6053	. . . . . . 7 |- ( T : NN --> RR -> ran T C_ RR )
313	311, 312	syl 17	. . . . . 6 |- ( ph -> ran T C_ RR )
314		ressxr 10083	. . . . . 6 |- RR C_ RR*
315	313, 314	syl6ss 3615	. . . . 5 |- ( ph -> ran T C_ RR* )
316	101, 306	sylan2 491	. . . . . . 7 |- ( ( ph /\ n e. ( 1 ... L ) ) -> ( G ` n ) = ( vol* ` A ) )
317		1red 10055	. . . . . . . . . 10 |- ( ph -> 1 e. RR )
318		ffvelrn 6357	. . . . . . . . . . . . 13 |- ( ( J : NN --> ( NN X. NN ) /\ 1 e. NN ) -> ( J ` 1 ) e. ( NN X. NN ) )
319	23, 271, 318	sylancl 694	. . . . . . . . . . . 12 |- ( ph -> ( J ` 1 ) e. ( NN X. NN ) )
320		xp1st 7198	. . . . . . . . . . . 12 |- ( ( J ` 1 ) e. ( NN X. NN ) -> ( 1st ` ( J ` 1 ) ) e. NN )
321	319, 320	syl 17	. . . . . . . . . . 11 |- ( ph -> ( 1st ` ( J ` 1 ) ) e. NN )
322	321	nnred 11035	. . . . . . . . . 10 |- ( ph -> ( 1st ` ( J ` 1 ) ) e. RR )
323	153	zred 11482	. . . . . . . . . 10 |- ( ph -> L e. RR )
324	321	nnge1d 11063	. . . . . . . . . 10 |- ( ph -> 1 <_ ( 1st ` ( J ` 1 ) ) )
325		eluzfz1 12348	. . . . . . . . . . . 12 |- ( K e. ( ZZ>= ` 1 ) -> 1 e. ( 1 ... K ) )
326	78, 325	syl 17	. . . . . . . . . . 11 |- ( ph -> 1 e. ( 1 ... K ) )
327		fveq2 6191	. . . . . . . . . . . . . 14 |- ( w = 1 -> ( J ` w ) = ( J ` 1 ) )
328	327	fveq2d 6195	. . . . . . . . . . . . 13 |- ( w = 1 -> ( 1st ` ( J ` w ) ) = ( 1st ` ( J ` 1 ) ) )
329	328	breq1d 4663	. . . . . . . . . . . 12 |- ( w = 1 -> ( ( 1st ` ( J ` w ) ) <_ L <-> ( 1st ` ( J ` 1 ) ) <_ L ) )
330	329	rspcv 3305	. . . . . . . . . . 11 |- ( 1 e. ( 1 ... K ) -> ( A. w e. ( 1 ... K ) ( 1st ` ( J ` w ) ) <_ L -> ( 1st ` ( J ` 1 ) ) <_ L ) )
331	326, 143, 330	sylc 65	. . . . . . . . . 10 |- ( ph -> ( 1st ` ( J ` 1 ) ) <_ L )
332	317, 322, 323, 324, 331	letrd 10194	. . . . . . . . 9 |- ( ph -> 1 <_ L )
333		elnnz1 11403	. . . . . . . . 9 |- ( L e. NN <-> ( L e. ZZ /\ 1 <_ L ) )
334	153, 332, 333	sylanbrc 698	. . . . . . . 8 |- ( ph -> L e. NN )
335	334, 77	syl6eleq 2711	. . . . . . 7 |- ( ph -> L e. ( ZZ>= ` 1 ) )
336	316, 335, 298	fsumser 14461	. . . . . 6 |- ( ph -> sum_ n e. ( 1 ... L ) ( vol* ` A ) = ( seq 1 ( + , G ) ` L ) )
337		seqfn 12813	. . . . . . . . 9 |- ( 1 e. ZZ -> seq 1 ( + , G ) Fn ( ZZ>= ` 1 ) )
338	302, 337	syl 17	. . . . . . . 8 |- ( ph -> seq 1 ( + , G ) Fn ( ZZ>= ` 1 ) )
339		fnfvelrn 6356	. . . . . . . 8 |- ( ( seq 1 ( + , G ) Fn ( ZZ>= ` 1 ) /\ L e. ( ZZ>= ` 1 ) ) -> ( seq 1 ( + , G ) ` L ) e. ran seq 1 ( + , G ) )
340	338, 335, 339	syl2anc 693	. . . . . . 7 |- ( ph -> ( seq 1 ( + , G ) ` L ) e. ran seq 1 ( + , G ) )
341	309	rneqi 5352	. . . . . . 7 |- ran T = ran seq 1 ( + , G )
342	340, 341	syl6eleqr 2712	. . . . . 6 |- ( ph -> ( seq 1 ( + , G ) ` L ) e. ran T )
343	336, 342	eqeltrd 2701	. . . . 5 |- ( ph -> sum_ n e. ( 1 ... L ) ( vol* ` A ) e. ran T )
344		supxrub 12154	. . . . 5 |- ( ( ran T C_ RR* /\ sum_ n e. ( 1 ... L ) ( vol* ` A ) e. ran T ) -> sum_ n e. ( 1 ... L ) ( vol* ` A ) <_ sup ( ran T , RR* , < ) )
345	315, 343, 344	syl2anc 693	. . . 4 |- ( ph -> sum_ n e. ( 1 ... L ) ( vol* ` A ) <_ sup ( ran T , RR* , < ) )
346	106	recnd 10068	. . . . . 6 |- ( ph -> B e. CC )
347		geo2sum 14604	. . . . . 6 |- ( ( L e. NN /\ B e. CC ) -> sum_ n e. ( 1 ... L ) ( B / ( 2 ^ n ) ) = ( B - ( B / ( 2 ^ L ) ) ) )
348	334, 346, 347	syl2anc 693	. . . . 5 |- ( ph -> sum_ n e. ( 1 ... L ) ( B / ( 2 ^ n ) ) = ( B - ( B / ( 2 ^ L ) ) ) )
349	334	nnnn0d 11351	. . . . . . . . . 10 |- ( ph -> L e. NN0 )
350		nnexpcl 12873	. . . . . . . . . 10 |- ( ( 2 e. NN /\ L e. NN0 ) -> ( 2 ^ L ) e. NN )
351	107, 349, 350	sylancr 695	. . . . . . . . 9 |- ( ph -> ( 2 ^ L ) e. NN )
352	351	nnrpd 11870	. . . . . . . 8 |- ( ph -> ( 2 ^ L ) e. RR+ )
353	105, 352	rpdivcld 11889	. . . . . . 7 |- ( ph -> ( B / ( 2 ^ L ) ) e. RR+ )
354	353	rpge0d 11876	. . . . . 6 |- ( ph -> 0 <_ ( B / ( 2 ^ L ) ) )
355	106, 351	nndivred 11069	. . . . . . 7 |- ( ph -> ( B / ( 2 ^ L ) ) e. RR )
356	106, 355	subge02d 10619	. . . . . 6 |- ( ph -> ( 0 <_ ( B / ( 2 ^ L ) ) <-> ( B - ( B / ( 2 ^ L ) ) ) <_ B ) )
357	354, 356	mpbid 222	. . . . 5 |- ( ph -> ( B - ( B / ( 2 ^ L ) ) ) <_ B )
358	348, 357	eqbrtrd 4675	. . . 4 |- ( ph -> sum_ n e. ( 1 ... L ) ( B / ( 2 ^ n ) ) <_ B )
359	104, 114, 116, 106, 345, 358	le2addd 10646	. . 3 |- ( ph -> ( sum_ n e. ( 1 ... L ) ( vol* ` A ) + sum_ n e. ( 1 ... L ) ( B / ( 2 ^ n ) ) ) <_ ( sup ( ran T , RR* , < ) + B ) )
360	99, 115, 117, 301, 359	letrd 10194	. 2 |- ( ph -> sum_ j e. ( J " ( 1 ... K ) ) ( ( 2nd ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) - ( 1st ` ( ( F ` ( 1st ` j ) ) ` ( 2nd ` j ) ) ) ) <_ ( sup ( ran T , RR* , < ) + B ) )
361	93, 360	eqbrtrrd 4677	1 |- ( ph -> ( U ` K ) <_ ( sup ( ran T , RR* , < ) + B ) )

Syntax hints:   -> wi 4   <-> wb 196   /\ wa 384   = wceq 1483   e. wcel 1990   =/= wne 2794   A.wral 2912   E.wrex 2913   _Vcvv 3200   i^i cin 3573   C_ wss 3574   (/)c0 3915   {csn 4177   <.cop 4183   U.cuni 4436   U_ciun 4520   class class class wbr 4653   |-> cmpt 4729   X. cxp 5112   dom cdm 5114   ran crn 5115   |` cres 5116   "cima 5117   o. ccom 5118   Rel wrel 5119   Fn wfn 5883   -->wf 5884   -1-1->wf1 5885   -1-1-onto->wf1o 5887   ` cfv 5888  (class class class)co 6650   1stc1st 7166   2ndc2nd 7167   ^m cmap 7857   ~~ cen 7952   Fincfn 7955   supcsup 8346   CCcc 9934   RRcr 9935   0cc0 9936   1c1 9937   + caddc 9939   +oocpnf 10071   -oocmnf 10072   RR*cxr 10073   < clt 10074   <_ cle 10075   - cmin 10266   / cdiv 10684   NNcn 11020   2c2 11070   NN0cn0 11292   ZZcz 11377   ZZ>=cuz 11687   RR+crp 11832   (,)cioo 12175   [,)cico 12177   ...cfz 12326   seqcseq 12801   ^cexp 12860   abscabs 13974   ~~> cli 14215   sum_csu 14416   vol*covol 23231

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

This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3or 1038  df-3an 1039  df-tru 1486  df-fal 1489  df-ex 1705  df-nf 1710  df-sb 1881  df-eu 2474  df-mo 2475  df-clab 2609  df-cleq 2615  df-clel 2618  df-nfc 2753  df-ne 2795  df-nel 2898  df-ral 2917  df-rex 2918  df-reu 2919  df-rmo 2920  df-rab 2921  df-v 3202  df-sbc 3436  df-csb 3534  df-dif 3577  df-un 3579  df-in 3581  df-ss 3588  df-pss 3590  df-nul 3916  df-if 4087  df-pw 4160  df-sn 4178  df-pr 4180  df-tp 4182  df-op 4184  df-uni 4437  df-int 4476  df-iun 4522  df-br 4654  df-opab 4713  df-mpt 4730  df-tr 4753  df-id 5024  df-eprel 5029  df-po 5035  df-so 5036  df-fr 5073  df-se 5074  df-we 5075  df-xp 5120  df-rel 5121  df-cnv 5122  df-co 5123  df-dm 5124  df-rn 5125  df-res 5126  df-ima 5127  df-pred 5680  df-ord 5726  df-on 5727  df-lim 5728  df-suc 5729  df-iota 5851  df-fun 5890  df-fn 5891  df-f 5892  df-f1 5893  df-fo 5894  df-f1o 5895  df-fv 5896  df-isom 5897  df-riota 6611  df-ov 6653  df-oprab 6654  df-mpt2 6655  df-om 7066  df-1st 7168  df-2nd 7169  df-wrecs 7407  df-recs 7468  df-rdg 7506  df-1o 7560  df-oadd 7564  df-er 7742  df-map 7859  df-pm 7860  df-en 7956  df-dom 7957  df-sdom 7958  df-fin 7959  df-sup 8348  df-inf 8349  df-oi 8415  df-card 8765  df-pnf 10076  df-mnf 10077  df-xr 10078  df-ltxr 10079  df-le 10080  df-sub 10268  df-neg 10269  df-div 10685  df-nn 11021  df-2 11079  df-3 11080  df-n0 11293  df-z 11378  df-uz 11688  df-rp 11833  df-ioo 12179  df-ico 12181  df-fz 12327  df-fzo 12466  df-fl 12593  df-seq 12802  df-exp 12861  df-hash 13118  df-cj 13839  df-re 13840  df-im 13841  df-sqrt 13975  df-abs 13976  df-clim 14219  df-rlim 14220  df-sum 14417  df-ovol 23233

This theorem is referenced by:  ovoliunlem2  23271