Step | Hyp | Ref
| Expression |
1 | | iccssre 13405 |
. . . . . . 7
β’ ((π΅ β β β§ πΆ β β) β (π΅[,]πΆ) β β) |
2 | 1 | adantl 482 |
. . . . . 6
β’ (((πΉ β MblFn β§ πΉ:π΄βΆβ) β§ (π΅ β β β§ πΆ β β)) β (π΅[,]πΆ) β β) |
3 | | dfss4 4258 |
. . . . . 6
β’ ((π΅[,]πΆ) β β β (β β
(β β (π΅[,]πΆ))) = (π΅[,]πΆ)) |
4 | 2, 3 | sylib 217 |
. . . . 5
β’ (((πΉ β MblFn β§ πΉ:π΄βΆβ) β§ (π΅ β β β§ πΆ β β)) β (β β
(β β (π΅[,]πΆ))) = (π΅[,]πΆ)) |
5 | | difreicc 13460 |
. . . . . . 7
β’ ((π΅ β β β§ πΆ β β) β (β
β (π΅[,]πΆ)) = ((-β(,)π΅) βͺ (πΆ(,)+β))) |
6 | 5 | adantl 482 |
. . . . . 6
β’ (((πΉ β MblFn β§ πΉ:π΄βΆβ) β§ (π΅ β β β§ πΆ β β)) β (β β
(π΅[,]πΆ)) = ((-β(,)π΅) βͺ (πΆ(,)+β))) |
7 | 6 | difeq2d 4122 |
. . . . 5
β’ (((πΉ β MblFn β§ πΉ:π΄βΆβ) β§ (π΅ β β β§ πΆ β β)) β (β β
(β β (π΅[,]πΆ))) = (β β
((-β(,)π΅) βͺ
(πΆ(,)+β)))) |
8 | 4, 7 | eqtr3d 2774 |
. . . 4
β’ (((πΉ β MblFn β§ πΉ:π΄βΆβ) β§ (π΅ β β β§ πΆ β β)) β (π΅[,]πΆ) = (β β ((-β(,)π΅) βͺ (πΆ(,)+β)))) |
9 | 8 | imaeq2d 6059 |
. . 3
β’ (((πΉ β MblFn β§ πΉ:π΄βΆβ) β§ (π΅ β β β§ πΆ β β)) β (β‘πΉ β (π΅[,]πΆ)) = (β‘πΉ β (β β ((-β(,)π΅) βͺ (πΆ(,)+β))))) |
10 | | ffun 6720 |
. . . . . 6
β’ (πΉ:π΄βΆβ β Fun πΉ) |
11 | | funcnvcnv 6615 |
. . . . . 6
β’ (Fun
πΉ β Fun β‘β‘πΉ) |
12 | 10, 11 | syl 17 |
. . . . 5
β’ (πΉ:π΄βΆβ β Fun β‘β‘πΉ) |
13 | 12 | ad2antlr 725 |
. . . 4
β’ (((πΉ β MblFn β§ πΉ:π΄βΆβ) β§ (π΅ β β β§ πΆ β β)) β Fun β‘β‘πΉ) |
14 | | imadif 6632 |
. . . 4
β’ (Fun
β‘β‘πΉ β (β‘πΉ β (β β ((-β(,)π΅) βͺ (πΆ(,)+β)))) = ((β‘πΉ β β) β (β‘πΉ β ((-β(,)π΅) βͺ (πΆ(,)+β))))) |
15 | 13, 14 | syl 17 |
. . 3
β’ (((πΉ β MblFn β§ πΉ:π΄βΆβ) β§ (π΅ β β β§ πΆ β β)) β (β‘πΉ β (β β ((-β(,)π΅) βͺ (πΆ(,)+β)))) = ((β‘πΉ β β) β (β‘πΉ β ((-β(,)π΅) βͺ (πΆ(,)+β))))) |
16 | 9, 15 | eqtrd 2772 |
. 2
β’ (((πΉ β MblFn β§ πΉ:π΄βΆβ) β§ (π΅ β β β§ πΆ β β)) β (β‘πΉ β (π΅[,]πΆ)) = ((β‘πΉ β β) β (β‘πΉ β ((-β(,)π΅) βͺ (πΆ(,)+β))))) |
17 | | fimacnv 6739 |
. . . . . 6
β’ (πΉ:π΄βΆβ β (β‘πΉ β β) = π΄) |
18 | 17 | adantl 482 |
. . . . 5
β’ ((πΉ β MblFn β§ πΉ:π΄βΆβ) β (β‘πΉ β β) = π΄) |
19 | | mbfdm 25142 |
. . . . . 6
β’ (πΉ β MblFn β dom πΉ β dom
vol) |
20 | | fdm 6726 |
. . . . . . . 8
β’ (πΉ:π΄βΆβ β dom πΉ = π΄) |
21 | 20 | eleq1d 2818 |
. . . . . . 7
β’ (πΉ:π΄βΆβ β (dom πΉ β dom vol β π΄ β dom
vol)) |
22 | 21 | biimpac 479 |
. . . . . 6
β’ ((dom
πΉ β dom vol β§
πΉ:π΄βΆβ) β π΄ β dom vol) |
23 | 19, 22 | sylan 580 |
. . . . 5
β’ ((πΉ β MblFn β§ πΉ:π΄βΆβ) β π΄ β dom vol) |
24 | 18, 23 | eqeltrd 2833 |
. . . 4
β’ ((πΉ β MblFn β§ πΉ:π΄βΆβ) β (β‘πΉ β β) β dom
vol) |
25 | | imaundi 6149 |
. . . . 5
β’ (β‘πΉ β ((-β(,)π΅) βͺ (πΆ(,)+β))) = ((β‘πΉ β (-β(,)π΅)) βͺ (β‘πΉ β (πΆ(,)+β))) |
26 | | mbfima 25146 |
. . . . . 6
β’ ((πΉ β MblFn β§ πΉ:π΄βΆβ) β (β‘πΉ β (-β(,)π΅)) β dom vol) |
27 | | mbfima 25146 |
. . . . . 6
β’ ((πΉ β MblFn β§ πΉ:π΄βΆβ) β (β‘πΉ β (πΆ(,)+β)) β dom
vol) |
28 | | unmbl 25053 |
. . . . . 6
β’ (((β‘πΉ β (-β(,)π΅)) β dom vol β§ (β‘πΉ β (πΆ(,)+β)) β dom vol) β ((β‘πΉ β (-β(,)π΅)) βͺ (β‘πΉ β (πΆ(,)+β))) β dom
vol) |
29 | 26, 27, 28 | syl2anc 584 |
. . . . 5
β’ ((πΉ β MblFn β§ πΉ:π΄βΆβ) β ((β‘πΉ β (-β(,)π΅)) βͺ (β‘πΉ β (πΆ(,)+β))) β dom
vol) |
30 | 25, 29 | eqeltrid 2837 |
. . . 4
β’ ((πΉ β MblFn β§ πΉ:π΄βΆβ) β (β‘πΉ β ((-β(,)π΅) βͺ (πΆ(,)+β))) β dom
vol) |
31 | | difmbl 25059 |
. . . 4
β’ (((β‘πΉ β β) β dom vol β§
(β‘πΉ β ((-β(,)π΅) βͺ (πΆ(,)+β))) β dom vol) β
((β‘πΉ β β) β (β‘πΉ β ((-β(,)π΅) βͺ (πΆ(,)+β)))) β dom
vol) |
32 | 24, 30, 31 | syl2anc 584 |
. . 3
β’ ((πΉ β MblFn β§ πΉ:π΄βΆβ) β ((β‘πΉ β β) β (β‘πΉ β ((-β(,)π΅) βͺ (πΆ(,)+β)))) β dom
vol) |
33 | 32 | adantr 481 |
. 2
β’ (((πΉ β MblFn β§ πΉ:π΄βΆβ) β§ (π΅ β β β§ πΆ β β)) β ((β‘πΉ β β) β (β‘πΉ β ((-β(,)π΅) βͺ (πΆ(,)+β)))) β dom
vol) |
34 | 16, 33 | eqeltrd 2833 |
1
β’ (((πΉ β MblFn β§ πΉ:π΄βΆβ) β§ (π΅ β β β§ πΆ β β)) β (β‘πΉ β (π΅[,]πΆ)) β dom vol) |