Step | Hyp | Ref
| Expression |
1 | | mbfdm 25134 |
. . 3
β’ (πΉ β MblFn β dom πΉ β dom
vol) |
2 | | fdm 6723 |
. . . 4
β’ (πΉ:π΄βΆβ β dom πΉ = π΄) |
3 | 2 | eleq1d 2818 |
. . 3
β’ (πΉ:π΄βΆβ β (dom πΉ β dom vol β π΄ β dom
vol)) |
4 | 1, 3 | imbitrid 243 |
. 2
β’ (πΉ:π΄βΆβ β (πΉ β MblFn β π΄ β dom vol)) |
5 | | ioomax 13395 |
. . . . 5
β’
(-β(,)+β) = β |
6 | | ioorebas 13424 |
. . . . 5
β’
(-β(,)+β) β ran (,) |
7 | 5, 6 | eqeltrri 2830 |
. . . 4
β’ β
β ran (,) |
8 | | imaeq2 6053 |
. . . . . 6
β’ (π₯ = β β (β‘πΉ β π₯) = (β‘πΉ β β)) |
9 | 8 | eleq1d 2818 |
. . . . 5
β’ (π₯ = β β ((β‘πΉ β π₯) β dom vol β (β‘πΉ β β) β dom
vol)) |
10 | 9 | rspcv 3608 |
. . . 4
β’ (β
β ran (,) β (βπ₯ β ran (,)(β‘πΉ β π₯) β dom vol β (β‘πΉ β β) β dom
vol)) |
11 | 7, 10 | ax-mp 5 |
. . 3
β’
(βπ₯ β
ran (,)(β‘πΉ β π₯) β dom vol β (β‘πΉ β β) β dom
vol) |
12 | | fimacnv 6736 |
. . . 4
β’ (πΉ:π΄βΆβ β (β‘πΉ β β) = π΄) |
13 | 12 | eleq1d 2818 |
. . 3
β’ (πΉ:π΄βΆβ β ((β‘πΉ β β) β dom vol β
π΄ β dom
vol)) |
14 | 11, 13 | imbitrid 243 |
. 2
β’ (πΉ:π΄βΆβ β (βπ₯ β ran (,)(β‘πΉ β π₯) β dom vol β π΄ β dom vol)) |
15 | | ismbf1 25132 |
. . . 4
β’ (πΉ β MblFn β (πΉ β (β
βpm β) β§ βπ₯ β ran (,)((β‘(β β πΉ) β π₯) β dom vol β§ (β‘(β β πΉ) β π₯) β dom vol))) |
16 | | ffvelcdm 7080 |
. . . . . . . . . . . . . 14
β’ ((πΉ:π΄βΆβ β§ π₯ β π΄) β (πΉβπ₯) β β) |
17 | 16 | adantlr 713 |
. . . . . . . . . . . . 13
β’ (((πΉ:π΄βΆβ β§ π΄ β dom vol) β§ π₯ β π΄) β (πΉβπ₯) β β) |
18 | 17 | rered 15167 |
. . . . . . . . . . . 12
β’ (((πΉ:π΄βΆβ β§ π΄ β dom vol) β§ π₯ β π΄) β (ββ(πΉβπ₯)) = (πΉβπ₯)) |
19 | 18 | mpteq2dva 5247 |
. . . . . . . . . . 11
β’ ((πΉ:π΄βΆβ β§ π΄ β dom vol) β (π₯ β π΄ β¦ (ββ(πΉβπ₯))) = (π₯ β π΄ β¦ (πΉβπ₯))) |
20 | 17 | recnd 11238 |
. . . . . . . . . . . 12
β’ (((πΉ:π΄βΆβ β§ π΄ β dom vol) β§ π₯ β π΄) β (πΉβπ₯) β β) |
21 | | simpl 483 |
. . . . . . . . . . . . 13
β’ ((πΉ:π΄βΆβ β§ π΄ β dom vol) β πΉ:π΄βΆβ) |
22 | 21 | feqmptd 6957 |
. . . . . . . . . . . 12
β’ ((πΉ:π΄βΆβ β§ π΄ β dom vol) β πΉ = (π₯ β π΄ β¦ (πΉβπ₯))) |
23 | | ref 15055 |
. . . . . . . . . . . . . 14
β’
β:ββΆβ |
24 | 23 | a1i 11 |
. . . . . . . . . . . . 13
β’ ((πΉ:π΄βΆβ β§ π΄ β dom vol) β
β:ββΆβ) |
25 | 24 | feqmptd 6957 |
. . . . . . . . . . . 12
β’ ((πΉ:π΄βΆβ β§ π΄ β dom vol) β β = (π¦ β β β¦
(ββπ¦))) |
26 | | fveq2 6888 |
. . . . . . . . . . . 12
β’ (π¦ = (πΉβπ₯) β (ββπ¦) = (ββ(πΉβπ₯))) |
27 | 20, 22, 25, 26 | fmptco 7123 |
. . . . . . . . . . 11
β’ ((πΉ:π΄βΆβ β§ π΄ β dom vol) β (β β
πΉ) = (π₯ β π΄ β¦ (ββ(πΉβπ₯)))) |
28 | 19, 27, 22 | 3eqtr4rd 2783 |
. . . . . . . . . 10
β’ ((πΉ:π΄βΆβ β§ π΄ β dom vol) β πΉ = (β β πΉ)) |
29 | 28 | cnveqd 5873 |
. . . . . . . . 9
β’ ((πΉ:π΄βΆβ β§ π΄ β dom vol) β β‘πΉ = β‘(β β πΉ)) |
30 | 29 | imaeq1d 6056 |
. . . . . . . 8
β’ ((πΉ:π΄βΆβ β§ π΄ β dom vol) β (β‘πΉ β π₯) = (β‘(β β πΉ) β π₯)) |
31 | 30 | eleq1d 2818 |
. . . . . . 7
β’ ((πΉ:π΄βΆβ β§ π΄ β dom vol) β ((β‘πΉ β π₯) β dom vol β (β‘(β β πΉ) β π₯) β dom vol)) |
32 | | imf 15056 |
. . . . . . . . . . . . . . . 16
β’
β:ββΆβ |
33 | 32 | a1i 11 |
. . . . . . . . . . . . . . 15
β’ ((πΉ:π΄βΆβ β§ π΄ β dom vol) β
β:ββΆβ) |
34 | 33 | feqmptd 6957 |
. . . . . . . . . . . . . 14
β’ ((πΉ:π΄βΆβ β§ π΄ β dom vol) β β = (π¦ β β β¦
(ββπ¦))) |
35 | | fveq2 6888 |
. . . . . . . . . . . . . 14
β’ (π¦ = (πΉβπ₯) β (ββπ¦) = (ββ(πΉβπ₯))) |
36 | 20, 22, 34, 35 | fmptco 7123 |
. . . . . . . . . . . . 13
β’ ((πΉ:π΄βΆβ β§ π΄ β dom vol) β (β β
πΉ) = (π₯ β π΄ β¦ (ββ(πΉβπ₯)))) |
37 | 17 | reim0d 15168 |
. . . . . . . . . . . . . 14
β’ (((πΉ:π΄βΆβ β§ π΄ β dom vol) β§ π₯ β π΄) β (ββ(πΉβπ₯)) = 0) |
38 | 37 | mpteq2dva 5247 |
. . . . . . . . . . . . 13
β’ ((πΉ:π΄βΆβ β§ π΄ β dom vol) β (π₯ β π΄ β¦ (ββ(πΉβπ₯))) = (π₯ β π΄ β¦ 0)) |
39 | 36, 38 | eqtrd 2772 |
. . . . . . . . . . . 12
β’ ((πΉ:π΄βΆβ β§ π΄ β dom vol) β (β β
πΉ) = (π₯ β π΄ β¦ 0)) |
40 | | fconstmpt 5736 |
. . . . . . . . . . . 12
β’ (π΄ Γ {0}) = (π₯ β π΄ β¦ 0) |
41 | 39, 40 | eqtr4di 2790 |
. . . . . . . . . . 11
β’ ((πΉ:π΄βΆβ β§ π΄ β dom vol) β (β β
πΉ) = (π΄ Γ {0})) |
42 | 41 | cnveqd 5873 |
. . . . . . . . . 10
β’ ((πΉ:π΄βΆβ β§ π΄ β dom vol) β β‘(β β πΉ) = β‘(π΄ Γ {0})) |
43 | 42 | imaeq1d 6056 |
. . . . . . . . 9
β’ ((πΉ:π΄βΆβ β§ π΄ β dom vol) β (β‘(β β πΉ) β π₯) = (β‘(π΄ Γ {0}) β π₯)) |
44 | | simpr 485 |
. . . . . . . . . 10
β’ ((πΉ:π΄βΆβ β§ π΄ β dom vol) β π΄ β dom vol) |
45 | | 0re 11212 |
. . . . . . . . . 10
β’ 0 β
β |
46 | | mbfconstlem 25135 |
. . . . . . . . . 10
β’ ((π΄ β dom vol β§ 0 β
β) β (β‘(π΄ Γ {0}) β π₯) β dom vol) |
47 | 44, 45, 46 | sylancl 586 |
. . . . . . . . 9
β’ ((πΉ:π΄βΆβ β§ π΄ β dom vol) β (β‘(π΄ Γ {0}) β π₯) β dom vol) |
48 | 43, 47 | eqeltrd 2833 |
. . . . . . . 8
β’ ((πΉ:π΄βΆβ β§ π΄ β dom vol) β (β‘(β β πΉ) β π₯) β dom vol) |
49 | 48 | biantrud 532 |
. . . . . . 7
β’ ((πΉ:π΄βΆβ β§ π΄ β dom vol) β ((β‘(β β πΉ) β π₯) β dom vol β ((β‘(β β πΉ) β π₯) β dom vol β§ (β‘(β β πΉ) β π₯) β dom vol))) |
50 | 31, 49 | bitrd 278 |
. . . . . 6
β’ ((πΉ:π΄βΆβ β§ π΄ β dom vol) β ((β‘πΉ β π₯) β dom vol β ((β‘(β β πΉ) β π₯) β dom vol β§ (β‘(β β πΉ) β π₯) β dom vol))) |
51 | 50 | ralbidv 3177 |
. . . . 5
β’ ((πΉ:π΄βΆβ β§ π΄ β dom vol) β (βπ₯ β ran (,)(β‘πΉ β π₯) β dom vol β βπ₯ β ran (,)((β‘(β β πΉ) β π₯) β dom vol β§ (β‘(β β πΉ) β π₯) β dom vol))) |
52 | | ax-resscn 11163 |
. . . . . . . 8
β’ β
β β |
53 | | fss 6731 |
. . . . . . . 8
β’ ((πΉ:π΄βΆβ β§ β β
β) β πΉ:π΄βΆβ) |
54 | 52, 53 | mpan2 689 |
. . . . . . 7
β’ (πΉ:π΄βΆβ β πΉ:π΄βΆβ) |
55 | | mblss 25039 |
. . . . . . 7
β’ (π΄ β dom vol β π΄ β
β) |
56 | | cnex 11187 |
. . . . . . . 8
β’ β
β V |
57 | | reex 11197 |
. . . . . . . 8
β’ β
β V |
58 | | elpm2r 8835 |
. . . . . . . 8
β’
(((β β V β§ β β V) β§ (πΉ:π΄βΆβ β§ π΄ β β)) β πΉ β (β βpm
β)) |
59 | 56, 57, 58 | mpanl12 700 |
. . . . . . 7
β’ ((πΉ:π΄βΆβ β§ π΄ β β) β πΉ β (β βpm
β)) |
60 | 54, 55, 59 | syl2an 596 |
. . . . . 6
β’ ((πΉ:π΄βΆβ β§ π΄ β dom vol) β πΉ β (β βpm
β)) |
61 | 60 | biantrurd 533 |
. . . . 5
β’ ((πΉ:π΄βΆβ β§ π΄ β dom vol) β (βπ₯ β ran (,)((β‘(β β πΉ) β π₯) β dom vol β§ (β‘(β β πΉ) β π₯) β dom vol) β (πΉ β (β βpm
β) β§ βπ₯
β ran (,)((β‘(β β πΉ) β π₯) β dom vol β§ (β‘(β β πΉ) β π₯) β dom vol)))) |
62 | 51, 61 | bitrd 278 |
. . . 4
β’ ((πΉ:π΄βΆβ β§ π΄ β dom vol) β (βπ₯ β ran (,)(β‘πΉ β π₯) β dom vol β (πΉ β (β βpm
β) β§ βπ₯
β ran (,)((β‘(β β πΉ) β π₯) β dom vol β§ (β‘(β β πΉ) β π₯) β dom vol)))) |
63 | 15, 62 | bitr4id 289 |
. . 3
β’ ((πΉ:π΄βΆβ β§ π΄ β dom vol) β (πΉ β MblFn β βπ₯ β ran (,)(β‘πΉ β π₯) β dom vol)) |
64 | 63 | ex 413 |
. 2
β’ (πΉ:π΄βΆβ β (π΄ β dom vol β (πΉ β MblFn β βπ₯ β ran (,)(β‘πΉ β π₯) β dom vol))) |
65 | 4, 14, 64 | pm5.21ndd 380 |
1
β’ (πΉ:π΄βΆβ β (πΉ β MblFn β βπ₯ β ran (,)(β‘πΉ β π₯) β dom vol)) |