Step | Hyp | Ref
| Expression |
1 | | vonioo.l |
. . . . 5
β’ πΏ = (π₯ β Fin β¦ (π β (β βm π₯), π β (β βm π₯) β¦ if(π₯ = β
, 0, βπ β π₯ (volβ((πβπ)[,)(πβπ)))))) |
2 | | vonioo.a |
. . . . . . 7
β’ (π β π΄:πβΆβ) |
3 | 2 | adantr 482 |
. . . . . 6
β’ ((π β§ π = β
) β π΄:πβΆβ) |
4 | | feq2 6696 |
. . . . . . 7
β’ (π = β
β (π΄:πβΆβ β π΄:β
βΆβ)) |
5 | 4 | adantl 483 |
. . . . . 6
β’ ((π β§ π = β
) β (π΄:πβΆβ β π΄:β
βΆβ)) |
6 | 3, 5 | mpbid 231 |
. . . . 5
β’ ((π β§ π = β
) β π΄:β
βΆβ) |
7 | | vonioo.b |
. . . . . . 7
β’ (π β π΅:πβΆβ) |
8 | 7 | adantr 482 |
. . . . . 6
β’ ((π β§ π = β
) β π΅:πβΆβ) |
9 | | feq2 6696 |
. . . . . . 7
β’ (π = β
β (π΅:πβΆβ β π΅:β
βΆβ)) |
10 | 9 | adantl 483 |
. . . . . 6
β’ ((π β§ π = β
) β (π΅:πβΆβ β π΅:β
βΆβ)) |
11 | 8, 10 | mpbid 231 |
. . . . 5
β’ ((π β§ π = β
) β π΅:β
βΆβ) |
12 | 1, 6, 11 | hoidmv0val 45234 |
. . . 4
β’ ((π β§ π = β
) β (π΄(πΏββ
)π΅) = 0) |
13 | 12 | eqcomd 2739 |
. . 3
β’ ((π β§ π = β
) β 0 = (π΄(πΏββ
)π΅)) |
14 | | fveq2 6888 |
. . . . . 6
β’ (π = β
β
(volnβπ) =
(volnββ
)) |
15 | | vonioo.i |
. . . . . . . 8
β’ πΌ = Xπ β π ((π΄βπ)(,)(π΅βπ)) |
16 | 15 | a1i 11 |
. . . . . . 7
β’ (π = β
β πΌ = Xπ β π ((π΄βπ)(,)(π΅βπ))) |
17 | | ixpeq1 8898 |
. . . . . . 7
β’ (π = β
β Xπ β
π ((π΄βπ)(,)(π΅βπ)) = Xπ β β
((π΄βπ)(,)(π΅βπ))) |
18 | 16, 17 | eqtrd 2773 |
. . . . . 6
β’ (π = β
β πΌ = Xπ β β
((π΄βπ)(,)(π΅βπ))) |
19 | 14, 18 | fveq12d 6895 |
. . . . 5
β’ (π = β
β
((volnβπ)βπΌ) =
((volnββ
)βXπ β β
((π΄βπ)(,)(π΅βπ)))) |
20 | 19 | adantl 483 |
. . . 4
β’ ((π β§ π = β
) β ((volnβπ)βπΌ) = ((volnββ
)βXπ β
β
((π΄βπ)(,)(π΅βπ)))) |
21 | | 0fin 9167 |
. . . . . . 7
β’ β
β Fin |
22 | 21 | a1i 11 |
. . . . . 6
β’ ((π β§ π = β
) β β
β
Fin) |
23 | | eqid 2733 |
. . . . . 6
β’ dom
(volnββ
) = dom (volnββ
) |
24 | | ressxr 11254 |
. . . . . . . 8
β’ β
β β* |
25 | 24 | a1i 11 |
. . . . . . 7
β’ ((π β§ π = β
) β β β
β*) |
26 | 6, 25 | fssd 6732 |
. . . . . 6
β’ ((π β§ π = β
) β π΄:β
βΆβ*) |
27 | 11, 25 | fssd 6732 |
. . . . . 6
β’ ((π β§ π = β
) β π΅:β
βΆβ*) |
28 | 22, 23, 26, 27 | ioovonmbl 45328 |
. . . . 5
β’ ((π β§ π = β
) β Xπ β
β
((π΄βπ)(,)(π΅βπ)) β dom
(volnββ
)) |
29 | 28 | von0val 45322 |
. . . 4
β’ ((π β§ π = β
) β
((volnββ
)βXπ β β
((π΄βπ)(,)(π΅βπ))) = 0) |
30 | 20, 29 | eqtrd 2773 |
. . 3
β’ ((π β§ π = β
) β ((volnβπ)βπΌ) = 0) |
31 | | fveq2 6888 |
. . . . 5
β’ (π = β
β (πΏβπ) = (πΏββ
)) |
32 | 31 | oveqd 7421 |
. . . 4
β’ (π = β
β (π΄(πΏβπ)π΅) = (π΄(πΏββ
)π΅)) |
33 | 32 | adantl 483 |
. . 3
β’ ((π β§ π = β
) β (π΄(πΏβπ)π΅) = (π΄(πΏββ
)π΅)) |
34 | 13, 30, 33 | 3eqtr4d 2783 |
. 2
β’ ((π β§ π = β
) β ((volnβπ)βπΌ) = (π΄(πΏβπ)π΅)) |
35 | | neqne 2949 |
. . . 4
β’ (Β¬
π = β
β π β β
) |
36 | 35 | adantl 483 |
. . 3
β’ ((π β§ Β¬ π = β
) β π β β
) |
37 | | nfv 1918 |
. . . . . . . . 9
β’
β²π(π β§ π β β
) |
38 | | nfra1 3282 |
. . . . . . . . 9
β’
β²πβπ β π (π΄βπ) < (π΅βπ) |
39 | 37, 38 | nfan 1903 |
. . . . . . . 8
β’
β²π((π β§ π β β
) β§ βπ β π (π΄βπ) < (π΅βπ)) |
40 | 2 | ffvelcdmda 7082 |
. . . . . . . . . . . 12
β’ ((π β§ π β π) β (π΄βπ) β β) |
41 | 7 | ffvelcdmda 7082 |
. . . . . . . . . . . 12
β’ ((π β§ π β π) β (π΅βπ) β β) |
42 | | volico 44634 |
. . . . . . . . . . . 12
β’ (((π΄βπ) β β β§ (π΅βπ) β β) β (volβ((π΄βπ)[,)(π΅βπ))) = if((π΄βπ) < (π΅βπ), ((π΅βπ) β (π΄βπ)), 0)) |
43 | 40, 41, 42 | syl2anc 585 |
. . . . . . . . . . 11
β’ ((π β§ π β π) β (volβ((π΄βπ)[,)(π΅βπ))) = if((π΄βπ) < (π΅βπ), ((π΅βπ) β (π΄βπ)), 0)) |
44 | 43 | ad4ant14 751 |
. . . . . . . . . 10
β’ ((((π β§ π β β
) β§ βπ β π (π΄βπ) < (π΅βπ)) β§ π β π) β (volβ((π΄βπ)[,)(π΅βπ))) = if((π΄βπ) < (π΅βπ), ((π΅βπ) β (π΄βπ)), 0)) |
45 | | rspa 3246 |
. . . . . . . . . . . 12
β’
((βπ β
π (π΄βπ) < (π΅βπ) β§ π β π) β (π΄βπ) < (π΅βπ)) |
46 | 45 | iftrued 4535 |
. . . . . . . . . . 11
β’
((βπ β
π (π΄βπ) < (π΅βπ) β§ π β π) β if((π΄βπ) < (π΅βπ), ((π΅βπ) β (π΄βπ)), 0) = ((π΅βπ) β (π΄βπ))) |
47 | 46 | adantll 713 |
. . . . . . . . . 10
β’ ((((π β§ π β β
) β§ βπ β π (π΄βπ) < (π΅βπ)) β§ π β π) β if((π΄βπ) < (π΅βπ), ((π΅βπ) β (π΄βπ)), 0) = ((π΅βπ) β (π΄βπ))) |
48 | 44, 47 | eqtrd 2773 |
. . . . . . . . 9
β’ ((((π β§ π β β
) β§ βπ β π (π΄βπ) < (π΅βπ)) β§ π β π) β (volβ((π΄βπ)[,)(π΅βπ))) = ((π΅βπ) β (π΄βπ))) |
49 | 48 | ex 414 |
. . . . . . . 8
β’ (((π β§ π β β
) β§ βπ β π (π΄βπ) < (π΅βπ)) β (π β π β (volβ((π΄βπ)[,)(π΅βπ))) = ((π΅βπ) β (π΄βπ)))) |
50 | 39, 49 | ralrimi 3255 |
. . . . . . 7
β’ (((π β§ π β β
) β§ βπ β π (π΄βπ) < (π΅βπ)) β βπ β π (volβ((π΄βπ)[,)(π΅βπ))) = ((π΅βπ) β (π΄βπ))) |
51 | 50 | prodeq2d 15862 |
. . . . . 6
β’ (((π β§ π β β
) β§ βπ β π (π΄βπ) < (π΅βπ)) β βπ β π (volβ((π΄βπ)[,)(π΅βπ))) = βπ β π ((π΅βπ) β (π΄βπ))) |
52 | 51 | eqcomd 2739 |
. . . . 5
β’ (((π β§ π β β
) β§ βπ β π (π΄βπ) < (π΅βπ)) β βπ β π ((π΅βπ) β (π΄βπ)) = βπ β π (volβ((π΄βπ)[,)(π΅βπ)))) |
53 | | fveq2 6888 |
. . . . . . . . . 10
β’ (π = π β (π΄βπ) = (π΄βπ)) |
54 | | fveq2 6888 |
. . . . . . . . . 10
β’ (π = π β (π΅βπ) = (π΅βπ)) |
55 | 53, 54 | breq12d 5160 |
. . . . . . . . 9
β’ (π = π β ((π΄βπ) < (π΅βπ) β (π΄βπ) < (π΅βπ))) |
56 | 55 | cbvralvw 3235 |
. . . . . . . 8
β’
(βπ β
π (π΄βπ) < (π΅βπ) β βπ β π (π΄βπ) < (π΅βπ)) |
57 | 56 | biimpi 215 |
. . . . . . 7
β’
(βπ β
π (π΄βπ) < (π΅βπ) β βπ β π (π΄βπ) < (π΅βπ)) |
58 | 57 | adantl 483 |
. . . . . 6
β’ (((π β§ π β β
) β§ βπ β π (π΄βπ) < (π΅βπ)) β βπ β π (π΄βπ) < (π΅βπ)) |
59 | | vonioo.x |
. . . . . . . . 9
β’ (π β π β Fin) |
60 | 59 | adantr 482 |
. . . . . . . 8
β’ ((π β§ π β β
) β π β Fin) |
61 | 60 | adantr 482 |
. . . . . . 7
β’ (((π β§ π β β
) β§ βπ β π (π΄βπ) < (π΅βπ)) β π β Fin) |
62 | 2 | adantr 482 |
. . . . . . . 8
β’ ((π β§ π β β
) β π΄:πβΆβ) |
63 | 62 | adantr 482 |
. . . . . . 7
β’ (((π β§ π β β
) β§ βπ β π (π΄βπ) < (π΅βπ)) β π΄:πβΆβ) |
64 | 7 | adantr 482 |
. . . . . . . 8
β’ ((π β§ π β β
) β π΅:πβΆβ) |
65 | 64 | adantr 482 |
. . . . . . 7
β’ (((π β§ π β β
) β§ βπ β π (π΄βπ) < (π΅βπ)) β π΅:πβΆβ) |
66 | | simpr 486 |
. . . . . . . 8
β’ ((π β§ π β β
) β π β β
) |
67 | 66 | adantr 482 |
. . . . . . 7
β’ (((π β§ π β β
) β§ βπ β π (π΄βπ) < (π΅βπ)) β π β β
) |
68 | 56, 45 | sylanbr 583 |
. . . . . . . 8
β’
((βπ β
π (π΄βπ) < (π΅βπ) β§ π β π) β (π΄βπ) < (π΅βπ)) |
69 | 68 | adantll 713 |
. . . . . . 7
β’ ((((π β§ π β β
) β§ βπ β π (π΄βπ) < (π΅βπ)) β§ π β π) β (π΄βπ) < (π΅βπ)) |
70 | | fveq2 6888 |
. . . . . . . . . . . 12
β’ (π = π β (π΄βπ) = (π΄βπ)) |
71 | 70 | oveq1d 7419 |
. . . . . . . . . . 11
β’ (π = π β ((π΄βπ) + (1 / π)) = ((π΄βπ) + (1 / π))) |
72 | 71 | cbvmptv 5260 |
. . . . . . . . . 10
β’ (π β π β¦ ((π΄βπ) + (1 / π))) = (π β π β¦ ((π΄βπ) + (1 / π))) |
73 | 72 | a1i 11 |
. . . . . . . . 9
β’ (π = π β (π β π β¦ ((π΄βπ) + (1 / π))) = (π β π β¦ ((π΄βπ) + (1 / π)))) |
74 | | oveq2 7412 |
. . . . . . . . . . 11
β’ (π = π β (1 / π) = (1 / π)) |
75 | 74 | oveq2d 7420 |
. . . . . . . . . 10
β’ (π = π β ((π΄βπ) + (1 / π)) = ((π΄βπ) + (1 / π))) |
76 | 75 | mpteq2dv 5249 |
. . . . . . . . 9
β’ (π = π β (π β π β¦ ((π΄βπ) + (1 / π))) = (π β π β¦ ((π΄βπ) + (1 / π)))) |
77 | 73, 76 | eqtrd 2773 |
. . . . . . . 8
β’ (π = π β (π β π β¦ ((π΄βπ) + (1 / π))) = (π β π β¦ ((π΄βπ) + (1 / π)))) |
78 | 77 | cbvmptv 5260 |
. . . . . . 7
β’ (π β β β¦ (π β π β¦ ((π΄βπ) + (1 / π)))) = (π β β β¦ (π β π β¦ ((π΄βπ) + (1 / π)))) |
79 | | nfcv 2904 |
. . . . . . . 8
β’
β²πXπ β
π ((((π β β β¦ (π β π β¦ ((π΄βπ) + (1 / π))))βπ)βπ)[,)(π΅βπ)) |
80 | | nfcv 2904 |
. . . . . . . . 9
β’
β²ππ |
81 | | nffvmpt1 6899 |
. . . . . . . . . . 11
β’
β²π((π β β β¦ (π β π β¦ ((π΄βπ) + (1 / π))))βπ) |
82 | | nfcv 2904 |
. . . . . . . . . . 11
β’
β²ππ |
83 | 81, 82 | nffv 6898 |
. . . . . . . . . 10
β’
β²π(((π β β β¦ (π β π β¦ ((π΄βπ) + (1 / π))))βπ)βπ) |
84 | | nfcv 2904 |
. . . . . . . . . 10
β’
β²π[,) |
85 | | nfcv 2904 |
. . . . . . . . . 10
β’
β²π(π΅βπ) |
86 | 83, 84, 85 | nfov 7434 |
. . . . . . . . 9
β’
β²π((((π β β β¦ (π β π β¦ ((π΄βπ) + (1 / π))))βπ)βπ)[,)(π΅βπ)) |
87 | 80, 86 | nfixpw 8906 |
. . . . . . . 8
β’
β²πXπ β
π ((((π β β β¦ (π β π β¦ ((π΄βπ) + (1 / π))))βπ)βπ)[,)(π΅βπ)) |
88 | | fveq2 6888 |
. . . . . . . . . . 11
β’ (π = π β ((π β β β¦ (π β π β¦ ((π΄βπ) + (1 / π))))βπ) = ((π β β β¦ (π β π β¦ ((π΄βπ) + (1 / π))))βπ)) |
89 | 88 | fveq1d 6890 |
. . . . . . . . . 10
β’ (π = π β (((π β β β¦ (π β π β¦ ((π΄βπ) + (1 / π))))βπ)βπ) = (((π β β β¦ (π β π β¦ ((π΄βπ) + (1 / π))))βπ)βπ)) |
90 | 89 | oveq1d 7419 |
. . . . . . . . 9
β’ (π = π β ((((π β β β¦ (π β π β¦ ((π΄βπ) + (1 / π))))βπ)βπ)[,)(π΅βπ)) = ((((π β β β¦ (π β π β¦ ((π΄βπ) + (1 / π))))βπ)βπ)[,)(π΅βπ))) |
91 | 90 | ixpeq2dv 8903 |
. . . . . . . 8
β’ (π = π β Xπ β π ((((π β β β¦ (π β π β¦ ((π΄βπ) + (1 / π))))βπ)βπ)[,)(π΅βπ)) = Xπ β π ((((π β β β¦ (π β π β¦ ((π΄βπ) + (1 / π))))βπ)βπ)[,)(π΅βπ))) |
92 | 79, 87, 91 | cbvmpt 5258 |
. . . . . . 7
β’ (π β β β¦ Xπ β
π ((((π β β β¦ (π β π β¦ ((π΄βπ) + (1 / π))))βπ)βπ)[,)(π΅βπ))) = (π β β β¦ Xπ β
π ((((π β β β¦ (π β π β¦ ((π΄βπ) + (1 / π))))βπ)βπ)[,)(π΅βπ))) |
93 | 61, 63, 65, 67, 69, 15, 78, 92 | vonioolem2 45332 |
. . . . . 6
β’ (((π β§ π β β
) β§ βπ β π (π΄βπ) < (π΅βπ)) β ((volnβπ)βπΌ) = βπ β π ((π΅βπ) β (π΄βπ))) |
94 | 58, 93 | syldan 592 |
. . . . 5
β’ (((π β§ π β β
) β§ βπ β π (π΄βπ) < (π΅βπ)) β ((volnβπ)βπΌ) = βπ β π ((π΅βπ) β (π΄βπ))) |
95 | 1, 60, 66, 62, 64 | hoidmvn0val 45235 |
. . . . . 6
β’ ((π β§ π β β
) β (π΄(πΏβπ)π΅) = βπ β π (volβ((π΄βπ)[,)(π΅βπ)))) |
96 | 95 | adantr 482 |
. . . . 5
β’ (((π β§ π β β
) β§ βπ β π (π΄βπ) < (π΅βπ)) β (π΄(πΏβπ)π΅) = βπ β π (volβ((π΄βπ)[,)(π΅βπ)))) |
97 | 52, 94, 96 | 3eqtr4d 2783 |
. . . 4
β’ (((π β§ π β β
) β§ βπ β π (π΄βπ) < (π΅βπ)) β ((volnβπ)βπΌ) = (π΄(πΏβπ)π΅)) |
98 | | rexnal 3101 |
. . . . . . . . . 10
β’
(βπ β
π Β¬ (π΄βπ) < (π΅βπ) β Β¬ βπ β π (π΄βπ) < (π΅βπ)) |
99 | 98 | bicomi 223 |
. . . . . . . . 9
β’ (Β¬
βπ β π (π΄βπ) < (π΅βπ) β βπ β π Β¬ (π΄βπ) < (π΅βπ)) |
100 | 99 | biimpi 215 |
. . . . . . . 8
β’ (Β¬
βπ β π (π΄βπ) < (π΅βπ) β βπ β π Β¬ (π΄βπ) < (π΅βπ)) |
101 | 100 | adantl 483 |
. . . . . . 7
β’ ((π β§ Β¬ βπ β π (π΄βπ) < (π΅βπ)) β βπ β π Β¬ (π΄βπ) < (π΅βπ)) |
102 | | simpr 486 |
. . . . . . . . . . 11
β’ (((π β§ π β π) β§ Β¬ (π΄βπ) < (π΅βπ)) β Β¬ (π΄βπ) < (π΅βπ)) |
103 | 41 | adantr 482 |
. . . . . . . . . . . 12
β’ (((π β§ π β π) β§ Β¬ (π΄βπ) < (π΅βπ)) β (π΅βπ) β β) |
104 | 40 | adantr 482 |
. . . . . . . . . . . 12
β’ (((π β§ π β π) β§ Β¬ (π΄βπ) < (π΅βπ)) β (π΄βπ) β β) |
105 | 103, 104 | lenltd 11356 |
. . . . . . . . . . 11
β’ (((π β§ π β π) β§ Β¬ (π΄βπ) < (π΅βπ)) β ((π΅βπ) β€ (π΄βπ) β Β¬ (π΄βπ) < (π΅βπ))) |
106 | 102, 105 | mpbird 257 |
. . . . . . . . . 10
β’ (((π β§ π β π) β§ Β¬ (π΄βπ) < (π΅βπ)) β (π΅βπ) β€ (π΄βπ)) |
107 | 106 | ex 414 |
. . . . . . . . 9
β’ ((π β§ π β π) β (Β¬ (π΄βπ) < (π΅βπ) β (π΅βπ) β€ (π΄βπ))) |
108 | 107 | reximdva 3169 |
. . . . . . . 8
β’ (π β (βπ β π Β¬ (π΄βπ) < (π΅βπ) β βπ β π (π΅βπ) β€ (π΄βπ))) |
109 | 108 | adantr 482 |
. . . . . . 7
β’ ((π β§ Β¬ βπ β π (π΄βπ) < (π΅βπ)) β (βπ β π Β¬ (π΄βπ) < (π΅βπ) β βπ β π (π΅βπ) β€ (π΄βπ))) |
110 | 101, 109 | mpd 15 |
. . . . . 6
β’ ((π β§ Β¬ βπ β π (π΄βπ) < (π΅βπ)) β βπ β π (π΅βπ) β€ (π΄βπ)) |
111 | 110 | adantlr 714 |
. . . . 5
β’ (((π β§ π β β
) β§ Β¬ βπ β π (π΄βπ) < (π΅βπ)) β βπ β π (π΅βπ) β€ (π΄βπ)) |
112 | | nfcv 2904 |
. . . . . . . . 9
β’
β²π(volnβπ) |
113 | | nfixp1 8908 |
. . . . . . . . . 10
β’
β²πXπ β
π ((π΄βπ)(,)(π΅βπ)) |
114 | 15, 113 | nfcxfr 2902 |
. . . . . . . . 9
β’
β²ππΌ |
115 | 112, 114 | nffv 6898 |
. . . . . . . 8
β’
β²π((volnβπ)βπΌ) |
116 | | nfcv 2904 |
. . . . . . . 8
β’
β²π(π΄(πΏβπ)π΅) |
117 | 115, 116 | nfeq 2917 |
. . . . . . 7
β’
β²π((volnβπ)βπΌ) = (π΄(πΏβπ)π΅) |
118 | 59 | vonmea 45225 |
. . . . . . . . . . . 12
β’ (π β (volnβπ) β Meas) |
119 | 118 | mea0 45105 |
. . . . . . . . . . 11
β’ (π β ((volnβπ)ββ
) =
0) |
120 | 119 | 3ad2ant1 1134 |
. . . . . . . . . 10
β’ ((π β§ π β π β§ (π΅βπ) β€ (π΄βπ)) β ((volnβπ)ββ
) = 0) |
121 | 15 | a1i 11 |
. . . . . . . . . . . 12
β’ ((π β§ π β π β§ (π΅βπ) β€ (π΄βπ)) β πΌ = Xπ β π ((π΄βπ)(,)(π΅βπ))) |
122 | | simp2 1138 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β π β§ (π΅βπ) β€ (π΄βπ)) β π β π) |
123 | | simp3 1139 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π β π β§ (π΅βπ) β€ (π΄βπ)) β (π΅βπ) β€ (π΄βπ)) |
124 | 24, 40 | sselid 3979 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π β π) β (π΄βπ) β
β*) |
125 | 124 | 3adant3 1133 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β π β§ (π΅βπ) β€ (π΄βπ)) β (π΄βπ) β
β*) |
126 | 24, 41 | sselid 3979 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π β π) β (π΅βπ) β
β*) |
127 | 126 | 3adant3 1133 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β π β§ (π΅βπ) β€ (π΄βπ)) β (π΅βπ) β
β*) |
128 | | ioo0 13345 |
. . . . . . . . . . . . . . . 16
β’ (((π΄βπ) β β* β§ (π΅βπ) β β*) β (((π΄βπ)(,)(π΅βπ)) = β
β (π΅βπ) β€ (π΄βπ))) |
129 | 125, 127,
128 | syl2anc 585 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π β π β§ (π΅βπ) β€ (π΄βπ)) β (((π΄βπ)(,)(π΅βπ)) = β
β (π΅βπ) β€ (π΄βπ))) |
130 | 123, 129 | mpbird 257 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β π β§ (π΅βπ) β€ (π΄βπ)) β ((π΄βπ)(,)(π΅βπ)) = β
) |
131 | | rspe 3247 |
. . . . . . . . . . . . . 14
β’ ((π β π β§ ((π΄βπ)(,)(π΅βπ)) = β
) β βπ β π ((π΄βπ)(,)(π΅βπ)) = β
) |
132 | 122, 130,
131 | syl2anc 585 |
. . . . . . . . . . . . 13
β’ ((π β§ π β π β§ (π΅βπ) β€ (π΄βπ)) β βπ β π ((π΄βπ)(,)(π΅βπ)) = β
) |
133 | | ixp0 8921 |
. . . . . . . . . . . . 13
β’
(βπ β
π ((π΄βπ)(,)(π΅βπ)) = β
β Xπ β
π ((π΄βπ)(,)(π΅βπ)) = β
) |
134 | 132, 133 | syl 17 |
. . . . . . . . . . . 12
β’ ((π β§ π β π β§ (π΅βπ) β€ (π΄βπ)) β Xπ β π ((π΄βπ)(,)(π΅βπ)) = β
) |
135 | 121, 134 | eqtrd 2773 |
. . . . . . . . . . 11
β’ ((π β§ π β π β§ (π΅βπ) β€ (π΄βπ)) β πΌ = β
) |
136 | 135 | fveq2d 6892 |
. . . . . . . . . 10
β’ ((π β§ π β π β§ (π΅βπ) β€ (π΄βπ)) β ((volnβπ)βπΌ) = ((volnβπ)ββ
)) |
137 | | ne0i 4333 |
. . . . . . . . . . . . . 14
β’ (π β π β π β β
) |
138 | 137 | adantl 483 |
. . . . . . . . . . . . 13
β’ ((π β§ π β π) β π β β
) |
139 | 138, 95 | syldan 592 |
. . . . . . . . . . . 12
β’ ((π β§ π β π) β (π΄(πΏβπ)π΅) = βπ β π (volβ((π΄βπ)[,)(π΅βπ)))) |
140 | 139 | 3adant3 1133 |
. . . . . . . . . . 11
β’ ((π β§ π β π β§ (π΅βπ) β€ (π΄βπ)) β (π΄(πΏβπ)π΅) = βπ β π (volβ((π΄βπ)[,)(π΅βπ)))) |
141 | | eleq1w 2817 |
. . . . . . . . . . . . . 14
β’ (π = π β (π β π β π β π)) |
142 | | fveq2 6888 |
. . . . . . . . . . . . . . 15
β’ (π = π β (π΅βπ) = (π΅βπ)) |
143 | 142, 70 | breq12d 5160 |
. . . . . . . . . . . . . 14
β’ (π = π β ((π΅βπ) β€ (π΄βπ) β (π΅βπ) β€ (π΄βπ))) |
144 | 141, 143 | 3anbi23d 1440 |
. . . . . . . . . . . . 13
β’ (π = π β ((π β§ π β π β§ (π΅βπ) β€ (π΄βπ)) β (π β§ π β π β§ (π΅βπ) β€ (π΄βπ)))) |
145 | 144 | imbi1d 342 |
. . . . . . . . . . . 12
β’ (π = π β (((π β§ π β π β§ (π΅βπ) β€ (π΄βπ)) β βπ β π (volβ((π΄βπ)[,)(π΅βπ))) = 0) β ((π β§ π β π β§ (π΅βπ) β€ (π΄βπ)) β βπ β π (volβ((π΄βπ)[,)(π΅βπ))) = 0))) |
146 | | nfv 1918 |
. . . . . . . . . . . . 13
β’
β²π(π β§ π β π β§ (π΅βπ) β€ (π΄βπ)) |
147 | 59 | 3ad2ant1 1134 |
. . . . . . . . . . . . 13
β’ ((π β§ π β π β§ (π΅βπ) β€ (π΄βπ)) β π β Fin) |
148 | | volicore 45232 |
. . . . . . . . . . . . . . . 16
β’ (((π΄βπ) β β β§ (π΅βπ) β β) β (volβ((π΄βπ)[,)(π΅βπ))) β β) |
149 | 40, 41, 148 | syl2anc 585 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π β π) β (volβ((π΄βπ)[,)(π΅βπ))) β β) |
150 | 149 | recnd 11238 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β π) β (volβ((π΄βπ)[,)(π΅βπ))) β β) |
151 | 150 | 3ad2antl1 1186 |
. . . . . . . . . . . . 13
β’ (((π β§ π β π β§ (π΅βπ) β€ (π΄βπ)) β§ π β π) β (volβ((π΄βπ)[,)(π΅βπ))) β β) |
152 | | simp2 1138 |
. . . . . . . . . . . . 13
β’ ((π β§ π β π β§ (π΅βπ) β€ (π΄βπ)) β π β π) |
153 | 53, 54 | oveq12d 7422 |
. . . . . . . . . . . . . . . 16
β’ (π = π β ((π΄βπ)[,)(π΅βπ)) = ((π΄βπ)[,)(π΅βπ))) |
154 | 153 | fveq2d 6892 |
. . . . . . . . . . . . . . 15
β’ (π = π β (volβ((π΄βπ)[,)(π΅βπ))) = (volβ((π΄βπ)[,)(π΅βπ)))) |
155 | 154 | adantl 483 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β π β§ (π΅βπ) β€ (π΄βπ)) β§ π = π) β (volβ((π΄βπ)[,)(π΅βπ))) = (volβ((π΄βπ)[,)(π΅βπ)))) |
156 | 2 | ffvelcdmda 7082 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β§ π β π) β (π΄βπ) β β) |
157 | 7 | ffvelcdmda 7082 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β§ π β π) β (π΅βπ) β β) |
158 | | volico 44634 |
. . . . . . . . . . . . . . . . . 18
β’ (((π΄βπ) β β β§ (π΅βπ) β β) β (volβ((π΄βπ)[,)(π΅βπ))) = if((π΄βπ) < (π΅βπ), ((π΅βπ) β (π΄βπ)), 0)) |
159 | 156, 157,
158 | syl2anc 585 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π β π) β (volβ((π΄βπ)[,)(π΅βπ))) = if((π΄βπ) < (π΅βπ), ((π΅βπ) β (π΄βπ)), 0)) |
160 | 159 | 3adant3 1133 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β π β§ (π΅βπ) β€ (π΄βπ)) β (volβ((π΄βπ)[,)(π΅βπ))) = if((π΄βπ) < (π΅βπ), ((π΅βπ) β (π΄βπ)), 0)) |
161 | | simp3 1139 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β§ π β π β§ (π΅βπ) β€ (π΄βπ)) β (π΅βπ) β€ (π΄βπ)) |
162 | 157, 156 | lenltd 11356 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π β§ π β π) β ((π΅βπ) β€ (π΄βπ) β Β¬ (π΄βπ) < (π΅βπ))) |
163 | 162 | 3adant3 1133 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β§ π β π β§ (π΅βπ) β€ (π΄βπ)) β ((π΅βπ) β€ (π΄βπ) β Β¬ (π΄βπ) < (π΅βπ))) |
164 | 161, 163 | mpbid 231 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π β π β§ (π΅βπ) β€ (π΄βπ)) β Β¬ (π΄βπ) < (π΅βπ)) |
165 | 164 | iffalsed 4538 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β π β§ (π΅βπ) β€ (π΄βπ)) β if((π΄βπ) < (π΅βπ), ((π΅βπ) β (π΄βπ)), 0) = 0) |
166 | 160, 165 | eqtrd 2773 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π β π β§ (π΅βπ) β€ (π΄βπ)) β (volβ((π΄βπ)[,)(π΅βπ))) = 0) |
167 | 166 | adantr 482 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β π β§ (π΅βπ) β€ (π΄βπ)) β§ π = π) β (volβ((π΄βπ)[,)(π΅βπ))) = 0) |
168 | 155, 167 | eqtrd 2773 |
. . . . . . . . . . . . 13
β’ (((π β§ π β π β§ (π΅βπ) β€ (π΄βπ)) β§ π = π) β (volβ((π΄βπ)[,)(π΅βπ))) = 0) |
169 | 146, 147,
151, 152, 168 | fprodeq0g 15934 |
. . . . . . . . . . . 12
β’ ((π β§ π β π β§ (π΅βπ) β€ (π΄βπ)) β βπ β π (volβ((π΄βπ)[,)(π΅βπ))) = 0) |
170 | 145, 169 | chvarvv 2003 |
. . . . . . . . . . 11
β’ ((π β§ π β π β§ (π΅βπ) β€ (π΄βπ)) β βπ β π (volβ((π΄βπ)[,)(π΅βπ))) = 0) |
171 | 140, 170 | eqtrd 2773 |
. . . . . . . . . 10
β’ ((π β§ π β π β§ (π΅βπ) β€ (π΄βπ)) β (π΄(πΏβπ)π΅) = 0) |
172 | 120, 136,
171 | 3eqtr4d 2783 |
. . . . . . . . 9
β’ ((π β§ π β π β§ (π΅βπ) β€ (π΄βπ)) β ((volnβπ)βπΌ) = (π΄(πΏβπ)π΅)) |
173 | 172 | 3exp 1120 |
. . . . . . . 8
β’ (π β (π β π β ((π΅βπ) β€ (π΄βπ) β ((volnβπ)βπΌ) = (π΄(πΏβπ)π΅)))) |
174 | 173 | adantr 482 |
. . . . . . 7
β’ ((π β§ π β β
) β (π β π β ((π΅βπ) β€ (π΄βπ) β ((volnβπ)βπΌ) = (π΄(πΏβπ)π΅)))) |
175 | 37, 117, 174 | rexlimd 3264 |
. . . . . 6
β’ ((π β§ π β β
) β (βπ β π (π΅βπ) β€ (π΄βπ) β ((volnβπ)βπΌ) = (π΄(πΏβπ)π΅))) |
176 | 175 | imp 408 |
. . . . 5
β’ (((π β§ π β β
) β§ βπ β π (π΅βπ) β€ (π΄βπ)) β ((volnβπ)βπΌ) = (π΄(πΏβπ)π΅)) |
177 | 111, 176 | syldan 592 |
. . . 4
β’ (((π β§ π β β
) β§ Β¬ βπ β π (π΄βπ) < (π΅βπ)) β ((volnβπ)βπΌ) = (π΄(πΏβπ)π΅)) |
178 | 97, 177 | pm2.61dan 812 |
. . 3
β’ ((π β§ π β β
) β ((volnβπ)βπΌ) = (π΄(πΏβπ)π΅)) |
179 | 36, 178 | syldan 592 |
. 2
β’ ((π β§ Β¬ π = β
) β ((volnβπ)βπΌ) = (π΄(πΏβπ)π΅)) |
180 | 34, 179 | pm2.61dan 812 |
1
β’ (π β ((volnβπ)βπΌ) = (π΄(πΏβπ)π΅)) |