Theorem ibladdnclem 29664

Description: Lemma for ibladdnc 29665; cf ibladdlem 21977, whose fifth hypothesis is rendered unnecessary by the weakened hypotheses of itg2addnc 29662. (Contributed by Brendan Leahy, 31-Oct-2017.)

Hypotheses

Ref	Expression
ibladdnclem.1	|- ( ( ph /\ x e. A ) -> B e. RR )
ibladdnclem.2	|- ( ( ph /\ x e. A ) -> C e. RR )
ibladdnclem.3	|- ( ( ph /\ x e. A ) -> D = ( B + C ) )
ibladdnclem.4	|- ( ph -> ( x e. A |-> B ) e. MblFn )
ibladdnclem.6	|- ( ph -> ( S.2 ` ( x e. RR |-> if ( ( x e. A /\ 0 <_ B ) , B , 0 ) ) ) e. RR )
ibladdnclem.7	|- ( ph -> ( S.2 ` ( x e. RR |-> if ( ( x e. A /\ 0 <_ C ) , C , 0 ) ) ) e. RR )

Assertion

Ref	Expression
ibladdnclem	|- ( ph -> ( S.2 ` ( x e. RR |-> if ( ( x e. A /\ 0 <_ D ) , D , 0 ) ) ) e. RR )

Distinct variable groups:   x, A   ph, x

Allowed substitution hints:   B( x)   C( x)   D( x)

Proof of Theorem ibladdnclem

Step	Hyp	Ref	Expression
1		ifan 3985	. . . 4 |- if ( ( x e. A /\ 0 <_ D ) , D , 0 ) = if ( x e. A , if ( 0 <_ D , D , 0 ) , 0 )
2		ibladdnclem.3	. . . . . . . . . 10 |- ( ( ph /\ x e. A ) -> D = ( B + C ) )
3		ibladdnclem.1	. . . . . . . . . . 11 |- ( ( ph /\ x e. A ) -> B e. RR )
4		ibladdnclem.2	. . . . . . . . . . 11 |- ( ( ph /\ x e. A ) -> C e. RR )
5	3, 4	readdcld 9622	. . . . . . . . . 10 |- ( ( ph /\ x e. A ) -> ( B + C ) e. RR )
6	2, 5	eqeltrd 2555	. . . . . . . . 9 |- ( ( ph /\ x e. A ) -> D e. RR )
7		0re 9595	. . . . . . . . 9 |- 0 e. RR
8		ifcl 3981	. . . . . . . . 9 |- ( ( D e. RR /\ 0 e. RR ) -> if ( 0 <_ D , D , 0 ) e. RR )
9	6, 7, 8	sylancl 662	. . . . . . . 8 |- ( ( ph /\ x e. A ) -> if ( 0 <_ D , D , 0 ) e. RR )
10	9	rexrd 9642	. . . . . . 7 |- ( ( ph /\ x e. A ) -> if ( 0 <_ D , D , 0 ) e. RR* )
11		max1 11385	. . . . . . . 8 |- ( ( 0 e. RR /\ D e. RR ) -> 0 <_ if ( 0 <_ D , D , 0 ) )
12	7, 6, 11	sylancr 663	. . . . . . 7 |- ( ( ph /\ x e. A ) -> 0 <_ if ( 0 <_ D , D , 0 ) )
13		elxrge0 11628	. . . . . . 7 |- ( if ( 0 <_ D , D , 0 ) e. ( 0 [,] +oo ) <-> ( if ( 0 <_ D , D , 0 ) e. RR* /\ 0 <_ if ( 0 <_ D , D , 0 ) ) )
14	10, 12, 13	sylanbrc 664	. . . . . 6 |- ( ( ph /\ x e. A ) -> if ( 0 <_ D , D , 0 ) e. ( 0 [,] +oo ) )
15		0e0iccpnf 11630	. . . . . . 7 |- 0 e. ( 0 [,] +oo )
16	15	a1i 11	. . . . . 6 |- ( ( ph /\ -. x e. A ) -> 0 e. ( 0 [,] +oo ) )
17	14, 16	ifclda 3971	. . . . 5 |- ( ph -> if ( x e. A , if ( 0 <_ D , D , 0 ) , 0 ) e. ( 0 [,] +oo ) )
18	17	adantr 465	. . . 4 |- ( ( ph /\ x e. RR ) -> if ( x e. A , if ( 0 <_ D , D , 0 ) , 0 ) e. ( 0 [,] +oo ) )
19	1, 18	syl5eqel 2559	. . 3 |- ( ( ph /\ x e. RR ) -> if ( ( x e. A /\ 0 <_ D ) , D , 0 ) e. ( 0 [,] +oo ) )
20		eqid 2467	. . 3 |- ( x e. RR |-> if ( ( x e. A /\ 0 <_ D ) , D , 0 ) ) = ( x e. RR |-> if ( ( x e. A /\ 0 <_ D ) , D , 0 ) )
21	19, 20	fmptd 6044	. 2 |- ( ph -> ( x e. RR |-> if ( ( x e. A /\ 0 <_ D ) , D , 0 ) ) : RR --> ( 0 [,] +oo ) )
22		reex 9582	. . . . . . . 8 |- RR e. _V
23	22	a1i 11	. . . . . . 7 |- ( ph -> RR e. _V )
24		ifan 3985	. . . . . . . . 9 |- if ( ( x e. A /\ 0 <_ B ) , B , 0 ) = if ( x e. A , if ( 0 <_ B , B , 0 ) , 0 )
25		ifcl 3981	. . . . . . . . . . 11 |- ( ( B e. RR /\ 0 e. RR ) -> if ( 0 <_ B , B , 0 ) e. RR )
26	3, 7, 25	sylancl 662	. . . . . . . . . 10 |- ( ( ph /\ x e. A ) -> if ( 0 <_ B , B , 0 ) e. RR )
27	7	a1i 11	. . . . . . . . . 10 |- ( ( ph /\ -. x e. A ) -> 0 e. RR )
28	26, 27	ifclda 3971	. . . . . . . . 9 |- ( ph -> if ( x e. A , if ( 0 <_ B , B , 0 ) , 0 ) e. RR )
29	24, 28	syl5eqel 2559	. . . . . . . 8 |- ( ph -> if ( ( x e. A /\ 0 <_ B ) , B , 0 ) e. RR )
30	29	adantr 465	. . . . . . 7 |- ( ( ph /\ x e. RR ) -> if ( ( x e. A /\ 0 <_ B ) , B , 0 ) e. RR )
31		ifan 3985	. . . . . . . . 9 |- if ( ( x e. A /\ 0 <_ C ) , C , 0 ) = if ( x e. A , if ( 0 <_ C , C , 0 ) , 0 )
32		ifcl 3981	. . . . . . . . . . 11 |- ( ( C e. RR /\ 0 e. RR ) -> if ( 0 <_ C , C , 0 ) e. RR )
33	4, 7, 32	sylancl 662	. . . . . . . . . 10 |- ( ( ph /\ x e. A ) -> if ( 0 <_ C , C , 0 ) e. RR )
34	33, 27	ifclda 3971	. . . . . . . . 9 |- ( ph -> if ( x e. A , if ( 0 <_ C , C , 0 ) , 0 ) e. RR )
35	31, 34	syl5eqel 2559	. . . . . . . 8 |- ( ph -> if ( ( x e. A /\ 0 <_ C ) , C , 0 ) e. RR )
36	35	adantr 465	. . . . . . 7 |- ( ( ph /\ x e. RR ) -> if ( ( x e. A /\ 0 <_ C ) , C , 0 ) e. RR )
37		eqidd 2468	. . . . . . 7 |- ( ph -> ( x e. RR |-> if ( ( x e. A /\ 0 <_ B ) , B , 0 ) ) = ( x e. RR |-> if ( ( x e. A /\ 0 <_ B ) , B , 0 ) ) )
38		eqidd 2468	. . . . . . 7 |- ( ph -> ( x e. RR |-> if ( ( x e. A /\ 0 <_ C ) , C , 0 ) ) = ( x e. RR |-> if ( ( x e. A /\ 0 <_ C ) , C , 0 ) ) )
39	23, 30, 36, 37, 38	offval2 6539	. . . . . 6 |- ( ph -> ( ( x e. RR |-> if ( ( x e. A /\ 0 <_ B ) , B , 0 ) ) oF + ( x e. RR |-> if ( ( x e. A /\ 0 <_ C ) , C , 0 ) ) ) = ( x e. RR |-> ( if ( ( x e. A /\ 0 <_ B ) , B , 0 ) + if ( ( x e. A /\ 0 <_ C ) , C , 0 ) ) ) )
40		iftrue 3945	. . . . . . . . 9 |- ( x e. A -> if ( x e. A , ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) , 0 ) = ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) )
41		ibar 504	. . . . . . . . . . 11 |- ( x e. A -> ( 0 <_ B <-> ( x e. A /\ 0 <_ B ) ) )
42	41	ifbid 3961	. . . . . . . . . 10 |- ( x e. A -> if ( 0 <_ B , B , 0 ) = if ( ( x e. A /\ 0 <_ B ) , B , 0 ) )
43		ibar 504	. . . . . . . . . . 11 |- ( x e. A -> ( 0 <_ C <-> ( x e. A /\ 0 <_ C ) ) )
44	43	ifbid 3961	. . . . . . . . . 10 |- ( x e. A -> if ( 0 <_ C , C , 0 ) = if ( ( x e. A /\ 0 <_ C ) , C , 0 ) )
45	42, 44	oveq12d 6301	. . . . . . . . 9 |- ( x e. A -> ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) = ( if ( ( x e. A /\ 0 <_ B ) , B , 0 ) + if ( ( x e. A /\ 0 <_ C ) , C , 0 ) ) )
46	40, 45	eqtr2d 2509	. . . . . . . 8 |- ( x e. A -> ( if ( ( x e. A /\ 0 <_ B ) , B , 0 ) + if ( ( x e. A /\ 0 <_ C ) , C , 0 ) ) = if ( x e. A , ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) , 0 ) )
47		00id 9753	. . . . . . . . 9 |- ( 0 + 0 ) = 0
48		simpl 457	. . . . . . . . . . . 12 |- ( ( x e. A /\ 0 <_ B ) -> x e. A )
49	48	con3i 135	. . . . . . . . . . 11 |- ( -. x e. A -> -. ( x e. A /\ 0 <_ B ) )
50		iffalse 3948	. . . . . . . . . . 11 |- ( -. ( x e. A /\ 0 <_ B ) -> if ( ( x e. A /\ 0 <_ B ) , B , 0 ) = 0 )
51	49, 50	syl 16	. . . . . . . . . 10 |- ( -. x e. A -> if ( ( x e. A /\ 0 <_ B ) , B , 0 ) = 0 )
52		simpl 457	. . . . . . . . . . . 12 |- ( ( x e. A /\ 0 <_ C ) -> x e. A )
53	52	con3i 135	. . . . . . . . . . 11 |- ( -. x e. A -> -. ( x e. A /\ 0 <_ C ) )
54		iffalse 3948	. . . . . . . . . . 11 |- ( -. ( x e. A /\ 0 <_ C ) -> if ( ( x e. A /\ 0 <_ C ) , C , 0 ) = 0 )
55	53, 54	syl 16	. . . . . . . . . 10 |- ( -. x e. A -> if ( ( x e. A /\ 0 <_ C ) , C , 0 ) = 0 )
56	51, 55	oveq12d 6301	. . . . . . . . 9 |- ( -. x e. A -> ( if ( ( x e. A /\ 0 <_ B ) , B , 0 ) + if ( ( x e. A /\ 0 <_ C ) , C , 0 ) ) = ( 0 + 0 ) )
57		iffalse 3948	. . . . . . . . 9 |- ( -. x e. A -> if ( x e. A , ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) , 0 ) = 0 )
58	47, 56, 57	3eqtr4a 2534	. . . . . . . 8 |- ( -. x e. A -> ( if ( ( x e. A /\ 0 <_ B ) , B , 0 ) + if ( ( x e. A /\ 0 <_ C ) , C , 0 ) ) = if ( x e. A , ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) , 0 ) )
59	46, 58	pm2.61i 164	. . . . . . 7 |- ( if ( ( x e. A /\ 0 <_ B ) , B , 0 ) + if ( ( x e. A /\ 0 <_ C ) , C , 0 ) ) = if ( x e. A , ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) , 0 )
60	59	mpteq2i 4530	. . . . . 6 |- ( x e. RR |-> ( if ( ( x e. A /\ 0 <_ B ) , B , 0 ) + if ( ( x e. A /\ 0 <_ C ) , C , 0 ) ) ) = ( x e. RR |-> if ( x e. A , ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) , 0 ) )
61	39, 60	syl6eq 2524	. . . . 5 |- ( ph -> ( ( x e. RR |-> if ( ( x e. A /\ 0 <_ B ) , B , 0 ) ) oF + ( x e. RR |-> if ( ( x e. A /\ 0 <_ C ) , C , 0 ) ) ) = ( x e. RR |-> if ( x e. A , ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) , 0 ) ) )
62	61	fveq2d 5869	. . . 4 |- ( ph -> ( S.2 ` ( ( x e. RR |-> if ( ( x e. A /\ 0 <_ B ) , B , 0 ) ) oF + ( x e. RR |-> if ( ( x e. A /\ 0 <_ C ) , C , 0 ) ) ) ) = ( S.2 ` ( x e. RR |-> if ( x e. A , ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) , 0 ) ) ) )
63		ibladdnclem.4	. . . . . . . 8 |- ( ph -> ( x e. A |-> B ) e. MblFn )
64	63, 3	mbfdm2 21796	. . . . . . 7 |- ( ph -> A e. dom vol )
65		mblss 21693	. . . . . . 7 |- ( A e. dom vol -> A C_ RR )
66	64, 65	syl 16	. . . . . 6 |- ( ph -> A C_ RR )
67		rembl 21702	. . . . . . 7 |- RR e. dom vol
68	67	a1i 11	. . . . . 6 |- ( ph -> RR e. dom vol )
69	29	adantr 465	. . . . . 6 |- ( ( ph /\ x e. A ) -> if ( ( x e. A /\ 0 <_ B ) , B , 0 ) e. RR )
70		eldifn 3627	. . . . . . . . 9 |- ( x e. ( RR \ A ) -> -. x e. A )
71	70	adantl 466	. . . . . . . 8 |- ( ( ph /\ x e. ( RR \ A ) ) -> -. x e. A )
72	71	intnanrd 915	. . . . . . 7 |- ( ( ph /\ x e. ( RR \ A ) ) -> -. ( x e. A /\ 0 <_ B ) )
73	72, 50	syl 16	. . . . . 6 |- ( ( ph /\ x e. ( RR \ A ) ) -> if ( ( x e. A /\ 0 <_ B ) , B , 0 ) = 0 )
74	42	mpteq2ia 4529	. . . . . . 7 |- ( x e. A |-> if ( 0 <_ B , B , 0 ) ) = ( x e. A |-> if ( ( x e. A /\ 0 <_ B ) , B , 0 ) )
75	3, 63	mbfpos 21809	. . . . . . 7 |- ( ph -> ( x e. A |-> if ( 0 <_ B , B , 0 ) ) e. MblFn )
76	74, 75	syl5eqelr 2560	. . . . . 6 |- ( ph -> ( x e. A |-> if ( ( x e. A /\ 0 <_ B ) , B , 0 ) ) e. MblFn )
77	66, 68, 69, 73, 76	mbfss 21804	. . . . 5 |- ( ph -> ( x e. RR |-> if ( ( x e. A /\ 0 <_ B ) , B , 0 ) ) e. MblFn )
78		max1 11385	. . . . . . . . . . 11 |- ( ( 0 e. RR /\ B e. RR ) -> 0 <_ if ( 0 <_ B , B , 0 ) )
79	7, 3, 78	sylancr 663	. . . . . . . . . 10 |- ( ( ph /\ x e. A ) -> 0 <_ if ( 0 <_ B , B , 0 ) )
80		elrege0 11626	. . . . . . . . . 10 |- ( if ( 0 <_ B , B , 0 ) e. ( 0 [,) +oo ) <-> ( if ( 0 <_ B , B , 0 ) e. RR /\ 0 <_ if ( 0 <_ B , B , 0 ) ) )
81	26, 79, 80	sylanbrc 664	. . . . . . . . 9 |- ( ( ph /\ x e. A ) -> if ( 0 <_ B , B , 0 ) e. ( 0 [,) +oo ) )
82		0e0icopnf 11629	. . . . . . . . . 10 |- 0 e. ( 0 [,) +oo )
83	82	a1i 11	. . . . . . . . 9 |- ( ( ph /\ -. x e. A ) -> 0 e. ( 0 [,) +oo ) )
84	81, 83	ifclda 3971	. . . . . . . 8 |- ( ph -> if ( x e. A , if ( 0 <_ B , B , 0 ) , 0 ) e. ( 0 [,) +oo ) )
85	24, 84	syl5eqel 2559	. . . . . . 7 |- ( ph -> if ( ( x e. A /\ 0 <_ B ) , B , 0 ) e. ( 0 [,) +oo ) )
86	85	adantr 465	. . . . . 6 |- ( ( ph /\ x e. RR ) -> if ( ( x e. A /\ 0 <_ B ) , B , 0 ) e. ( 0 [,) +oo ) )
87		eqid 2467	. . . . . 6 |- ( x e. RR |-> if ( ( x e. A /\ 0 <_ B ) , B , 0 ) ) = ( x e. RR |-> if ( ( x e. A /\ 0 <_ B ) , B , 0 ) )
88	86, 87	fmptd 6044	. . . . 5 |- ( ph -> ( x e. RR |-> if ( ( x e. A /\ 0 <_ B ) , B , 0 ) ) : RR --> ( 0 [,) +oo ) )
89		ibladdnclem.6	. . . . 5 |- ( ph -> ( S.2 ` ( x e. RR |-> if ( ( x e. A /\ 0 <_ B ) , B , 0 ) ) ) e. RR )
90		max1 11385	. . . . . . . . . . 11 |- ( ( 0 e. RR /\ C e. RR ) -> 0 <_ if ( 0 <_ C , C , 0 ) )
91	7, 4, 90	sylancr 663	. . . . . . . . . 10 |- ( ( ph /\ x e. A ) -> 0 <_ if ( 0 <_ C , C , 0 ) )
92		elrege0 11626	. . . . . . . . . 10 |- ( if ( 0 <_ C , C , 0 ) e. ( 0 [,) +oo ) <-> ( if ( 0 <_ C , C , 0 ) e. RR /\ 0 <_ if ( 0 <_ C , C , 0 ) ) )
93	33, 91, 92	sylanbrc 664	. . . . . . . . 9 |- ( ( ph /\ x e. A ) -> if ( 0 <_ C , C , 0 ) e. ( 0 [,) +oo ) )
94	93, 83	ifclda 3971	. . . . . . . 8 |- ( ph -> if ( x e. A , if ( 0 <_ C , C , 0 ) , 0 ) e. ( 0 [,) +oo ) )
95	31, 94	syl5eqel 2559	. . . . . . 7 |- ( ph -> if ( ( x e. A /\ 0 <_ C ) , C , 0 ) e. ( 0 [,) +oo ) )
96	95	adantr 465	. . . . . 6 |- ( ( ph /\ x e. RR ) -> if ( ( x e. A /\ 0 <_ C ) , C , 0 ) e. ( 0 [,) +oo ) )
97		eqid 2467	. . . . . 6 |- ( x e. RR |-> if ( ( x e. A /\ 0 <_ C ) , C , 0 ) ) = ( x e. RR |-> if ( ( x e. A /\ 0 <_ C ) , C , 0 ) )
98	96, 97	fmptd 6044	. . . . 5 |- ( ph -> ( x e. RR |-> if ( ( x e. A /\ 0 <_ C ) , C , 0 ) ) : RR --> ( 0 [,) +oo ) )
99		ibladdnclem.7	. . . . 5 |- ( ph -> ( S.2 ` ( x e. RR |-> if ( ( x e. A /\ 0 <_ C ) , C , 0 ) ) ) e. RR )
100	77, 88, 89, 98, 99	itg2addnc 29662	. . . 4 |- ( ph -> ( S.2 ` ( ( x e. RR |-> if ( ( x e. A /\ 0 <_ B ) , B , 0 ) ) oF + ( x e. RR |-> if ( ( x e. A /\ 0 <_ C ) , C , 0 ) ) ) ) = ( ( S.2 ` ( x e. RR |-> if ( ( x e. A /\ 0 <_ B ) , B , 0 ) ) ) + ( S.2 ` ( x e. RR |-> if ( ( x e. A /\ 0 <_ C ) , C , 0 ) ) ) ) )
101	62, 100	eqtr3d 2510	. . 3 |- ( ph -> ( S.2 ` ( x e. RR |-> if ( x e. A , ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) , 0 ) ) ) = ( ( S.2 ` ( x e. RR |-> if ( ( x e. A /\ 0 <_ B ) , B , 0 ) ) ) + ( S.2 ` ( x e. RR |-> if ( ( x e. A /\ 0 <_ C ) , C , 0 ) ) ) ) )
102	89, 99	readdcld 9622	. . 3 |- ( ph -> ( ( S.2 ` ( x e. RR |-> if ( ( x e. A /\ 0 <_ B ) , B , 0 ) ) ) + ( S.2 ` ( x e. RR |-> if ( ( x e. A /\ 0 <_ C ) , C , 0 ) ) ) ) e. RR )
103	101, 102	eqeltrd 2555	. 2 |- ( ph -> ( S.2 ` ( x e. RR |-> if ( x e. A , ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) , 0 ) ) ) e. RR )
104	26, 33	readdcld 9622	. . . . . . . 8 |- ( ( ph /\ x e. A ) -> ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) e. RR )
105	104	rexrd 9642	. . . . . . 7 |- ( ( ph /\ x e. A ) -> ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) e. RR* )
106	26, 33, 79, 91	addge0d 10127	. . . . . . 7 |- ( ( ph /\ x e. A ) -> 0 <_ ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) )
107		elxrge0 11628	. . . . . . 7 |- ( ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) e. ( 0 [,] +oo ) <-> ( ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) e. RR* /\ 0 <_ ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) ) )
108	105, 106, 107	sylanbrc 664	. . . . . 6 |- ( ( ph /\ x e. A ) -> ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) e. ( 0 [,] +oo ) )
109	108, 16	ifclda 3971	. . . . 5 |- ( ph -> if ( x e. A , ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) , 0 ) e. ( 0 [,] +oo ) )
110	109	adantr 465	. . . 4 |- ( ( ph /\ x e. RR ) -> if ( x e. A , ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) , 0 ) e. ( 0 [,] +oo ) )
111		eqid 2467	. . . 4 |- ( x e. RR |-> if ( x e. A , ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) , 0 ) ) = ( x e. RR |-> if ( x e. A , ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) , 0 ) )
112	110, 111	fmptd 6044	. . 3 |- ( ph -> ( x e. RR |-> if ( x e. A , ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) , 0 ) ) : RR --> ( 0 [,] +oo ) )
113		max2 11387	. . . . . . . . . . . . 13 |- ( ( 0 e. RR /\ B e. RR ) -> B <_ if ( 0 <_ B , B , 0 ) )
114	7, 3, 113	sylancr 663	. . . . . . . . . . . 12 |- ( ( ph /\ x e. A ) -> B <_ if ( 0 <_ B , B , 0 ) )
115		max2 11387	. . . . . . . . . . . . 13 |- ( ( 0 e. RR /\ C e. RR ) -> C <_ if ( 0 <_ C , C , 0 ) )
116	7, 4, 115	sylancr 663	. . . . . . . . . . . 12 |- ( ( ph /\ x e. A ) -> C <_ if ( 0 <_ C , C , 0 ) )
117	3, 4, 26, 33, 114, 116	le2addd 10169	. . . . . . . . . . 11 |- ( ( ph /\ x e. A ) -> ( B + C ) <_ ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) )
118	2, 117	eqbrtrd 4467	. . . . . . . . . 10 |- ( ( ph /\ x e. A ) -> D <_ ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) )
119		breq1 4450	. . . . . . . . . . 11 |- ( D = if ( 0 <_ D , D , 0 ) -> ( D <_ ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) <-> if ( 0 <_ D , D , 0 ) <_ ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) ) )
120		breq1 4450	. . . . . . . . . . 11 |- ( 0 = if ( 0 <_ D , D , 0 ) -> ( 0 <_ ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) <-> if ( 0 <_ D , D , 0 ) <_ ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) ) )
121	119, 120	ifboth 3975	. . . . . . . . . 10 |- ( ( D <_ ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) /\ 0 <_ ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) ) -> if ( 0 <_ D , D , 0 ) <_ ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) )
122	118, 106, 121	syl2anc 661	. . . . . . . . 9 |- ( ( ph /\ x e. A ) -> if ( 0 <_ D , D , 0 ) <_ ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) )
123		iftrue 3945	. . . . . . . . . 10 |- ( x e. A -> if ( x e. A , if ( 0 <_ D , D , 0 ) , 0 ) = if ( 0 <_ D , D , 0 ) )
124	123	adantl 466	. . . . . . . . 9 |- ( ( ph /\ x e. A ) -> if ( x e. A , if ( 0 <_ D , D , 0 ) , 0 ) = if ( 0 <_ D , D , 0 ) )
125	40	adantl 466	. . . . . . . . 9 |- ( ( ph /\ x e. A ) -> if ( x e. A , ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) , 0 ) = ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) )
126	122, 124, 125	3brtr4d 4477	. . . . . . . 8 |- ( ( ph /\ x e. A ) -> if ( x e. A , if ( 0 <_ D , D , 0 ) , 0 ) <_ if ( x e. A , ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) , 0 ) )
127	126	ex 434	. . . . . . 7 |- ( ph -> ( x e. A -> if ( x e. A , if ( 0 <_ D , D , 0 ) , 0 ) <_ if ( x e. A , ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) , 0 ) ) )
128		0le0 10624	. . . . . . . . 9 |- 0 <_ 0
129	128	a1i 11	. . . . . . . 8 |- ( -. x e. A -> 0 <_ 0 )
130		iffalse 3948	. . . . . . . 8 |- ( -. x e. A -> if ( x e. A , if ( 0 <_ D , D , 0 ) , 0 ) = 0 )
131	129, 130, 57	3brtr4d 4477	. . . . . . 7 |- ( -. x e. A -> if ( x e. A , if ( 0 <_ D , D , 0 ) , 0 ) <_ if ( x e. A , ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) , 0 ) )
132	127, 131	pm2.61d1 159	. . . . . 6 |- ( ph -> if ( x e. A , if ( 0 <_ D , D , 0 ) , 0 ) <_ if ( x e. A , ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) , 0 ) )
133	1, 132	syl5eqbr 4480	. . . . 5 |- ( ph -> if ( ( x e. A /\ 0 <_ D ) , D , 0 ) <_ if ( x e. A , ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) , 0 ) )
134	133	ralrimivw 2879	. . . 4 |- ( ph -> A. x e. RR if ( ( x e. A /\ 0 <_ D ) , D , 0 ) <_ if ( x e. A , ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) , 0 ) )
135		eqidd 2468	. . . . 5 |- ( ph -> ( x e. RR |-> if ( ( x e. A /\ 0 <_ D ) , D , 0 ) ) = ( x e. RR |-> if ( ( x e. A /\ 0 <_ D ) , D , 0 ) ) )
136		eqidd 2468	. . . . 5 |- ( ph -> ( x e. RR |-> if ( x e. A , ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) , 0 ) ) = ( x e. RR |-> if ( x e. A , ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) , 0 ) ) )
137	23, 19, 110, 135, 136	ofrfval2 6540	. . . 4 |- ( ph -> ( ( x e. RR |-> if ( ( x e. A /\ 0 <_ D ) , D , 0 ) ) oR <_ ( x e. RR |-> if ( x e. A , ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) , 0 ) ) <-> A. x e. RR if ( ( x e. A /\ 0 <_ D ) , D , 0 ) <_ if ( x e. A , ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) , 0 ) ) )
138	134, 137	mpbird 232	. . 3 |- ( ph -> ( x e. RR |-> if ( ( x e. A /\ 0 <_ D ) , D , 0 ) ) oR <_ ( x e. RR |-> if ( x e. A , ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) , 0 ) ) )
139		itg2le 21897	. . 3 |- ( ( ( x e. RR |-> if ( ( x e. A /\ 0 <_ D ) , D , 0 ) ) : RR --> ( 0 [,] +oo ) /\ ( x e. RR |-> if ( x e. A , ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) , 0 ) ) : RR --> ( 0 [,] +oo ) /\ ( x e. RR |-> if ( ( x e. A /\ 0 <_ D ) , D , 0 ) ) oR <_ ( x e. RR |-> if ( x e. A , ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) , 0 ) ) ) -> ( S.2 ` ( x e. RR |-> if ( ( x e. A /\ 0 <_ D ) , D , 0 ) ) ) <_ ( S.2 ` ( x e. RR |-> if ( x e. A , ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) , 0 ) ) ) )
140	21, 112, 138, 139	syl3anc 1228	. 2 |- ( ph -> ( S.2 ` ( x e. RR |-> if ( ( x e. A /\ 0 <_ D ) , D , 0 ) ) ) <_ ( S.2 ` ( x e. RR |-> if ( x e. A , ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) , 0 ) ) ) )
141		itg2lecl 21896	. 2 |- ( ( ( x e. RR |-> if ( ( x e. A /\ 0 <_ D ) , D , 0 ) ) : RR --> ( 0 [,] +oo ) /\ ( S.2 ` ( x e. RR |-> if ( x e. A , ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) , 0 ) ) ) e. RR /\ ( S.2 ` ( x e. RR |-> if ( ( x e. A /\ 0 <_ D ) , D , 0 ) ) ) <_ ( S.2 ` ( x e. RR |-> if ( x e. A , ( if ( 0 <_ B , B , 0 ) + if ( 0 <_ C , C , 0 ) ) , 0 ) ) ) ) -> ( S.2 ` ( x e. RR |-> if ( ( x e. A /\ 0 <_ D ) , D , 0 ) ) ) e. RR )
142	21, 103, 140, 141	syl3anc 1228	1 |- ( ph -> ( S.2 ` ( x e. RR |-> if ( ( x e. A /\ 0 <_ D ) , D , 0 ) ) ) e. RR )

Syntax hints:   -. wn 3   -> wi 4   /\ wa 369   = wceq 1379   e. wcel 1767   A.wral 2814   _Vcvv 3113   \ cdif 3473   C_ wss 3476   ifcif 3939   class class class wbr 4447   |-> cmpt 4505   dom cdm 4999   -->wf 5583   ` cfv 5587  (class class class)co 6283   oFcof 6521   oRcofr 6522   RRcr 9490   0cc0 9491   + caddc 9494   +oocpnf 9624   RR*cxr 9626   <_ cle 9628   [,)cico 11530   [,]cicc 11531   volcvol 21626  MblFncmbf 21774   S.2citg2 21776

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

This theorem depends on definitions:  df-bi 185  df-or 370  df-an 371  df-3or 974  df-3an 975  df-tru 1382  df-fal 1385  df-ex 1597  df-nf 1600  df-sb 1712  df-eu 2279  df-mo 2280  df-clab 2453  df-cleq 2459  df-clel 2462  df-nfc 2617  df-ne 2664  df-nel 2665  df-ral 2819  df-rex 2820  df-reu 2821  df-rmo 2822  df-rab 2823  df-v 3115  df-sbc 3332  df-csb 3436  df-dif 3479  df-un 3481  df-in 3483  df-ss 3490  df-pss 3492  df-nul 3786  df-if 3940  df-pw 4012  df-sn 4028  df-pr 4030  df-tp 4032  df-op 4034  df-uni 4246  df-int 4283  df-iun 4327  df-disj 4418  df-br 4448  df-opab 4506  df-mpt 4507  df-tr 4541  df-eprel 4791  df-id 4795  df-po 4800  df-so 4801  df-fr 4838  df-se 4839  df-we 4840  df-ord 4881  df-on 4882  df-lim 4883  df-suc 4884  df-xp 5005  df-rel 5006  df-cnv 5007  df-co 5008  df-dm 5009  df-rn 5010  df-res 5011  df-ima 5012  df-iota 5550  df-fun 5589  df-fn 5590  df-f 5591  df-f1 5592  df-fo 5593  df-f1o 5594  df-fv 5595  df-isom 5596  df-riota 6244  df-ov 6286  df-oprab 6287  df-mpt2 6288  df-of 6523  df-ofr 6524  df-om 6680  df-1st 6784  df-2nd 6785  df-recs 7042  df-rdg 7076  df-1o 7130  df-2o 7131  df-oadd 7134  df-er 7311  df-map 7422  df-pm 7423  df-en 7517  df-dom 7518  df-sdom 7519  df-fin 7520  df-fi 7870  df-sup 7900  df-oi 7934  df-card 8319  df-cda 8547  df-pnf 9629  df-mnf 9630  df-xr 9631  df-ltxr 9632  df-le 9633  df-sub 9806  df-neg 9807  df-div 10206  df-nn 10536  df-2 10593  df-3 10594  df-n0 10795  df-z 10864  df-uz 11082  df-q 11182  df-rp 11220  df-xneg 11317  df-xadd 11318  df-xmul 11319  df-ioo 11532  df-ico 11534  df-icc 11535  df-fz 11672  df-fzo 11792  df-fl 11896  df-seq 12075  df-exp 12134  df-hash 12373  df-cj 12894  df-re 12895  df-im 12896  df-sqrt 13030  df-abs 13031  df-clim 13273  df-sum 13471  df-rest 14677  df-topgen 14698  df-psmet 18198  df-xmet 18199  df-met 18200  df-bl 18201  df-mopn 18202  df-top 19182  df-bases 19184  df-topon 19185  df-cmp 19669  df-ovol 21627  df-vol 21628  df-mbf 21779  df-itg1 21780  df-itg2 21781

This theorem is referenced by:  ibladdnc  29665