Theorem jensenlem2 22356

Description: Lemma for jensen 22357. (Contributed by Mario Carneiro, 21-Jun-2015.)

Hypotheses

Ref	Expression
jensen.1	|- ( ph -> D C_ RR )
jensen.2	|- ( ph -> F : D --> RR )
jensen.3	|- ( ( ph /\ ( a e. D /\ b e. D ) ) -> ( a [,] b ) C_ D )
jensen.4	|- ( ph -> A e. Fin )
jensen.5	|- ( ph -> T : A --> ( 0 [,) +oo ) )
jensen.6	|- ( ph -> X : A --> D )
jensen.7	|- ( ph -> 0 < (ℂfld gsumg T ) )
jensen.8	|- ( ( ph /\ ( x e. D /\ y e. D /\ t e. ( 0 [,] 1 ) ) ) -> ( F ` ( ( t x. x ) + ( ( 1 - t ) x. y ) ) ) <_ ( ( t x. ( F ` x ) ) + ( ( 1 - t ) x. ( F ` y ) ) ) )
jensenlem.1	|- ( ph -> -. z e. B )
jensenlem.2	|- ( ph -> ( B u. { z } ) C_ A )
jensenlem.s	|- S = (ℂfld gsumg ( T |` B ) )
jensenlem.l	|- L = (ℂfld gsumg ( T |` ( B u. { z } ) ) )
jensenlem.3	|- ( ph -> S e. RR+ )
jensenlem.4	|- ( ph -> ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) e. D )
jensenlem.5	|- ( ph -> ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) <_ ( (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` B ) ) / S ) )

Assertion

Ref	Expression
jensenlem2	|- ( ph -> ( ( (ℂfld gsumg ( ( T oF x. X ) |` ( B u. { z } ) ) ) / L ) e. D /\ ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` ( B u. { z } ) ) ) / L ) ) <_ ( (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` ( B u. { z } ) ) ) / L ) ) )

Distinct variable groups:   a, b, t, x, y, A   D, a, b, t, x, y   ph, a, b, t, x, y   F, a, b, t, x, y   T, a, b, t, x, y   X, a, b, t, x, y   z, a, B, b, t, x, y   t, L, x, y   S, a, b, t, x, y

Allowed substitution hints:   ph( z)   A( z)   D( z)   S( z)   T( z)   F( z)   L( z, a, b)   X( z)

Proof of Theorem jensenlem2

Step	Hyp	Ref	Expression
1		cnfld0 17815	. . . . . . 7 |- 0 = ( 0g ` ℂfld )
2		cnrng 17813	. . . . . . . 8 |- ℂfld e. Ring
3		rngabl 16662	. . . . . . . 8 |- (ℂfld e. Ring -> ℂfld e. Abel )
4	2, 3	mp1i 12	. . . . . . 7 |- ( ph -> ℂfld e. Abel )
5		jensen.4	. . . . . . . 8 |- ( ph -> A e. Fin )
6		jensenlem.2	. . . . . . . . 9 |- ( ph -> ( B u. { z } ) C_ A )
7	6	unssad 3528	. . . . . . . 8 |- ( ph -> B C_ A )
8		ssfi 7525	. . . . . . . 8 |- ( ( A e. Fin /\ B C_ A ) -> B e. Fin )
9	5, 7, 8	syl2anc 661	. . . . . . 7 |- ( ph -> B e. Fin )
10		resubdrg 18013	. . . . . . . . 9 |- ( RR e. (SubRing ` ℂfld ) /\ RRfld e. DivRing )
11	10	simpli 458	. . . . . . . 8 |- RR e. (SubRing ` ℂfld )
12		subrgsubg 16849	. . . . . . . 8 |- ( RR e. (SubRing ` ℂfld ) -> RR e. (SubGrp ` ℂfld ) )
13	11, 12	mp1i 12	. . . . . . 7 |- ( ph -> RR e. (SubGrp ` ℂfld ) )
14		remulcl 9359	. . . . . . . . . 10 |- ( ( x e. RR /\ y e. RR ) -> ( x x. y ) e. RR )
15	14	adantl 466	. . . . . . . . 9 |- ( ( ph /\ ( x e. RR /\ y e. RR ) ) -> ( x x. y ) e. RR )
16		jensen.5	. . . . . . . . . 10 |- ( ph -> T : A --> ( 0 [,) +oo ) )
17		0re 9378	. . . . . . . . . . 11 |- 0 e. RR
18		pnfxr 11084	. . . . . . . . . . 11 |- +oo e. RR*
19		icossre 11368	. . . . . . . . . . 11 |- ( ( 0 e. RR /\ +oo e. RR* ) -> ( 0 [,) +oo ) C_ RR )
20	17, 18, 19	mp2an 672	. . . . . . . . . 10 |- ( 0 [,) +oo ) C_ RR
21		fss 5562	. . . . . . . . . 10 |- ( ( T : A --> ( 0 [,) +oo ) /\ ( 0 [,) +oo ) C_ RR ) -> T : A --> RR )
22	16, 20, 21	sylancl 662	. . . . . . . . 9 |- ( ph -> T : A --> RR )
23		jensen.6	. . . . . . . . . 10 |- ( ph -> X : A --> D )
24		jensen.1	. . . . . . . . . 10 |- ( ph -> D C_ RR )
25		fss 5562	. . . . . . . . . 10 |- ( ( X : A --> D /\ D C_ RR ) -> X : A --> RR )
26	23, 24, 25	syl2anc 661	. . . . . . . . 9 |- ( ph -> X : A --> RR )
27		inidm 3554	. . . . . . . . 9 |- ( A i^i A ) = A
28	15, 22, 26, 5, 5, 27	off 6329	. . . . . . . 8 |- ( ph -> ( T oF x. X ) : A --> RR )
29		fssres 5573	. . . . . . . 8 |- ( ( ( T oF x. X ) : A --> RR /\ B C_ A ) -> ( ( T oF x. X ) |` B ) : B --> RR )
30	28, 7, 29	syl2anc 661	. . . . . . 7 |- ( ph -> ( ( T oF x. X ) |` B ) : B --> RR )
31		c0ex 9372	. . . . . . . . 9 |- 0 e. _V
32	31	a1i 11	. . . . . . . 8 |- ( ph -> 0 e. _V )
33	30, 9, 32	fdmfifsupp 7622	. . . . . . 7 |- ( ph -> ( ( T oF x. X ) |` B ) finSupp 0 )
34	1, 4, 9, 13, 30, 33	gsumsubgcl 16397	. . . . . 6 |- ( ph -> (ℂfld gsumg ( ( T oF x. X ) |` B ) ) e. RR )
35	34	recnd 9404	. . . . 5 |- ( ph -> (ℂfld gsumg ( ( T oF x. X ) |` B ) ) e. CC )
36		ax-resscn 9331	. . . . . . . 8 |- RR C_ CC
37	20, 36	sstri 3360	. . . . . . 7 |- ( 0 [,) +oo ) C_ CC
38	6	unssbd 3529	. . . . . . . . 9 |- ( ph -> { z } C_ A )
39		vex 2970	. . . . . . . . . 10 |- z e. _V
40	39	snss 3994	. . . . . . . . 9 |- ( z e. A <-> { z } C_ A )
41	38, 40	sylibr 212	. . . . . . . 8 |- ( ph -> z e. A )
42	16, 41	ffvelrnd 5839	. . . . . . 7 |- ( ph -> ( T ` z ) e. ( 0 [,) +oo ) )
43	37, 42	sseldi 3349	. . . . . 6 |- ( ph -> ( T ` z ) e. CC )
44	23, 41	ffvelrnd 5839	. . . . . . . 8 |- ( ph -> ( X ` z ) e. D )
45	24, 44	sseldd 3352	. . . . . . 7 |- ( ph -> ( X ` z ) e. RR )
46	45	recnd 9404	. . . . . 6 |- ( ph -> ( X ` z ) e. CC )
47	43, 46	mulcld 9398	. . . . 5 |- ( ph -> ( ( T ` z ) x. ( X ` z ) ) e. CC )
48		jensen.2	. . . . . . . 8 |- ( ph -> F : D --> RR )
49		jensen.3	. . . . . . . 8 |- ( ( ph /\ ( a e. D /\ b e. D ) ) -> ( a [,] b ) C_ D )
50		jensen.7	. . . . . . . 8 |- ( ph -> 0 < (ℂfld gsumg T ) )
51		jensen.8	. . . . . . . 8 |- ( ( ph /\ ( x e. D /\ y e. D /\ t e. ( 0 [,] 1 ) ) ) -> ( F ` ( ( t x. x ) + ( ( 1 - t ) x. y ) ) ) <_ ( ( t x. ( F ` x ) ) + ( ( 1 - t ) x. ( F ` y ) ) ) )
52		jensenlem.1	. . . . . . . 8 |- ( ph -> -. z e. B )
53		jensenlem.s	. . . . . . . 8 |- S = (ℂfld gsumg ( T |` B ) )
54		jensenlem.l	. . . . . . . 8 |- L = (ℂfld gsumg ( T |` ( B u. { z } ) ) )
55	24, 48, 49, 5, 16, 23, 50, 51, 52, 6, 53, 54	jensenlem1 22355	. . . . . . 7 |- ( ph -> L = ( S + ( T ` z ) ) )
56		jensenlem.3	. . . . . . . . 9 |- ( ph -> S e. RR+ )
57	56	rpred 11019	. . . . . . . 8 |- ( ph -> S e. RR )
58		elrege0 11384	. . . . . . . . . 10 |- ( ( T ` z ) e. ( 0 [,) +oo ) <-> ( ( T ` z ) e. RR /\ 0 <_ ( T ` z ) ) )
59	58	simplbi 460	. . . . . . . . 9 |- ( ( T ` z ) e. ( 0 [,) +oo ) -> ( T ` z ) e. RR )
60	42, 59	syl 16	. . . . . . . 8 |- ( ph -> ( T ` z ) e. RR )
61	57, 60	readdcld 9405	. . . . . . 7 |- ( ph -> ( S + ( T ` z ) ) e. RR )
62	55, 61	eqeltrd 2512	. . . . . 6 |- ( ph -> L e. RR )
63	62	recnd 9404	. . . . 5 |- ( ph -> L e. CC )
64		0red 9379	. . . . . . 7 |- ( ph -> 0 e. RR )
65	56	rpgt0d 11022	. . . . . . 7 |- ( ph -> 0 < S )
66	58	simprbi 464	. . . . . . . . . 10 |- ( ( T ` z ) e. ( 0 [,) +oo ) -> 0 <_ ( T ` z ) )
67	42, 66	syl 16	. . . . . . . . 9 |- ( ph -> 0 <_ ( T ` z ) )
68	57, 60	addge01d 9919	. . . . . . . . 9 |- ( ph -> ( 0 <_ ( T ` z ) <-> S <_ ( S + ( T ` z ) ) ) )
69	67, 68	mpbid 210	. . . . . . . 8 |- ( ph -> S <_ ( S + ( T ` z ) ) )
70	69, 55	breqtrrd 4313	. . . . . . 7 |- ( ph -> S <_ L )
71	64, 57, 62, 65, 70	ltletrd 9523	. . . . . 6 |- ( ph -> 0 < L )
72	71	gt0ne0d 9896	. . . . 5 |- ( ph -> L =/= 0 )
73	35, 47, 63, 72	divdird 10137	. . . 4 |- ( ph -> ( ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) + ( ( T ` z ) x. ( X ` z ) ) ) / L ) = ( ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / L ) + ( ( ( T ` z ) x. ( X ` z ) ) / L ) ) )
74		cnfldbas 17797	. . . . . . 7 |- CC = ( Base ` ℂfld )
75		cnfldadd 17798	. . . . . . 7 |- + = ( +g ` ℂfld )
76		rngcmn 16663	. . . . . . . 8 |- (ℂfld e. Ring -> ℂfld e. CMnd )
77	2, 76	mp1i 12	. . . . . . 7 |- ( ph -> ℂfld e. CMnd )
78	7	sselda 3351	. . . . . . . . . 10 |- ( ( ph /\ x e. B ) -> x e. A )
79	16	ffvelrnda 5838	. . . . . . . . . 10 |- ( ( ph /\ x e. A ) -> ( T ` x ) e. ( 0 [,) +oo ) )
80	78, 79	syldan 470	. . . . . . . . 9 |- ( ( ph /\ x e. B ) -> ( T ` x ) e. ( 0 [,) +oo ) )
81	37, 80	sseldi 3349	. . . . . . . 8 |- ( ( ph /\ x e. B ) -> ( T ` x ) e. CC )
82	24	adantr 465	. . . . . . . . . 10 |- ( ( ph /\ x e. B ) -> D C_ RR )
83	23	ffvelrnda 5838	. . . . . . . . . . 11 |- ( ( ph /\ x e. A ) -> ( X ` x ) e. D )
84	78, 83	syldan 470	. . . . . . . . . 10 |- ( ( ph /\ x e. B ) -> ( X ` x ) e. D )
85	82, 84	sseldd 3352	. . . . . . . . 9 |- ( ( ph /\ x e. B ) -> ( X ` x ) e. RR )
86	85	recnd 9404	. . . . . . . 8 |- ( ( ph /\ x e. B ) -> ( X ` x ) e. CC )
87	81, 86	mulcld 9398	. . . . . . 7 |- ( ( ph /\ x e. B ) -> ( ( T ` x ) x. ( X ` x ) ) e. CC )
88		fveq2 5686	. . . . . . . 8 |- ( x = z -> ( T ` x ) = ( T ` z ) )
89		fveq2 5686	. . . . . . . 8 |- ( x = z -> ( X ` x ) = ( X ` z ) )
90	88, 89	oveq12d 6104	. . . . . . 7 |- ( x = z -> ( ( T ` x ) x. ( X ` x ) ) = ( ( T ` z ) x. ( X ` z ) ) )
91	74, 75, 77, 9, 87, 41, 52, 47, 90	gsumunsn 16442	. . . . . 6 |- ( ph -> (ℂfld gsumg ( x e. ( B u. { z } ) |-> ( ( T ` x ) x. ( X ` x ) ) ) ) = ( (ℂfld gsumg ( x e. B |-> ( ( T ` x ) x. ( X ` x ) ) ) ) + ( ( T ` z ) x. ( X ` z ) ) ) )
92	16	feqmptd 5739	. . . . . . . . . 10 |- ( ph -> T = ( x e. A |-> ( T ` x ) ) )
93	23	feqmptd 5739	. . . . . . . . . 10 |- ( ph -> X = ( x e. A |-> ( X ` x ) ) )
94	5, 79, 83, 92, 93	offval2 6331	. . . . . . . . 9 |- ( ph -> ( T oF x. X ) = ( x e. A |-> ( ( T ` x ) x. ( X ` x ) ) ) )
95	94	reseq1d 5104	. . . . . . . 8 |- ( ph -> ( ( T oF x. X ) |` ( B u. { z } ) ) = ( ( x e. A |-> ( ( T ` x ) x. ( X ` x ) ) ) |` ( B u. { z } ) ) )
96		resmpt 5151	. . . . . . . . 9 |- ( ( B u. { z } ) C_ A -> ( ( x e. A |-> ( ( T ` x ) x. ( X ` x ) ) ) |` ( B u. { z } ) ) = ( x e. ( B u. { z } ) |-> ( ( T ` x ) x. ( X ` x ) ) ) )
97	6, 96	syl 16	. . . . . . . 8 |- ( ph -> ( ( x e. A |-> ( ( T ` x ) x. ( X ` x ) ) ) |` ( B u. { z } ) ) = ( x e. ( B u. { z } ) |-> ( ( T ` x ) x. ( X ` x ) ) ) )
98	95, 97	eqtrd 2470	. . . . . . 7 |- ( ph -> ( ( T oF x. X ) |` ( B u. { z } ) ) = ( x e. ( B u. { z } ) |-> ( ( T ` x ) x. ( X ` x ) ) ) )
99	98	oveq2d 6102	. . . . . 6 |- ( ph -> (ℂfld gsumg ( ( T oF x. X ) |` ( B u. { z } ) ) ) = (ℂfld gsumg ( x e. ( B u. { z } ) |-> ( ( T ` x ) x. ( X ` x ) ) ) ) )
100	94	reseq1d 5104	. . . . . . . . 9 |- ( ph -> ( ( T oF x. X ) |` B ) = ( ( x e. A |-> ( ( T ` x ) x. ( X ` x ) ) ) |` B ) )
101		resmpt 5151	. . . . . . . . . 10 |- ( B C_ A -> ( ( x e. A |-> ( ( T ` x ) x. ( X ` x ) ) ) |` B ) = ( x e. B |-> ( ( T ` x ) x. ( X ` x ) ) ) )
102	7, 101	syl 16	. . . . . . . . 9 |- ( ph -> ( ( x e. A |-> ( ( T ` x ) x. ( X ` x ) ) ) |` B ) = ( x e. B |-> ( ( T ` x ) x. ( X ` x ) ) ) )
103	100, 102	eqtrd 2470	. . . . . . . 8 |- ( ph -> ( ( T oF x. X ) |` B ) = ( x e. B |-> ( ( T ` x ) x. ( X ` x ) ) ) )
104	103	oveq2d 6102	. . . . . . 7 |- ( ph -> (ℂfld gsumg ( ( T oF x. X ) |` B ) ) = (ℂfld gsumg ( x e. B |-> ( ( T ` x ) x. ( X ` x ) ) ) ) )
105	104	oveq1d 6101	. . . . . 6 |- ( ph -> ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) + ( ( T ` z ) x. ( X ` z ) ) ) = ( (ℂfld gsumg ( x e. B |-> ( ( T ` x ) x. ( X ` x ) ) ) ) + ( ( T ` z ) x. ( X ` z ) ) ) )
106	91, 99, 105	3eqtr4d 2480	. . . . 5 |- ( ph -> (ℂfld gsumg ( ( T oF x. X ) |` ( B u. { z } ) ) ) = ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) + ( ( T ` z ) x. ( X ` z ) ) ) )
107	106	oveq1d 6101	. . . 4 |- ( ph -> ( (ℂfld gsumg ( ( T oF x. X ) |` ( B u. { z } ) ) ) / L ) = ( ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) + ( ( T ` z ) x. ( X ` z ) ) ) / L ) )
108	57	recnd 9404	. . . . . 6 |- ( ph -> S e. CC )
109	56	rpne0d 11024	. . . . . 6 |- ( ph -> S =/= 0 )
110	35, 108, 63, 109, 72	dmdcand 10128	. . . . 5 |- ( ph -> ( ( S / L ) x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) = ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / L ) )
111	63, 108, 63, 72	divsubdird 10138	. . . . . . . 8 |- ( ph -> ( ( L - S ) / L ) = ( ( L / L ) - ( S / L ) ) )
112	55	oveq1d 6101	. . . . . . . . . 10 |- ( ph -> ( L - S ) = ( ( S + ( T ` z ) ) - S ) )
113	108, 43	pncan2d 9713	. . . . . . . . . 10 |- ( ph -> ( ( S + ( T ` z ) ) - S ) = ( T ` z ) )
114	112, 113	eqtrd 2470	. . . . . . . . 9 |- ( ph -> ( L - S ) = ( T ` z ) )
115	114	oveq1d 6101	. . . . . . . 8 |- ( ph -> ( ( L - S ) / L ) = ( ( T ` z ) / L ) )
116	63, 72	dividd 10097	. . . . . . . . 9 |- ( ph -> ( L / L ) = 1 )
117	116	oveq1d 6101	. . . . . . . 8 |- ( ph -> ( ( L / L ) - ( S / L ) ) = ( 1 - ( S / L ) ) )
118	111, 115, 117	3eqtr3rd 2479	. . . . . . 7 |- ( ph -> ( 1 - ( S / L ) ) = ( ( T ` z ) / L ) )
119	118	oveq1d 6101	. . . . . 6 |- ( ph -> ( ( 1 - ( S / L ) ) x. ( X ` z ) ) = ( ( ( T ` z ) / L ) x. ( X ` z ) ) )
120	43, 46, 63, 72	div23d 10136	. . . . . 6 |- ( ph -> ( ( ( T ` z ) x. ( X ` z ) ) / L ) = ( ( ( T ` z ) / L ) x. ( X ` z ) ) )
121	119, 120	eqtr4d 2473	. . . . 5 |- ( ph -> ( ( 1 - ( S / L ) ) x. ( X ` z ) ) = ( ( ( T ` z ) x. ( X ` z ) ) / L ) )
122	110, 121	oveq12d 6104	. . . 4 |- ( ph -> ( ( ( S / L ) x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) + ( ( 1 - ( S / L ) ) x. ( X ` z ) ) ) = ( ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / L ) + ( ( ( T ` z ) x. ( X ` z ) ) / L ) ) )
123	73, 107, 122	3eqtr4d 2480	. . 3 |- ( ph -> ( (ℂfld gsumg ( ( T oF x. X ) |` ( B u. { z } ) ) ) / L ) = ( ( ( S / L ) x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) + ( ( 1 - ( S / L ) ) x. ( X ` z ) ) ) )
124		jensenlem.4	. . . . 5 |- ( ph -> ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) e. D )
125	57, 62, 72	redivcld 10151	. . . . . 6 |- ( ph -> ( S / L ) e. RR )
126	56	rpge0d 11023	. . . . . . 7 |- ( ph -> 0 <_ S )
127		divge0 10190	. . . . . . 7 |- ( ( ( S e. RR /\ 0 <_ S ) /\ ( L e. RR /\ 0 < L ) ) -> 0 <_ ( S / L ) )
128	57, 126, 62, 71, 127	syl22anc 1219	. . . . . 6 |- ( ph -> 0 <_ ( S / L ) )
129	63	mulid1d 9395	. . . . . . . 8 |- ( ph -> ( L x. 1 ) = L )
130	70, 129	breqtrrd 4313	. . . . . . 7 |- ( ph -> S <_ ( L x. 1 ) )
131		1red 9393	. . . . . . . 8 |- ( ph -> 1 e. RR )
132		ledivmul 10197	. . . . . . . 8 |- ( ( S e. RR /\ 1 e. RR /\ ( L e. RR /\ 0 < L ) ) -> ( ( S / L ) <_ 1 <-> S <_ ( L x. 1 ) ) )
133	57, 131, 62, 71, 132	syl112anc 1222	. . . . . . 7 |- ( ph -> ( ( S / L ) <_ 1 <-> S <_ ( L x. 1 ) ) )
134	130, 133	mpbird 232	. . . . . 6 |- ( ph -> ( S / L ) <_ 1 )
135		1re 9377	. . . . . . 7 |- 1 e. RR
136	17, 135	elicc2i 11353	. . . . . 6 |- ( ( S / L ) e. ( 0 [,] 1 ) <-> ( ( S / L ) e. RR /\ 0 <_ ( S / L ) /\ ( S / L ) <_ 1 ) )
137	125, 128, 134, 136	syl3anbrc 1172	. . . . 5 |- ( ph -> ( S / L ) e. ( 0 [,] 1 ) )
138	124, 44, 137	3jca 1168	. . . 4 |- ( ph -> ( ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) e. D /\ ( X ` z ) e. D /\ ( S / L ) e. ( 0 [,] 1 ) ) )
139	24, 49	cvxcl 22353	. . . 4 |- ( ( ph /\ ( ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) e. D /\ ( X ` z ) e. D /\ ( S / L ) e. ( 0 [,] 1 ) ) ) -> ( ( ( S / L ) x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) + ( ( 1 - ( S / L ) ) x. ( X ` z ) ) ) e. D )
140	138, 139	mpdan 668	. . 3 |- ( ph -> ( ( ( S / L ) x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) + ( ( 1 - ( S / L ) ) x. ( X ` z ) ) ) e. D )
141	123, 140	eqeltrd 2512	. 2 |- ( ph -> ( (ℂfld gsumg ( ( T oF x. X ) |` ( B u. { z } ) ) ) / L ) e. D )
142	48, 140	ffvelrnd 5839	. . . 4 |- ( ph -> ( F ` ( ( ( S / L ) x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) + ( ( 1 - ( S / L ) ) x. ( X ` z ) ) ) ) e. RR )
143	48, 124	ffvelrnd 5839	. . . . . 6 |- ( ph -> ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) e. RR )
144	125, 143	remulcld 9406	. . . . 5 |- ( ph -> ( ( S / L ) x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) e. RR )
145	48, 44	ffvelrnd 5839	. . . . . . 7 |- ( ph -> ( F ` ( X ` z ) ) e. RR )
146	60, 145	remulcld 9406	. . . . . 6 |- ( ph -> ( ( T ` z ) x. ( F ` ( X ` z ) ) ) e. RR )
147	146, 62, 72	redivcld 10151	. . . . 5 |- ( ph -> ( ( ( T ` z ) x. ( F ` ( X ` z ) ) ) / L ) e. RR )
148	144, 147	readdcld 9405	. . . 4 |- ( ph -> ( ( ( S / L ) x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) + ( ( ( T ` z ) x. ( F ` ( X ` z ) ) ) / L ) ) e. RR )
149		fco 5563	. . . . . . . . . . 11 |- ( ( F : D --> RR /\ X : A --> D ) -> ( F o. X ) : A --> RR )
150	48, 23, 149	syl2anc 661	. . . . . . . . . 10 |- ( ph -> ( F o. X ) : A --> RR )
151	15, 22, 150, 5, 5, 27	off 6329	. . . . . . . . 9 |- ( ph -> ( T oF x. ( F o. X ) ) : A --> RR )
152		fssres 5573	. . . . . . . . 9 |- ( ( ( T oF x. ( F o. X ) ) : A --> RR /\ B C_ A ) -> ( ( T oF x. ( F o. X ) ) |` B ) : B --> RR )
153	151, 7, 152	syl2anc 661	. . . . . . . 8 |- ( ph -> ( ( T oF x. ( F o. X ) ) |` B ) : B --> RR )
154	153, 9, 32	fdmfifsupp 7622	. . . . . . . 8 |- ( ph -> ( ( T oF x. ( F o. X ) ) |` B ) finSupp 0 )
155	1, 4, 9, 13, 153, 154	gsumsubgcl 16397	. . . . . . 7 |- ( ph -> (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` B ) ) e. RR )
156	155, 57, 109	redivcld 10151	. . . . . 6 |- ( ph -> ( (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` B ) ) / S ) e. RR )
157	125, 156	remulcld 9406	. . . . 5 |- ( ph -> ( ( S / L ) x. ( (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` B ) ) / S ) ) e. RR )
158		resubcl 9665	. . . . . . 7 |- ( ( 1 e. RR /\ ( S / L ) e. RR ) -> ( 1 - ( S / L ) ) e. RR )
159	135, 125, 158	sylancr 663	. . . . . 6 |- ( ph -> ( 1 - ( S / L ) ) e. RR )
160	159, 145	remulcld 9406	. . . . 5 |- ( ph -> ( ( 1 - ( S / L ) ) x. ( F ` ( X ` z ) ) ) e. RR )
161	157, 160	readdcld 9405	. . . 4 |- ( ph -> ( ( ( S / L ) x. ( (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` B ) ) / S ) ) + ( ( 1 - ( S / L ) ) x. ( F ` ( X ` z ) ) ) ) e. RR )
162		oveq2 6094	. . . . . . . . . . . 12 |- ( x = ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) -> ( t x. x ) = ( t x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) )
163	162	oveq1d 6101	. . . . . . . . . . 11 |- ( x = ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) -> ( ( t x. x ) + ( ( 1 - t ) x. y ) ) = ( ( t x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) + ( ( 1 - t ) x. y ) ) )
164	163	fveq2d 5690	. . . . . . . . . 10 |- ( x = ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) -> ( F ` ( ( t x. x ) + ( ( 1 - t ) x. y ) ) ) = ( F ` ( ( t x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) + ( ( 1 - t ) x. y ) ) ) )
165		fveq2 5686	. . . . . . . . . . . 12 |- ( x = ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) -> ( F ` x ) = ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) )
166	165	oveq2d 6102	. . . . . . . . . . 11 |- ( x = ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) -> ( t x. ( F ` x ) ) = ( t x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) )
167	166	oveq1d 6101	. . . . . . . . . 10 |- ( x = ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) -> ( ( t x. ( F ` x ) ) + ( ( 1 - t ) x. ( F ` y ) ) ) = ( ( t x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) + ( ( 1 - t ) x. ( F ` y ) ) ) )
168	164, 167	breq12d 4300	. . . . . . . . 9 |- ( x = ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) -> ( ( F ` ( ( t x. x ) + ( ( 1 - t ) x. y ) ) ) <_ ( ( t x. ( F ` x ) ) + ( ( 1 - t ) x. ( F ` y ) ) ) <-> ( F ` ( ( t x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) + ( ( 1 - t ) x. y ) ) ) <_ ( ( t x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) + ( ( 1 - t ) x. ( F ` y ) ) ) ) )
169	168	imbi2d 316	. . . . . . . 8 |- ( x = ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) -> ( ( ph -> ( F ` ( ( t x. x ) + ( ( 1 - t ) x. y ) ) ) <_ ( ( t x. ( F ` x ) ) + ( ( 1 - t ) x. ( F ` y ) ) ) ) <-> ( ph -> ( F ` ( ( t x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) + ( ( 1 - t ) x. y ) ) ) <_ ( ( t x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) + ( ( 1 - t ) x. ( F ` y ) ) ) ) ) )
170		oveq2 6094	. . . . . . . . . . . 12 |- ( y = ( X ` z ) -> ( ( 1 - t ) x. y ) = ( ( 1 - t ) x. ( X ` z ) ) )
171	170	oveq2d 6102	. . . . . . . . . . 11 |- ( y = ( X ` z ) -> ( ( t x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) + ( ( 1 - t ) x. y ) ) = ( ( t x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) + ( ( 1 - t ) x. ( X ` z ) ) ) )
172	171	fveq2d 5690	. . . . . . . . . 10 |- ( y = ( X ` z ) -> ( F ` ( ( t x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) + ( ( 1 - t ) x. y ) ) ) = ( F ` ( ( t x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) + ( ( 1 - t ) x. ( X ` z ) ) ) ) )
173		fveq2 5686	. . . . . . . . . . . 12 |- ( y = ( X ` z ) -> ( F ` y ) = ( F ` ( X ` z ) ) )
174	173	oveq2d 6102	. . . . . . . . . . 11 |- ( y = ( X ` z ) -> ( ( 1 - t ) x. ( F ` y ) ) = ( ( 1 - t ) x. ( F ` ( X ` z ) ) ) )
175	174	oveq2d 6102	. . . . . . . . . 10 |- ( y = ( X ` z ) -> ( ( t x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) + ( ( 1 - t ) x. ( F ` y ) ) ) = ( ( t x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) + ( ( 1 - t ) x. ( F ` ( X ` z ) ) ) ) )
176	172, 175	breq12d 4300	. . . . . . . . 9 |- ( y = ( X ` z ) -> ( ( F ` ( ( t x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) + ( ( 1 - t ) x. y ) ) ) <_ ( ( t x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) + ( ( 1 - t ) x. ( F ` y ) ) ) <-> ( F ` ( ( t x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) + ( ( 1 - t ) x. ( X ` z ) ) ) ) <_ ( ( t x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) + ( ( 1 - t ) x. ( F ` ( X ` z ) ) ) ) ) )
177	176	imbi2d 316	. . . . . . . 8 |- ( y = ( X ` z ) -> ( ( ph -> ( F ` ( ( t x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) + ( ( 1 - t ) x. y ) ) ) <_ ( ( t x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) + ( ( 1 - t ) x. ( F ` y ) ) ) ) <-> ( ph -> ( F ` ( ( t x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) + ( ( 1 - t ) x. ( X ` z ) ) ) ) <_ ( ( t x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) + ( ( 1 - t ) x. ( F ` ( X ` z ) ) ) ) ) ) )
178		oveq1 6093	. . . . . . . . . . . 12 |- ( t = ( S / L ) -> ( t x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) = ( ( S / L ) x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) )
179		oveq2 6094	. . . . . . . . . . . . 13 |- ( t = ( S / L ) -> ( 1 - t ) = ( 1 - ( S / L ) ) )
180	179	oveq1d 6101	. . . . . . . . . . . 12 |- ( t = ( S / L ) -> ( ( 1 - t ) x. ( X ` z ) ) = ( ( 1 - ( S / L ) ) x. ( X ` z ) ) )
181	178, 180	oveq12d 6104	. . . . . . . . . . 11 |- ( t = ( S / L ) -> ( ( t x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) + ( ( 1 - t ) x. ( X ` z ) ) ) = ( ( ( S / L ) x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) + ( ( 1 - ( S / L ) ) x. ( X ` z ) ) ) )
182	181	fveq2d 5690	. . . . . . . . . 10 |- ( t = ( S / L ) -> ( F ` ( ( t x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) + ( ( 1 - t ) x. ( X ` z ) ) ) ) = ( F ` ( ( ( S / L ) x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) + ( ( 1 - ( S / L ) ) x. ( X ` z ) ) ) ) )
183		oveq1 6093	. . . . . . . . . . 11 |- ( t = ( S / L ) -> ( t x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) = ( ( S / L ) x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) )
184	179	oveq1d 6101	. . . . . . . . . . 11 |- ( t = ( S / L ) -> ( ( 1 - t ) x. ( F ` ( X ` z ) ) ) = ( ( 1 - ( S / L ) ) x. ( F ` ( X ` z ) ) ) )
185	183, 184	oveq12d 6104	. . . . . . . . . 10 |- ( t = ( S / L ) -> ( ( t x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) + ( ( 1 - t ) x. ( F ` ( X ` z ) ) ) ) = ( ( ( S / L ) x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) + ( ( 1 - ( S / L ) ) x. ( F ` ( X ` z ) ) ) ) )
186	182, 185	breq12d 4300	. . . . . . . . 9 |- ( t = ( S / L ) -> ( ( F ` ( ( t x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) + ( ( 1 - t ) x. ( X ` z ) ) ) ) <_ ( ( t x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) + ( ( 1 - t ) x. ( F ` ( X ` z ) ) ) ) <-> ( F ` ( ( ( S / L ) x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) + ( ( 1 - ( S / L ) ) x. ( X ` z ) ) ) ) <_ ( ( ( S / L ) x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) + ( ( 1 - ( S / L ) ) x. ( F ` ( X ` z ) ) ) ) ) )
187	186	imbi2d 316	. . . . . . . 8 |- ( t = ( S / L ) -> ( ( ph -> ( F ` ( ( t x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) + ( ( 1 - t ) x. ( X ` z ) ) ) ) <_ ( ( t x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) + ( ( 1 - t ) x. ( F ` ( X ` z ) ) ) ) ) <-> ( ph -> ( F ` ( ( ( S / L ) x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) + ( ( 1 - ( S / L ) ) x. ( X ` z ) ) ) ) <_ ( ( ( S / L ) x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) + ( ( 1 - ( S / L ) ) x. ( F ` ( X ` z ) ) ) ) ) ) )
188	51	expcom 435	. . . . . . . 8 |- ( ( x e. D /\ y e. D /\ t e. ( 0 [,] 1 ) ) -> ( ph -> ( F ` ( ( t x. x ) + ( ( 1 - t ) x. y ) ) ) <_ ( ( t x. ( F ` x ) ) + ( ( 1 - t ) x. ( F ` y ) ) ) ) )
189	169, 177, 187, 188	vtocl3ga 3035	. . . . . . 7 |- ( ( ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) e. D /\ ( X ` z ) e. D /\ ( S / L ) e. ( 0 [,] 1 ) ) -> ( ph -> ( F ` ( ( ( S / L ) x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) + ( ( 1 - ( S / L ) ) x. ( X ` z ) ) ) ) <_ ( ( ( S / L ) x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) + ( ( 1 - ( S / L ) ) x. ( F ` ( X ` z ) ) ) ) ) )
190	124, 44, 137, 189	syl3anc 1218	. . . . . 6 |- ( ph -> ( ph -> ( F ` ( ( ( S / L ) x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) + ( ( 1 - ( S / L ) ) x. ( X ` z ) ) ) ) <_ ( ( ( S / L ) x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) + ( ( 1 - ( S / L ) ) x. ( F ` ( X ` z ) ) ) ) ) )
191	190	pm2.43i 47	. . . . 5 |- ( ph -> ( F ` ( ( ( S / L ) x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) + ( ( 1 - ( S / L ) ) x. ( X ` z ) ) ) ) <_ ( ( ( S / L ) x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) + ( ( 1 - ( S / L ) ) x. ( F ` ( X ` z ) ) ) ) )
192	118	oveq1d 6101	. . . . . . 7 |- ( ph -> ( ( 1 - ( S / L ) ) x. ( F ` ( X ` z ) ) ) = ( ( ( T ` z ) / L ) x. ( F ` ( X ` z ) ) ) )
193	145	recnd 9404	. . . . . . . 8 |- ( ph -> ( F ` ( X ` z ) ) e. CC )
194	43, 193, 63, 72	div23d 10136	. . . . . . 7 |- ( ph -> ( ( ( T ` z ) x. ( F ` ( X ` z ) ) ) / L ) = ( ( ( T ` z ) / L ) x. ( F ` ( X ` z ) ) ) )
195	192, 194	eqtr4d 2473	. . . . . 6 |- ( ph -> ( ( 1 - ( S / L ) ) x. ( F ` ( X ` z ) ) ) = ( ( ( T ` z ) x. ( F ` ( X ` z ) ) ) / L ) )
196	195	oveq2d 6102	. . . . 5 |- ( ph -> ( ( ( S / L ) x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) + ( ( 1 - ( S / L ) ) x. ( F ` ( X ` z ) ) ) ) = ( ( ( S / L ) x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) + ( ( ( T ` z ) x. ( F ` ( X ` z ) ) ) / L ) ) )
197	191, 196	breqtrd 4311	. . . 4 |- ( ph -> ( F ` ( ( ( S / L ) x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) + ( ( 1 - ( S / L ) ) x. ( X ` z ) ) ) ) <_ ( ( ( S / L ) x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) + ( ( ( T ` z ) x. ( F ` ( X ` z ) ) ) / L ) ) )
198	194, 192	eqtr4d 2473	. . . . . 6 |- ( ph -> ( ( ( T ` z ) x. ( F ` ( X ` z ) ) ) / L ) = ( ( 1 - ( S / L ) ) x. ( F ` ( X ` z ) ) ) )
199	198	oveq2d 6102	. . . . 5 |- ( ph -> ( ( ( S / L ) x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) + ( ( ( T ` z ) x. ( F ` ( X ` z ) ) ) / L ) ) = ( ( ( S / L ) x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) + ( ( 1 - ( S / L ) ) x. ( F ` ( X ` z ) ) ) ) )
200		jensenlem.5	. . . . . . 7 |- ( ph -> ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) <_ ( (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` B ) ) / S ) )
201	57, 62, 65, 71	divgt0d 10260	. . . . . . . 8 |- ( ph -> 0 < ( S / L ) )
202		lemul2 10174	. . . . . . . 8 |- ( ( ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) e. RR /\ ( (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` B ) ) / S ) e. RR /\ ( ( S / L ) e. RR /\ 0 < ( S / L ) ) ) -> ( ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) <_ ( (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` B ) ) / S ) <-> ( ( S / L ) x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) <_ ( ( S / L ) x. ( (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` B ) ) / S ) ) ) )
203	143, 156, 125, 201, 202	syl112anc 1222	. . . . . . 7 |- ( ph -> ( ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) <_ ( (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` B ) ) / S ) <-> ( ( S / L ) x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) <_ ( ( S / L ) x. ( (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` B ) ) / S ) ) ) )
204	200, 203	mpbid 210	. . . . . 6 |- ( ph -> ( ( S / L ) x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) <_ ( ( S / L ) x. ( (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` B ) ) / S ) ) )
205	144, 157, 160, 204	leadd1dd 9945	. . . . 5 |- ( ph -> ( ( ( S / L ) x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) + ( ( 1 - ( S / L ) ) x. ( F ` ( X ` z ) ) ) ) <_ ( ( ( S / L ) x. ( (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` B ) ) / S ) ) + ( ( 1 - ( S / L ) ) x. ( F ` ( X ` z ) ) ) ) )
206	199, 205	eqbrtrd 4307	. . . 4 |- ( ph -> ( ( ( S / L ) x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) + ( ( ( T ` z ) x. ( F ` ( X ` z ) ) ) / L ) ) <_ ( ( ( S / L ) x. ( (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` B ) ) / S ) ) + ( ( 1 - ( S / L ) ) x. ( F ` ( X ` z ) ) ) ) )
207	142, 148, 161, 197, 206	letrd 9520	. . 3 |- ( ph -> ( F ` ( ( ( S / L ) x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) + ( ( 1 - ( S / L ) ) x. ( X ` z ) ) ) ) <_ ( ( ( S / L ) x. ( (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` B ) ) / S ) ) + ( ( 1 - ( S / L ) ) x. ( F ` ( X ` z ) ) ) ) )
208	123	fveq2d 5690	. . 3 |- ( ph -> ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` ( B u. { z } ) ) ) / L ) ) = ( F ` ( ( ( S / L ) x. ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) + ( ( 1 - ( S / L ) ) x. ( X ` z ) ) ) ) )
209	155	recnd 9404	. . . . 5 |- ( ph -> (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` B ) ) e. CC )
210	146	recnd 9404	. . . . 5 |- ( ph -> ( ( T ` z ) x. ( F ` ( X ` z ) ) ) e. CC )
211	209, 210, 63, 72	divdird 10137	. . . 4 |- ( ph -> ( ( (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` B ) ) + ( ( T ` z ) x. ( F ` ( X ` z ) ) ) ) / L ) = ( ( (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` B ) ) / L ) + ( ( ( T ` z ) x. ( F ` ( X ` z ) ) ) / L ) ) )
212	20, 79	sseldi 3349	. . . . . . . . . 10 |- ( ( ph /\ x e. A ) -> ( T ` x ) e. RR )
213	48	ffvelrnda 5838	. . . . . . . . . . 11 |- ( ( ph /\ ( X ` x ) e. D ) -> ( F ` ( X ` x ) ) e. RR )
214	83, 213	syldan 470	. . . . . . . . . 10 |- ( ( ph /\ x e. A ) -> ( F ` ( X ` x ) ) e. RR )
215	212, 214	remulcld 9406	. . . . . . . . 9 |- ( ( ph /\ x e. A ) -> ( ( T ` x ) x. ( F ` ( X ` x ) ) ) e. RR )
216	215	recnd 9404	. . . . . . . 8 |- ( ( ph /\ x e. A ) -> ( ( T ` x ) x. ( F ` ( X ` x ) ) ) e. CC )
217	78, 216	syldan 470	. . . . . . 7 |- ( ( ph /\ x e. B ) -> ( ( T ` x ) x. ( F ` ( X ` x ) ) ) e. CC )
218	89	fveq2d 5690	. . . . . . . 8 |- ( x = z -> ( F ` ( X ` x ) ) = ( F ` ( X ` z ) ) )
219	88, 218	oveq12d 6104	. . . . . . 7 |- ( x = z -> ( ( T ` x ) x. ( F ` ( X ` x ) ) ) = ( ( T ` z ) x. ( F ` ( X ` z ) ) ) )
220	74, 75, 77, 9, 217, 41, 52, 210, 219	gsumunsn 16442	. . . . . 6 |- ( ph -> (ℂfld gsumg ( x e. ( B u. { z } ) |-> ( ( T ` x ) x. ( F ` ( X ` x ) ) ) ) ) = ( (ℂfld gsumg ( x e. B |-> ( ( T ` x ) x. ( F ` ( X ` x ) ) ) ) ) + ( ( T ` z ) x. ( F ` ( X ` z ) ) ) ) )
221	48	feqmptd 5739	. . . . . . . . . . 11 |- ( ph -> F = ( y e. D |-> ( F ` y ) ) )
222		fveq2 5686	. . . . . . . . . . 11 |- ( y = ( X ` x ) -> ( F ` y ) = ( F ` ( X ` x ) ) )
223	83, 93, 221, 222	fmptco 5871	. . . . . . . . . 10 |- ( ph -> ( F o. X ) = ( x e. A |-> ( F ` ( X ` x ) ) ) )
224	5, 79, 214, 92, 223	offval2 6331	. . . . . . . . 9 |- ( ph -> ( T oF x. ( F o. X ) ) = ( x e. A |-> ( ( T ` x ) x. ( F ` ( X ` x ) ) ) ) )
225	224	reseq1d 5104	. . . . . . . 8 |- ( ph -> ( ( T oF x. ( F o. X ) ) |` ( B u. { z } ) ) = ( ( x e. A |-> ( ( T ` x ) x. ( F ` ( X ` x ) ) ) ) |` ( B u. { z } ) ) )
226		resmpt 5151	. . . . . . . . 9 |- ( ( B u. { z } ) C_ A -> ( ( x e. A |-> ( ( T ` x ) x. ( F ` ( X ` x ) ) ) ) |` ( B u. { z } ) ) = ( x e. ( B u. { z } ) |-> ( ( T ` x ) x. ( F ` ( X ` x ) ) ) ) )
227	6, 226	syl 16	. . . . . . . 8 |- ( ph -> ( ( x e. A |-> ( ( T ` x ) x. ( F ` ( X ` x ) ) ) ) |` ( B u. { z } ) ) = ( x e. ( B u. { z } ) |-> ( ( T ` x ) x. ( F ` ( X ` x ) ) ) ) )
228	225, 227	eqtrd 2470	. . . . . . 7 |- ( ph -> ( ( T oF x. ( F o. X ) ) |` ( B u. { z } ) ) = ( x e. ( B u. { z } ) |-> ( ( T ` x ) x. ( F ` ( X ` x ) ) ) ) )
229	228	oveq2d 6102	. . . . . 6 |- ( ph -> (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` ( B u. { z } ) ) ) = (ℂfld gsumg ( x e. ( B u. { z } ) |-> ( ( T ` x ) x. ( F ` ( X ` x ) ) ) ) ) )
230	224	reseq1d 5104	. . . . . . . . 9 |- ( ph -> ( ( T oF x. ( F o. X ) ) |` B ) = ( ( x e. A |-> ( ( T ` x ) x. ( F ` ( X ` x ) ) ) ) |` B ) )
231		resmpt 5151	. . . . . . . . . 10 |- ( B C_ A -> ( ( x e. A |-> ( ( T ` x ) x. ( F ` ( X ` x ) ) ) ) |` B ) = ( x e. B |-> ( ( T ` x ) x. ( F ` ( X ` x ) ) ) ) )
232	7, 231	syl 16	. . . . . . . . 9 |- ( ph -> ( ( x e. A |-> ( ( T ` x ) x. ( F ` ( X ` x ) ) ) ) |` B ) = ( x e. B |-> ( ( T ` x ) x. ( F ` ( X ` x ) ) ) ) )
233	230, 232	eqtrd 2470	. . . . . . . 8 |- ( ph -> ( ( T oF x. ( F o. X ) ) |` B ) = ( x e. B |-> ( ( T ` x ) x. ( F ` ( X ` x ) ) ) ) )
234	233	oveq2d 6102	. . . . . . 7 |- ( ph -> (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` B ) ) = (ℂfld gsumg ( x e. B |-> ( ( T ` x ) x. ( F ` ( X ` x ) ) ) ) ) )
235	234	oveq1d 6101	. . . . . 6 |- ( ph -> ( (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` B ) ) + ( ( T ` z ) x. ( F ` ( X ` z ) ) ) ) = ( (ℂfld gsumg ( x e. B |-> ( ( T ` x ) x. ( F ` ( X ` x ) ) ) ) ) + ( ( T ` z ) x. ( F ` ( X ` z ) ) ) ) )
236	220, 229, 235	3eqtr4d 2480	. . . . 5 |- ( ph -> (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` ( B u. { z } ) ) ) = ( (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` B ) ) + ( ( T ` z ) x. ( F ` ( X ` z ) ) ) ) )
237	236	oveq1d 6101	. . . 4 |- ( ph -> ( (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` ( B u. { z } ) ) ) / L ) = ( ( (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` B ) ) + ( ( T ` z ) x. ( F ` ( X ` z ) ) ) ) / L ) )
238	209, 108, 63, 109, 72	dmdcand 10128	. . . . 5 |- ( ph -> ( ( S / L ) x. ( (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` B ) ) / S ) ) = ( (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` B ) ) / L ) )
239	238, 195	oveq12d 6104	. . . 4 |- ( ph -> ( ( ( S / L ) x. ( (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` B ) ) / S ) ) + ( ( 1 - ( S / L ) ) x. ( F ` ( X ` z ) ) ) ) = ( ( (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` B ) ) / L ) + ( ( ( T ` z ) x. ( F ` ( X ` z ) ) ) / L ) ) )
240	211, 237, 239	3eqtr4d 2480	. . 3 |- ( ph -> ( (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` ( B u. { z } ) ) ) / L ) = ( ( ( S / L ) x. ( (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` B ) ) / S ) ) + ( ( 1 - ( S / L ) ) x. ( F ` ( X ` z ) ) ) ) )
241	207, 208, 240	3brtr4d 4317	. 2 |- ( ph -> ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` ( B u. { z } ) ) ) / L ) ) <_ ( (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` ( B u. { z } ) ) ) / L ) )
242	141, 241	jca 532	1 |- ( ph -> ( ( (ℂfld gsumg ( ( T oF x. X ) |` ( B u. { z } ) ) ) / L ) e. D /\ ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` ( B u. { z } ) ) ) / L ) ) <_ ( (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` ( B u. { z } ) ) ) / L ) ) )

Syntax hints:   -. wn 3   -> wi 4   <-> wb 184   /\ wa 369   /\ w3a 965   = wceq 1369   e. wcel 1756   _Vcvv 2967   u. cun 3321   C_ wss 3323   {csn 3872   class class class wbr 4287   e. cmpt 4345   |` cres 4837   o. ccom 4839   -->wf 5409   ` cfv 5413  (class class class)co 6086   oFcof 6313   Fincfn 7302   CCcc 9272   RRcr 9273   0cc0 9274   1c1 9275   + caddc 9277   x. cmul 9279   +oocpnf 9407   RR*cxr 9409   < clt 9410   <_ cle 9411   - cmin 9587   / cdiv 9985   RR+crp 10983   [,)cico 11294   [,]cicc 11295   gsum_g cgsu 14371  SubGrpcsubg 15666  CMndccmn 16268   Abelcabel 16269   Ringcrg 16633   DivRingcdr 16810  SubRingcsubrg 16839  ℂ_fldccnfld 17793  RRfldcrefld 18009

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1591  ax-4 1602  ax-5 1670  ax-6 1708  ax-7 1728  ax-8 1758  ax-9 1760  ax-10 1775  ax-11 1780  ax-12 1792  ax-13 1943  ax-ext 2419  ax-rep 4398  ax-sep 4408  ax-nul 4416  ax-pow 4465  ax-pr 4526  ax-un 6367  ax-inf2 7839  ax-cnex 9330  ax-resscn 9331  ax-1cn 9332  ax-icn 9333  ax-addcl 9334  ax-addrcl 9335  ax-mulcl 9336  ax-mulrcl 9337  ax-mulcom 9338  ax-addass 9339  ax-mulass 9340  ax-distr 9341  ax-i2m1 9342  ax-1ne0 9343  ax-1rid 9344  ax-rnegex 9345  ax-rrecex 9346  ax-cnre 9347  ax-pre-lttri 9348  ax-pre-lttrn 9349  ax-pre-ltadd 9350  ax-pre-mulgt0 9351  ax-addf 9353  ax-mulf 9354

This theorem depends on definitions:  df-bi 185  df-or 370  df-an 371  df-3or 966  df-3an 967  df-tru 1372  df-ex 1587  df-nf 1590  df-sb 1701  df-eu 2256  df-mo 2257  df-clab 2425  df-cleq 2431  df-clel 2434  df-nfc 2563  df-ne 2603  df-nel 2604  df-ral 2715  df-rex 2716  df-reu 2717  df-rmo 2718  df-rab 2719  df-v 2969  df-sbc 3182  df-csb 3284  df-dif 3326  df-un 3328  df-in 3330  df-ss 3337  df-pss 3339  df-nul 3633  df-if 3787  df-pw 3857  df-sn 3873  df-pr 3875  df-tp 3877  df-op 3879  df-uni 4087  df-int 4124  df-iun 4168  df-iin 4169  df-br 4288  df-opab 4346  df-mpt 4347  df-tr 4381  df-eprel 4627  df-id 4631  df-po 4636  df-so 4637  df-fr 4674  df-se 4675  df-we 4676  df-ord 4717  df-on 4718  df-lim 4719  df-suc 4720  df-xp 4841  df-rel 4842  df-cnv 4843  df-co 4844  df-dm 4845  df-rn 4846  df-res 4847  df-ima 4848  df-iota 5376  df-fun 5415  df-fn 5416  df-f 5417  df-f1 5418  df-fo 5419  df-f1o 5420  df-fv 5421  df-isom 5422  df-riota 6047  df-ov 6089  df-oprab 6090  df-mpt2 6091  df-of 6315  df-om 6472  df-1st 6572  df-2nd 6573  df-supp 6686  df-tpos 6740  df-recs 6824  df-rdg 6858  df-1o 6912  df-oadd 6916  df-er 7093  df-en 7303  df-dom 7304  df-sdom 7305  df-fin 7306  df-fsupp 7613  df-oi 7716  df-card 8101  df-pnf 9412  df-mnf 9413  df-xr 9414  df-ltxr 9415  df-le 9416  df-sub 9589  df-neg 9590  df-div 9986  df-nn 10315  df-2 10372  df-3 10373  df-4 10374  df-5 10375  df-6 10376  df-7 10377  df-8 10378  df-9 10379  df-10 10380  df-n0 10572  df-z 10639  df-dec 10748  df-uz 10854  df-rp 10984  df-ico 11298  df-icc 11299  df-fz 11430  df-fzo 11541  df-seq 11799  df-hash 12096  df-struct 14168  df-ndx 14169  df-slot 14170  df-base 14171  df-sets 14172  df-ress 14173  df-plusg 14243  df-mulr 14244  df-starv 14245  df-tset 14249  df-ple 14250  df-ds 14252  df-unif 14253  df-0g 14372  df-gsum 14373  df-mre 14516  df-mrc 14517  df-acs 14519  df-mnd 15407  df-submnd 15457  df-grp 15536  df-minusg 15537  df-mulg 15539  df-subg 15669  df-cntz 15826  df-cmn 16270  df-abl 16271  df-mgp 16580  df-ur 16592  df-rng 16635  df-cring 16636  df-oppr 16703  df-dvdsr 16721  df-unit 16722  df-invr 16752  df-dvr 16763  df-drng 16812  df-subrg 16841  df-cnfld 17794  df-refld 18010

This theorem is referenced by:  jensen  22357