Theorem jensenlem2 22266

Description: Lemma for jensen 22267. (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 17684	. . . . . . 7 |- 0 = ( 0g ` ℂfld )
2		cnrng 17682	. . . . . . . 8 |- ℂfld e. Ring
3		rngabl 16610	. . . . . . . 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 3521	. . . . . . . 8 |- ( ph -> B C_ A )
8		ssfi 7521	. . . . . . . 8 |- ( ( A e. Fin /\ B C_ A ) -> B e. Fin )
9	5, 7, 8	syl2anc 654	. . . . . . 7 |- ( ph -> B e. Fin )
10		resubdrg 17880	. . . . . . . . 9 |- ( RR e. (SubRing ` ℂfld ) /\ RRfld e. DivRing )
11	10	simpli 455	. . . . . . . 8 |- RR e. (SubRing ` ℂfld )
12		subrgsubg 16795	. . . . . . . 8 |- ( RR e. (SubRing ` ℂfld ) -> RR e. (SubGrp ` ℂfld ) )
13	11, 12	mp1i 12	. . . . . . 7 |- ( ph -> RR e. (SubGrp ` ℂfld ) )
14		remulcl 9355	. . . . . . . . . 10 |- ( ( x e. RR /\ y e. RR ) -> ( x x. y ) e. RR )
15	14	adantl 463	. . . . . . . . 9 |- ( ( ph /\ ( x e. RR /\ y e. RR ) ) -> ( x x. y ) e. RR )
16		jensen.5	. . . . . . . . . 10 |- ( ph -> T : A --> ( 0 [,) +oo ) )
17		0re 9374	. . . . . . . . . . 11 |- 0 e. RR
18		pnfxr 11080	. . . . . . . . . . 11 |- +oo e. RR*
19		icossre 11364	. . . . . . . . . . 11 |- ( ( 0 e. RR /\ +oo e. RR* ) -> ( 0 [,) +oo ) C_ RR )
20	17, 18, 19	mp2an 665	. . . . . . . . . 10 |- ( 0 [,) +oo ) C_ RR
21		fss 5555	. . . . . . . . . 10 |- ( ( T : A --> ( 0 [,) +oo ) /\ ( 0 [,) +oo ) C_ RR ) -> T : A --> RR )
22	16, 20, 21	sylancl 655	. . . . . . . . 9 |- ( ph -> T : A --> RR )
23		jensen.6	. . . . . . . . . 10 |- ( ph -> X : A --> D )
24		jensen.1	. . . . . . . . . 10 |- ( ph -> D C_ RR )
25		fss 5555	. . . . . . . . . 10 |- ( ( X : A --> D /\ D C_ RR ) -> X : A --> RR )
26	23, 24, 25	syl2anc 654	. . . . . . . . 9 |- ( ph -> X : A --> RR )
27		inidm 3547	. . . . . . . . 9 |- ( A i^i A ) = A
28	15, 22, 26, 5, 5, 27	off 6323	. . . . . . . 8 |- ( ph -> ( T oF x. X ) : A --> RR )
29		fssres 5566	. . . . . . . 8 |- ( ( ( T oF x. X ) : A --> RR /\ B C_ A ) -> ( ( T oF x. X ) |` B ) : B --> RR )
30	28, 7, 29	syl2anc 654	. . . . . . 7 |- ( ph -> ( ( T oF x. X ) |` B ) : B --> RR )
31		c0ex 9368	. . . . . . . . 9 |- 0 e. _V
32	31	a1i 11	. . . . . . . 8 |- ( ph -> 0 e. _V )
33	30, 9, 32	fdmfifsupp 7618	. . . . . . 7 |- ( ph -> ( ( T oF x. X ) |` B ) finSupp 0 )
34	1, 4, 9, 13, 30, 33	gsumsubgcl 16386	. . . . . 6 |- ( ph -> (ℂfld gsumg ( ( T oF x. X ) |` B ) ) e. RR )
35	34	recnd 9400	. . . . 5 |- ( ph -> (ℂfld gsumg ( ( T oF x. X ) |` B ) ) e. CC )
36		ax-resscn 9327	. . . . . . . 8 |- RR C_ CC
37	20, 36	sstri 3353	. . . . . . 7 |- ( 0 [,) +oo ) C_ CC
38	6	unssbd 3522	. . . . . . . . 9 |- ( ph -> { z } C_ A )
39		vex 2965	. . . . . . . . . 10 |- z e. _V
40	39	snss 3987	. . . . . . . . 9 |- ( z e. A <-> { z } C_ A )
41	38, 40	sylibr 212	. . . . . . . 8 |- ( ph -> z e. A )
42	16, 41	ffvelrnd 5832	. . . . . . 7 |- ( ph -> ( T ` z ) e. ( 0 [,) +oo ) )
43	37, 42	sseldi 3342	. . . . . 6 |- ( ph -> ( T ` z ) e. CC )
44	23, 41	ffvelrnd 5832	. . . . . . . 8 |- ( ph -> ( X ` z ) e. D )
45	24, 44	sseldd 3345	. . . . . . 7 |- ( ph -> ( X ` z ) e. RR )
46	45	recnd 9400	. . . . . 6 |- ( ph -> ( X ` z ) e. CC )
47	43, 46	mulcld 9394	. . . . 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 22265	. . . . . . 7 |- ( ph -> L = ( S + ( T ` z ) ) )
56		jensenlem.3	. . . . . . . . 9 |- ( ph -> S e. RR+ )
57	56	rpred 11015	. . . . . . . 8 |- ( ph -> S e. RR )
58		elrege0 11380	. . . . . . . . . 10 |- ( ( T ` z ) e. ( 0 [,) +oo ) <-> ( ( T ` z ) e. RR /\ 0 <_ ( T ` z ) ) )
59	58	simplbi 457	. . . . . . . . 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 9401	. . . . . . 7 |- ( ph -> ( S + ( T ` z ) ) e. RR )
62	55, 61	eqeltrd 2507	. . . . . 6 |- ( ph -> L e. RR )
63	62	recnd 9400	. . . . 5 |- ( ph -> L e. CC )
64		0red 9375	. . . . . . 7 |- ( ph -> 0 e. RR )
65	56	rpgt0d 11018	. . . . . . 7 |- ( ph -> 0 < S )
66	58	simprbi 461	. . . . . . . . . 10 |- ( ( T ` z ) e. ( 0 [,) +oo ) -> 0 <_ ( T ` z ) )
67	42, 66	syl 16	. . . . . . . . 9 |- ( ph -> 0 <_ ( T ` z ) )
68	57, 60	addge01d 9915	. . . . . . . . 9 |- ( ph -> ( 0 <_ ( T ` z ) <-> S <_ ( S + ( T ` z ) ) ) )
69	67, 68	mpbid 210	. . . . . . . 8 |- ( ph -> S <_ ( S + ( T ` z ) ) )
70	69, 55	breqtrrd 4306	. . . . . . 7 |- ( ph -> S <_ L )
71	64, 57, 62, 65, 70	ltletrd 9519	. . . . . 6 |- ( ph -> 0 < L )
72	71	gt0ne0d 9892	. . . . 5 |- ( ph -> L =/= 0 )
73	35, 47, 63, 72	divdird 10133	. . . 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 17666	. . . . . . 7 |- CC = ( Base ` ℂfld )
75		cnfldadd 17667	. . . . . . 7 |- + = ( +g ` ℂfld )
76		rngcmn 16611	. . . . . . . 8 |- (ℂfld e. Ring -> ℂfld e. CMnd )
77	2, 76	mp1i 12	. . . . . . 7 |- ( ph -> ℂfld e. CMnd )
78	7	sselda 3344	. . . . . . . . . 10 |- ( ( ph /\ x e. B ) -> x e. A )
79	16	ffvelrnda 5831	. . . . . . . . . 10 |- ( ( ph /\ x e. A ) -> ( T ` x ) e. ( 0 [,) +oo ) )
80	78, 79	syldan 467	. . . . . . . . 9 |- ( ( ph /\ x e. B ) -> ( T ` x ) e. ( 0 [,) +oo ) )
81	37, 80	sseldi 3342	. . . . . . . 8 |- ( ( ph /\ x e. B ) -> ( T ` x ) e. CC )
82	24	adantr 462	. . . . . . . . . 10 |- ( ( ph /\ x e. B ) -> D C_ RR )
83	23	ffvelrnda 5831	. . . . . . . . . . 11 |- ( ( ph /\ x e. A ) -> ( X ` x ) e. D )
84	78, 83	syldan 467	. . . . . . . . . 10 |- ( ( ph /\ x e. B ) -> ( X ` x ) e. D )
85	82, 84	sseldd 3345	. . . . . . . . 9 |- ( ( ph /\ x e. B ) -> ( X ` x ) e. RR )
86	85	recnd 9400	. . . . . . . 8 |- ( ( ph /\ x e. B ) -> ( X ` x ) e. CC )
87	81, 86	mulcld 9394	. . . . . . 7 |- ( ( ph /\ x e. B ) -> ( ( T ` x ) x. ( X ` x ) ) e. CC )
88		fveq2 5679	. . . . . . . 8 |- ( x = z -> ( T ` x ) = ( T ` z ) )
89		fveq2 5679	. . . . . . . 8 |- ( x = z -> ( X ` x ) = ( X ` z ) )
90	88, 89	oveq12d 6098	. . . . . . 7 |- ( x = z -> ( ( T ` x ) x. ( X ` x ) ) = ( ( T ` z ) x. ( X ` z ) ) )
91	74, 75, 77, 9, 87, 41, 52, 47, 90	gsumunsn 16428	. . . . . 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 5732	. . . . . . . . . 10 |- ( ph -> T = ( x e. A |-> ( T ` x ) ) )
93	23	feqmptd 5732	. . . . . . . . . 10 |- ( ph -> X = ( x e. A |-> ( X ` x ) ) )
94	5, 79, 83, 92, 93	offval2 6325	. . . . . . . . 9 |- ( ph -> ( T oF x. X ) = ( x e. A |-> ( ( T ` x ) x. ( X ` x ) ) ) )
95	94	reseq1d 5096	. . . . . . . 8 |- ( ph -> ( ( T oF x. X ) |` ( B u. { z } ) ) = ( ( x e. A |-> ( ( T ` x ) x. ( X ` x ) ) ) |` ( B u. { z } ) ) )
96		resmpt 5144	. . . . . . . . 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 2465	. . . . . . 7 |- ( ph -> ( ( T oF x. X ) |` ( B u. { z } ) ) = ( x e. ( B u. { z } ) |-> ( ( T ` x ) x. ( X ` x ) ) ) )
99	98	oveq2d 6096	. . . . . 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 5096	. . . . . . . . 9 |- ( ph -> ( ( T oF x. X ) |` B ) = ( ( x e. A |-> ( ( T ` x ) x. ( X ` x ) ) ) |` B ) )
101		resmpt 5144	. . . . . . . . . 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 2465	. . . . . . . 8 |- ( ph -> ( ( T oF x. X ) |` B ) = ( x e. B |-> ( ( T ` x ) x. ( X ` x ) ) ) )
104	103	oveq2d 6096	. . . . . . 7 |- ( ph -> (ℂfld gsumg ( ( T oF x. X ) |` B ) ) = (ℂfld gsumg ( x e. B |-> ( ( T ` x ) x. ( X ` x ) ) ) ) )
105	104	oveq1d 6095	. . . . . 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 2475	. . . . 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 6095	. . . 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 9400	. . . . . 6 |- ( ph -> S e. CC )
109	56	rpne0d 11020	. . . . . 6 |- ( ph -> S =/= 0 )
110	35, 108, 63, 109, 72	dmdcand 10124	. . . . 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 10134	. . . . . . . 8 |- ( ph -> ( ( L - S ) / L ) = ( ( L / L ) - ( S / L ) ) )
112	55	oveq1d 6095	. . . . . . . . . 10 |- ( ph -> ( L - S ) = ( ( S + ( T ` z ) ) - S ) )
113	108, 43	pncan2d 9709	. . . . . . . . . 10 |- ( ph -> ( ( S + ( T ` z ) ) - S ) = ( T ` z ) )
114	112, 113	eqtrd 2465	. . . . . . . . 9 |- ( ph -> ( L - S ) = ( T ` z ) )
115	114	oveq1d 6095	. . . . . . . 8 |- ( ph -> ( ( L - S ) / L ) = ( ( T ` z ) / L ) )
116	63, 72	dividd 10093	. . . . . . . . 9 |- ( ph -> ( L / L ) = 1 )
117	116	oveq1d 6095	. . . . . . . 8 |- ( ph -> ( ( L / L ) - ( S / L ) ) = ( 1 - ( S / L ) ) )
118	111, 115, 117	3eqtr3rd 2474	. . . . . . 7 |- ( ph -> ( 1 - ( S / L ) ) = ( ( T ` z ) / L ) )
119	118	oveq1d 6095	. . . . . 6 |- ( ph -> ( ( 1 - ( S / L ) ) x. ( X ` z ) ) = ( ( ( T ` z ) / L ) x. ( X ` z ) ) )
120	43, 46, 63, 72	div23d 10132	. . . . . 6 |- ( ph -> ( ( ( T ` z ) x. ( X ` z ) ) / L ) = ( ( ( T ` z ) / L ) x. ( X ` z ) ) )
121	119, 120	eqtr4d 2468	. . . . 5 |- ( ph -> ( ( 1 - ( S / L ) ) x. ( X ` z ) ) = ( ( ( T ` z ) x. ( X ` z ) ) / L ) )
122	110, 121	oveq12d 6098	. . . 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 2475	. . 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 10147	. . . . . 6 |- ( ph -> ( S / L ) e. RR )
126	56	rpge0d 11019	. . . . . . 7 |- ( ph -> 0 <_ S )
127		divge0 10186	. . . . . . 7 |- ( ( ( S e. RR /\ 0 <_ S ) /\ ( L e. RR /\ 0 < L ) ) -> 0 <_ ( S / L ) )
128	57, 126, 62, 71, 127	syl22anc 1212	. . . . . 6 |- ( ph -> 0 <_ ( S / L ) )
129	63	mulid1d 9391	. . . . . . . 8 |- ( ph -> ( L x. 1 ) = L )
130	70, 129	breqtrrd 4306	. . . . . . 7 |- ( ph -> S <_ ( L x. 1 ) )
131		1red 9389	. . . . . . . 8 |- ( ph -> 1 e. RR )
132		ledivmul 10193	. . . . . . . 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 1215	. . . . . . 7 |- ( ph -> ( ( S / L ) <_ 1 <-> S <_ ( L x. 1 ) ) )
134	130, 133	mpbird 232	. . . . . 6 |- ( ph -> ( S / L ) <_ 1 )
135		1re 9373	. . . . . . 7 |- 1 e. RR
136	17, 135	elicc2i 11349	. . . . . 6 |- ( ( S / L ) e. ( 0 [,] 1 ) <-> ( ( S / L ) e. RR /\ 0 <_ ( S / L ) /\ ( S / L ) <_ 1 ) )
137	125, 128, 134, 136	syl3anbrc 1165	. . . . 5 |- ( ph -> ( S / L ) e. ( 0 [,] 1 ) )
138	124, 44, 137	3jca 1161	. . . 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 22263	. . . 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 661	. . 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 2507	. 2 |- ( ph -> ( (ℂfld gsumg ( ( T oF x. X ) |` ( B u. { z } ) ) ) / L ) e. D )
142	48, 140	ffvelrnd 5832	. . . 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 5832	. . . . . 6 |- ( ph -> ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) e. RR )
144	125, 143	remulcld 9402	. . . . 5 |- ( ph -> ( ( S / L ) x. ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) ) e. RR )
145	48, 44	ffvelrnd 5832	. . . . . . 7 |- ( ph -> ( F ` ( X ` z ) ) e. RR )
146	60, 145	remulcld 9402	. . . . . 6 |- ( ph -> ( ( T ` z ) x. ( F ` ( X ` z ) ) ) e. RR )
147	146, 62, 72	redivcld 10147	. . . . 5 |- ( ph -> ( ( ( T ` z ) x. ( F ` ( X ` z ) ) ) / L ) e. RR )
148	144, 147	readdcld 9401	. . . 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 5556	. . . . . . . . . . 11 |- ( ( F : D --> RR /\ X : A --> D ) -> ( F o. X ) : A --> RR )
150	48, 23, 149	syl2anc 654	. . . . . . . . . 10 |- ( ph -> ( F o. X ) : A --> RR )
151	15, 22, 150, 5, 5, 27	off 6323	. . . . . . . . 9 |- ( ph -> ( T oF x. ( F o. X ) ) : A --> RR )
152		fssres 5566	. . . . . . . . 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 654	. . . . . . . 8 |- ( ph -> ( ( T oF x. ( F o. X ) ) |` B ) : B --> RR )
154	153, 9, 32	fdmfifsupp 7618	. . . . . . . 8 |- ( ph -> ( ( T oF x. ( F o. X ) ) |` B ) finSupp 0 )
155	1, 4, 9, 13, 153, 154	gsumsubgcl 16386	. . . . . . 7 |- ( ph -> (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` B ) ) e. RR )
156	155, 57, 109	redivcld 10147	. . . . . 6 |- ( ph -> ( (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` B ) ) / S ) e. RR )
157	125, 156	remulcld 9402	. . . . 5 |- ( ph -> ( ( S / L ) x. ( (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` B ) ) / S ) ) e. RR )
158		resubcl 9661	. . . . . . 7 |- ( ( 1 e. RR /\ ( S / L ) e. RR ) -> ( 1 - ( S / L ) ) e. RR )
159	135, 125, 158	sylancr 656	. . . . . 6 |- ( ph -> ( 1 - ( S / L ) ) e. RR )
160	159, 145	remulcld 9402	. . . . 5 |- ( ph -> ( ( 1 - ( S / L ) ) x. ( F ` ( X ` z ) ) ) e. RR )
161	157, 160	readdcld 9401	. . . 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 6088	. . . . . . . . . . . 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 6095	. . . . . . . . . . 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 5683	. . . . . . . . . 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 5679	. . . . . . . . . . . 12 |- ( x = ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) -> ( F ` x ) = ( F ` ( (ℂfld gsumg ( ( T oF x. X ) |` B ) ) / S ) ) )
166	165	oveq2d 6096	. . . . . . . . . . 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 6095	. . . . . . . . . 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 4293	. . . . . . . . 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 6088	. . . . . . . . . . . 12 |- ( y = ( X ` z ) -> ( ( 1 - t ) x. y ) = ( ( 1 - t ) x. ( X ` z ) ) )
171	170	oveq2d 6096	. . . . . . . . . . 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 5683	. . . . . . . . . 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 5679	. . . . . . . . . . . 12 |- ( y = ( X ` z ) -> ( F ` y ) = ( F ` ( X ` z ) ) )
174	173	oveq2d 6096	. . . . . . . . . . 11 |- ( y = ( X ` z ) -> ( ( 1 - t ) x. ( F ` y ) ) = ( ( 1 - t ) x. ( F ` ( X ` z ) ) ) )
175	174	oveq2d 6096	. . . . . . . . . 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 4293	. . . . . . . . 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 6087	. . . . . . . . . . . 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 6088	. . . . . . . . . . . . 13 |- ( t = ( S / L ) -> ( 1 - t ) = ( 1 - ( S / L ) ) )
180	179	oveq1d 6095	. . . . . . . . . . . 12 |- ( t = ( S / L ) -> ( ( 1 - t ) x. ( X ` z ) ) = ( ( 1 - ( S / L ) ) x. ( X ` z ) ) )
181	178, 180	oveq12d 6098	. . . . . . . . . . 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 5683	. . . . . . . . . 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 6087	. . . . . . . . . . 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 6095	. . . . . . . . . . 11 |- ( t = ( S / L ) -> ( ( 1 - t ) x. ( F ` ( X ` z ) ) ) = ( ( 1 - ( S / L ) ) x. ( F ` ( X ` z ) ) ) )
185	183, 184	oveq12d 6098	. . . . . . . . . 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 4293	. . . . . . . . 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 3029	. . . . . . 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 1211	. . . . . 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 6095	. . . . . . 7 |- ( ph -> ( ( 1 - ( S / L ) ) x. ( F ` ( X ` z ) ) ) = ( ( ( T ` z ) / L ) x. ( F ` ( X ` z ) ) ) )
193	145	recnd 9400	. . . . . . . 8 |- ( ph -> ( F ` ( X ` z ) ) e. CC )
194	43, 193, 63, 72	div23d 10132	. . . . . . 7 |- ( ph -> ( ( ( T ` z ) x. ( F ` ( X ` z ) ) ) / L ) = ( ( ( T ` z ) / L ) x. ( F ` ( X ` z ) ) ) )
195	192, 194	eqtr4d 2468	. . . . . 6 |- ( ph -> ( ( 1 - ( S / L ) ) x. ( F ` ( X ` z ) ) ) = ( ( ( T ` z ) x. ( F ` ( X ` z ) ) ) / L ) )
196	195	oveq2d 6096	. . . . 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 4304	. . . 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 2468	. . . . . 6 |- ( ph -> ( ( ( T ` z ) x. ( F ` ( X ` z ) ) ) / L ) = ( ( 1 - ( S / L ) ) x. ( F ` ( X ` z ) ) ) )
199	198	oveq2d 6096	. . . . 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 10256	. . . . . . . 8 |- ( ph -> 0 < ( S / L ) )
202		lemul2 10170	. . . . . . . 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 1215	. . . . . . 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 9941	. . . . 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 4300	. . . 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 9516	. . 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 5683	. . 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 9400	. . . . 5 |- ( ph -> (ℂfld gsumg ( ( T oF x. ( F o. X ) ) |` B ) ) e. CC )
210	146	recnd 9400	. . . . 5 |- ( ph -> ( ( T ` z ) x. ( F ` ( X ` z ) ) ) e. CC )
211	209, 210, 63, 72	divdird 10133	. . . 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 3342	. . . . . . . . . 10 |- ( ( ph /\ x e. A ) -> ( T ` x ) e. RR )
213	48	ffvelrnda 5831	. . . . . . . . . . 11 |- ( ( ph /\ ( X ` x ) e. D ) -> ( F ` ( X ` x ) ) e. RR )
214	83, 213	syldan 467	. . . . . . . . . 10 |- ( ( ph /\ x e. A ) -> ( F ` ( X ` x ) ) e. RR )
215	212, 214	remulcld 9402	. . . . . . . . 9 |- ( ( ph /\ x e. A ) -> ( ( T ` x ) x. ( F ` ( X ` x ) ) ) e. RR )
216	215	recnd 9400	. . . . . . . 8 |- ( ( ph /\ x e. A ) -> ( ( T ` x ) x. ( F ` ( X ` x ) ) ) e. CC )
217	78, 216	syldan 467	. . . . . . 7 |- ( ( ph /\ x e. B ) -> ( ( T ` x ) x. ( F ` ( X ` x ) ) ) e. CC )
218	89	fveq2d 5683	. . . . . . . 8 |- ( x = z -> ( F ` ( X ` x ) ) = ( F ` ( X ` z ) ) )
219	88, 218	oveq12d 6098	. . . . . . 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 16428	. . . . . 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 5732	. . . . . . . . . . 11 |- ( ph -> F = ( y e. D |-> ( F ` y ) ) )
222		fveq2 5679	. . . . . . . . . . 11 |- ( y = ( X ` x ) -> ( F ` y ) = ( F ` ( X ` x ) ) )
223	83, 93, 221, 222	fmptco 5863	. . . . . . . . . 10 |- ( ph -> ( F o. X ) = ( x e. A |-> ( F ` ( X ` x ) ) ) )
224	5, 79, 214, 92, 223	offval2 6325	. . . . . . . . 9 |- ( ph -> ( T oF x. ( F o. X ) ) = ( x e. A |-> ( ( T ` x ) x. ( F ` ( X ` x ) ) ) ) )
225	224	reseq1d 5096	. . . . . . . 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 5144	. . . . . . . . 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 2465	. . . . . . 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 6096	. . . . . 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 5096	. . . . . . . . 9 |- ( ph -> ( ( T oF x. ( F o. X ) ) |` B ) = ( ( x e. A |-> ( ( T ` x ) x. ( F ` ( X ` x ) ) ) ) |` B ) )
231		resmpt 5144	. . . . . . . . . 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 2465	. . . . . . . 8 |- ( ph -> ( ( T oF x. ( F o. X ) ) |` B ) = ( x e. B |-> ( ( T ` x ) x. ( F ` ( X ` x ) ) ) ) )
234	233	oveq2d 6096	. . . . . . 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 6095	. . . . . 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 2475	. . . . 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 6095	. . . 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 10124	. . . . 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 6098	. . . 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 2475	. . 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 4310	. 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 529	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 958   = wceq 1362   e. wcel 1755   _Vcvv 2962   u. cun 3314   C_ wss 3316   {csn 3865   class class class wbr 4280   e. cmpt 4338   |` cres 4829   o. ccom 4831   -->wf 5402   ` cfv 5406  (class class class)co 6080   oFcof 6307   Fincfn 7298   CCcc 9268   RRcr 9269   0cc0 9270   1c1 9271   + caddc 9273   x. cmul 9275   +oocpnf 9403   RR*cxr 9405   < clt 9406   <_ cle 9407   - cmin 9583   / cdiv 9981   RR+crp 10979   [,)cico 11290   [,]cicc 11291   gsum_g cgsu 14362  SubGrpcsubg 15655  CMndccmn 16257   Abelcabel 16258   Ringcrg 16577   DivRingcdr 16756  SubRingcsubrg 16785  ℂ_fldccnfld 17662  RRfldcrefld 17876

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1594  ax-4 1605  ax-5 1669  ax-6 1707  ax-7 1727  ax-8 1757  ax-9 1759  ax-10 1774  ax-11 1779  ax-12 1791  ax-13 1942  ax-ext 2414  ax-rep 4391  ax-sep 4401  ax-nul 4409  ax-pow 4458  ax-pr 4519  ax-un 6361  ax-inf2 7835  ax-cnex 9326  ax-resscn 9327  ax-1cn 9328  ax-icn 9329  ax-addcl 9330  ax-addrcl 9331  ax-mulcl 9332  ax-mulrcl 9333  ax-mulcom 9334  ax-addass 9335  ax-mulass 9336  ax-distr 9337  ax-i2m1 9338  ax-1ne0 9339  ax-1rid 9340  ax-rnegex 9341  ax-rrecex 9342  ax-cnre 9343  ax-pre-lttri 9344  ax-pre-lttrn 9345  ax-pre-ltadd 9346  ax-pre-mulgt0 9347  ax-addf 9349  ax-mulf 9350

This theorem depends on definitions:  df-bi 185  df-or 370  df-an 371  df-3or 959  df-3an 960  df-tru 1365  df-ex 1590  df-nf 1593  df-sb 1700  df-eu 2258  df-mo 2259  df-clab 2420  df-cleq 2426  df-clel 2429  df-nfc 2558  df-ne 2598  df-nel 2599  df-ral 2710  df-rex 2711  df-reu 2712  df-rmo 2713  df-rab 2714  df-v 2964  df-sbc 3176  df-csb 3277  df-dif 3319  df-un 3321  df-in 3323  df-ss 3330  df-pss 3332  df-nul 3626  df-if 3780  df-pw 3850  df-sn 3866  df-pr 3868  df-tp 3870  df-op 3872  df-uni 4080  df-int 4117  df-iun 4161  df-iin 4162  df-br 4281  df-opab 4339  df-mpt 4340  df-tr 4374  df-eprel 4619  df-id 4623  df-po 4628  df-so 4629  df-fr 4666  df-se 4667  df-we 4668  df-ord 4709  df-on 4710  df-lim 4711  df-suc 4712  df-xp 4833  df-rel 4834  df-cnv 4835  df-co 4836  df-dm 4837  df-rn 4838  df-res 4839  df-ima 4840  df-iota 5369  df-fun 5408  df-fn 5409  df-f 5410  df-f1 5411  df-fo 5412  df-f1o 5413  df-fv 5414  df-isom 5415  df-riota 6039  df-ov 6083  df-oprab 6084  df-mpt2 6085  df-of 6309  df-om 6466  df-1st 6566  df-2nd 6567  df-supp 6680  df-tpos 6734  df-recs 6818  df-rdg 6852  df-1o 6908  df-oadd 6912  df-er 7089  df-en 7299  df-dom 7300  df-sdom 7301  df-fin 7302  df-fsupp 7609  df-oi 7712  df-card 8097  df-pnf 9408  df-mnf 9409  df-xr 9410  df-ltxr 9411  df-le 9412  df-sub 9585  df-neg 9586  df-div 9982  df-nn 10311  df-2 10368  df-3 10369  df-4 10370  df-5 10371  df-6 10372  df-7 10373  df-8 10374  df-9 10375  df-10 10376  df-n0 10568  df-z 10635  df-dec 10744  df-uz 10850  df-rp 10980  df-ico 11294  df-icc 11295  df-fz 11425  df-fzo 11533  df-seq 11791  df-hash 12088  df-struct 14159  df-ndx 14160  df-slot 14161  df-base 14162  df-sets 14163  df-ress 14164  df-plusg 14234  df-mulr 14235  df-starv 14236  df-tset 14240  df-ple 14241  df-ds 14243  df-unif 14244  df-0g 14363  df-gsum 14364  df-mre 14507  df-mrc 14508  df-acs 14510  df-mnd 15398  df-submnd 15448  df-grp 15525  df-minusg 15526  df-mulg 15528  df-subg 15658  df-cntz 15815  df-cmn 16259  df-abl 16260  df-mgp 16566  df-rng 16580  df-cring 16581  df-ur 16582  df-oppr 16649  df-dvdsr 16667  df-unit 16668  df-invr 16698  df-dvr 16709  df-drng 16758  df-subrg 16787  df-cnfld 17663  df-refld 17877

This theorem is referenced by:  jensen  22267