Step | Hyp | Ref
| Expression |
1 | | dffn3 6731 |
. . . . . 6
β’ (πΉ Fn (πΆ +o π·) β πΉ:(πΆ +o π·)βΆran πΉ) |
2 | 1 | biimpi 215 |
. . . . 5
β’ (πΉ Fn (πΆ +o π·) β πΉ:(πΆ +o π·)βΆran πΉ) |
3 | 2 | adantr 480 |
. . . 4
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β πΉ:(πΆ +o π·)βΆran πΉ) |
4 | | fndm 6653 |
. . . . . . . 8
β’ (πΉ Fn (πΆ +o π·) β dom πΉ = (πΆ +o π·)) |
5 | 4 | adantr 480 |
. . . . . . 7
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β dom πΉ = (πΆ +o π·)) |
6 | | oacl 8538 |
. . . . . . . 8
β’ ((πΆ β On β§ π· β On) β (πΆ +o π·) β On) |
7 | 6 | adantl 481 |
. . . . . . 7
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β (πΆ +o π·) β On) |
8 | 5, 7 | eqeltrd 2832 |
. . . . . 6
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β dom πΉ β On) |
9 | | fnfun 6650 |
. . . . . . 7
β’ (πΉ Fn (πΆ +o π·) β Fun πΉ) |
10 | 9 | adantr 480 |
. . . . . 6
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β Fun πΉ) |
11 | | funrnex 7943 |
. . . . . 6
β’ (dom
πΉ β On β (Fun
πΉ β ran πΉ β V)) |
12 | 8, 10, 11 | sylc 65 |
. . . . 5
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β ran πΉ β V) |
13 | 12, 7 | elmapd 8837 |
. . . 4
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β (πΉ β (ran πΉ βm (πΆ +o π·)) β πΉ:(πΆ +o π·)βΆran πΉ)) |
14 | 3, 13 | mpbird 256 |
. . 3
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β πΉ β (ran πΉ βm (πΆ +o π·))) |
15 | | oaword1 8555 |
. . . 4
β’ ((πΆ β On β§ π· β On) β πΆ β (πΆ +o π·)) |
16 | 15 | adantl 481 |
. . 3
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β πΆ β (πΆ +o π·)) |
17 | | elmapssres 8864 |
. . 3
β’ ((πΉ β (ran πΉ βm (πΆ +o π·)) β§ πΆ β (πΆ +o π·)) β (πΉ βΎ πΆ) β (ran πΉ βm πΆ)) |
18 | 14, 16, 17 | syl2anc 583 |
. 2
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β (πΉ βΎ πΆ) β (ran πΉ βm πΆ)) |
19 | | simpl 482 |
. . . . 5
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β πΉ Fn (πΆ +o π·)) |
20 | | oaordi 8549 |
. . . . . . . 8
β’ ((π· β On β§ πΆ β On) β (π β π· β (πΆ +o π) β (πΆ +o π·))) |
21 | 20 | ancoms 458 |
. . . . . . 7
β’ ((πΆ β On β§ π· β On) β (π β π· β (πΆ +o π) β (πΆ +o π·))) |
22 | 21 | adantl 481 |
. . . . . 6
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β (π β π· β (πΆ +o π) β (πΆ +o π·))) |
23 | 22 | imp 406 |
. . . . 5
β’ (((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β§ π β π·) β (πΆ +o π) β (πΆ +o π·)) |
24 | | fnfvelrn 7083 |
. . . . 5
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ +o π) β (πΆ +o π·)) β (πΉβ(πΆ +o π)) β ran πΉ) |
25 | 19, 23, 24 | syl2an2r 682 |
. . . 4
β’ (((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β§ π β π·) β (πΉβ(πΆ +o π)) β ran πΉ) |
26 | 25 | fmpttd 7117 |
. . 3
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β (π β π· β¦ (πΉβ(πΆ +o π))):π·βΆran πΉ) |
27 | | simprr 770 |
. . . 4
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β π· β On) |
28 | 12, 27 | elmapd 8837 |
. . 3
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β ((π β π· β¦ (πΉβ(πΆ +o π))) β (ran πΉ βm π·) β (π β π· β¦ (πΉβ(πΆ +o π))):π·βΆran πΉ)) |
29 | 26, 28 | mpbird 256 |
. 2
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β (π β π· β¦ (πΉβ(πΆ +o π))) β (ran πΉ βm π·)) |
30 | 19, 16 | fnssresd 6675 |
. . . . 5
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β (πΉ βΎ πΆ) Fn πΆ) |
31 | | fvex 6905 |
. . . . . . 7
β’ (πΉβ(πΆ +o π)) β V |
32 | | eqid 2731 |
. . . . . . 7
β’ (π β π· β¦ (πΉβ(πΆ +o π))) = (π β π· β¦ (πΉβ(πΆ +o π))) |
33 | 31, 32 | fnmpti 6694 |
. . . . . 6
β’ (π β π· β¦ (πΉβ(πΆ +o π))) Fn π· |
34 | 33 | a1i 11 |
. . . . 5
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β (π β π· β¦ (πΉβ(πΆ +o π))) Fn π·) |
35 | | simpr 484 |
. . . . 5
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β (πΆ β On β§ π· β On)) |
36 | | tfsconcat.op |
. . . . . 6
β’ + = (π β V, π β V β¦ (π βͺ {β¨π₯, π¦β© β£ (π₯ β ((dom π +o dom π) β dom π) β§ βπ§ β dom π(π₯ = (dom π +o π§) β§ π¦ = (πβπ§)))})) |
37 | 36 | tfsconcatun 42390 |
. . . . 5
β’ ((((πΉ βΎ πΆ) Fn πΆ β§ (π β π· β¦ (πΉβ(πΆ +o π))) Fn π·) β§ (πΆ β On β§ π· β On)) β ((πΉ βΎ πΆ) + (π β π· β¦ (πΉβ(πΆ +o π)))) = ((πΉ βΎ πΆ) βͺ {β¨π₯, π¦β© β£ (π₯ β ((πΆ +o π·) β πΆ) β§ βπ§ β π· (π₯ = (πΆ +o π§) β§ π¦ = ((π β π· β¦ (πΉβ(πΆ +o π)))βπ§)))})) |
38 | 30, 34, 35, 37 | syl21anc 835 |
. . . 4
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β ((πΉ βΎ πΆ) + (π β π· β¦ (πΉβ(πΆ +o π)))) = ((πΉ βΎ πΆ) βͺ {β¨π₯, π¦β© β£ (π₯ β ((πΆ +o π·) β πΆ) β§ βπ§ β π· (π₯ = (πΆ +o π§) β§ π¦ = ((π β π· β¦ (πΉβ(πΆ +o π)))βπ§)))})) |
39 | | oveq2 7420 |
. . . . . . . . . . . . . . . . . 18
β’ (π = π§ β (πΆ +o π) = (πΆ +o π§)) |
40 | 39 | fveq2d 6896 |
. . . . . . . . . . . . . . . . 17
β’ (π = π§ β (πΉβ(πΆ +o π)) = (πΉβ(πΆ +o π§))) |
41 | | fvex 6905 |
. . . . . . . . . . . . . . . . 17
β’ (πΉβ(πΆ +o π§)) β V |
42 | 40, 32, 41 | fvmpt 6999 |
. . . . . . . . . . . . . . . 16
β’ (π§ β π· β ((π β π· β¦ (πΉβ(πΆ +o π)))βπ§) = (πΉβ(πΆ +o π§))) |
43 | 42 | ad2antlr 724 |
. . . . . . . . . . . . . . 15
β’
(((((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β§ π₯ β ((πΆ +o π·) β πΆ)) β§ π§ β π·) β§ π₯ = (πΆ +o π§)) β ((π β π· β¦ (πΉβ(πΆ +o π)))βπ§) = (πΉβ(πΆ +o π§))) |
44 | | fveq2 6892 |
. . . . . . . . . . . . . . . 16
β’ (π₯ = (πΆ +o π§) β (πΉβπ₯) = (πΉβ(πΆ +o π§))) |
45 | 44 | adantl 481 |
. . . . . . . . . . . . . . 15
β’
(((((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β§ π₯ β ((πΆ +o π·) β πΆ)) β§ π§ β π·) β§ π₯ = (πΆ +o π§)) β (πΉβπ₯) = (πΉβ(πΆ +o π§))) |
46 | 43, 45 | eqtr4d 2774 |
. . . . . . . . . . . . . 14
β’
(((((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β§ π₯ β ((πΆ +o π·) β πΆ)) β§ π§ β π·) β§ π₯ = (πΆ +o π§)) β ((π β π· β¦ (πΉβ(πΆ +o π)))βπ§) = (πΉβπ₯)) |
47 | 46 | eqeq2d 2742 |
. . . . . . . . . . . . 13
β’
(((((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β§ π₯ β ((πΆ +o π·) β πΆ)) β§ π§ β π·) β§ π₯ = (πΆ +o π§)) β (π¦ = ((π β π· β¦ (πΉβ(πΆ +o π)))βπ§) β π¦ = (πΉβπ₯))) |
48 | 47 | biimpd 228 |
. . . . . . . . . . . 12
β’
(((((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β§ π₯ β ((πΆ +o π·) β πΆ)) β§ π§ β π·) β§ π₯ = (πΆ +o π§)) β (π¦ = ((π β π· β¦ (πΉβ(πΆ +o π)))βπ§) β π¦ = (πΉβπ₯))) |
49 | 48 | expimpd 453 |
. . . . . . . . . . 11
β’ ((((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β§ π₯ β ((πΆ +o π·) β πΆ)) β§ π§ β π·) β ((π₯ = (πΆ +o π§) β§ π¦ = ((π β π· β¦ (πΉβ(πΆ +o π)))βπ§)) β π¦ = (πΉβπ₯))) |
50 | 49 | rexlimdva 3154 |
. . . . . . . . . 10
β’ (((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β§ π₯ β ((πΆ +o π·) β πΆ)) β (βπ§ β π· (π₯ = (πΆ +o π§) β§ π¦ = ((π β π· β¦ (πΉβ(πΆ +o π)))βπ§)) β π¦ = (πΉβπ₯))) |
51 | | simplr 766 |
. . . . . . . . . . . . . . 15
β’ (((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β§ π₯ β ((πΆ +o π·) β πΆ)) β (πΆ β On β§ π· β On)) |
52 | | eloni 6375 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((πΆ +o π·) β On β Ord (πΆ +o π·)) |
53 | 6, 52 | syl 17 |
. . . . . . . . . . . . . . . . . . 19
β’ ((πΆ β On β§ π· β On) β Ord (πΆ +o π·)) |
54 | | eloni 6375 |
. . . . . . . . . . . . . . . . . . . 20
β’ (πΆ β On β Ord πΆ) |
55 | 54 | adantr 480 |
. . . . . . . . . . . . . . . . . . 19
β’ ((πΆ β On β§ π· β On) β Ord πΆ) |
56 | | ordeldif 42311 |
. . . . . . . . . . . . . . . . . . 19
β’ ((Ord
(πΆ +o π·) β§ Ord πΆ) β (π₯ β ((πΆ +o π·) β πΆ) β (π₯ β (πΆ +o π·) β§ πΆ β π₯))) |
57 | 53, 55, 56 | syl2anc 583 |
. . . . . . . . . . . . . . . . . 18
β’ ((πΆ β On β§ π· β On) β (π₯ β ((πΆ +o π·) β πΆ) β (π₯ β (πΆ +o π·) β§ πΆ β π₯))) |
58 | 57 | adantl 481 |
. . . . . . . . . . . . . . . . 17
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β (π₯ β ((πΆ +o π·) β πΆ) β (π₯ β (πΆ +o π·) β§ πΆ β π₯))) |
59 | 58 | biimpa 476 |
. . . . . . . . . . . . . . . 16
β’ (((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β§ π₯ β ((πΆ +o π·) β πΆ)) β (π₯ β (πΆ +o π·) β§ πΆ β π₯)) |
60 | 59 | ancomd 461 |
. . . . . . . . . . . . . . 15
β’ (((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β§ π₯ β ((πΆ +o π·) β πΆ)) β (πΆ β π₯ β§ π₯ β (πΆ +o π·))) |
61 | 51, 60 | jca 511 |
. . . . . . . . . . . . . 14
β’ (((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β§ π₯ β ((πΆ +o π·) β πΆ)) β ((πΆ β On β§ π· β On) β§ (πΆ β π₯ β§ π₯ β (πΆ +o π·)))) |
62 | 61 | adantr 480 |
. . . . . . . . . . . . 13
β’ ((((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β§ π₯ β ((πΆ +o π·) β πΆ)) β§ π¦ = (πΉβπ₯)) β ((πΆ β On β§ π· β On) β§ (πΆ β π₯ β§ π₯ β (πΆ +o π·)))) |
63 | | oawordex2 42379 |
. . . . . . . . . . . . 13
β’ (((πΆ β On β§ π· β On) β§ (πΆ β π₯ β§ π₯ β (πΆ +o π·))) β βπ§ β π· (πΆ +o π§) = π₯) |
64 | 62, 63 | syl 17 |
. . . . . . . . . . . 12
β’ ((((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β§ π₯ β ((πΆ +o π·) β πΆ)) β§ π¦ = (πΉβπ₯)) β βπ§ β π· (πΆ +o π§) = π₯) |
65 | | simpr 484 |
. . . . . . . . . . . . . . . 16
β’
((((((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β§ π₯ β ((πΆ +o π·) β πΆ)) β§ π¦ = (πΉβπ₯)) β§ π§ β π·) β§ (πΆ +o π§) = π₯) β (πΆ +o π§) = π₯) |
66 | 65 | eqcomd 2737 |
. . . . . . . . . . . . . . 15
β’
((((((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β§ π₯ β ((πΆ +o π·) β πΆ)) β§ π¦ = (πΉβπ₯)) β§ π§ β π·) β§ (πΆ +o π§) = π₯) β π₯ = (πΆ +o π§)) |
67 | 65 | fveq2d 6896 |
. . . . . . . . . . . . . . . 16
β’
((((((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β§ π₯ β ((πΆ +o π·) β πΆ)) β§ π¦ = (πΉβπ₯)) β§ π§ β π·) β§ (πΆ +o π§) = π₯) β (πΉβ(πΆ +o π§)) = (πΉβπ₯)) |
68 | 42 | ad2antlr 724 |
. . . . . . . . . . . . . . . 16
β’
((((((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β§ π₯ β ((πΆ +o π·) β πΆ)) β§ π¦ = (πΉβπ₯)) β§ π§ β π·) β§ (πΆ +o π§) = π₯) β ((π β π· β¦ (πΉβ(πΆ +o π)))βπ§) = (πΉβ(πΆ +o π§))) |
69 | | simpllr 773 |
. . . . . . . . . . . . . . . 16
β’
((((((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β§ π₯ β ((πΆ +o π·) β πΆ)) β§ π¦ = (πΉβπ₯)) β§ π§ β π·) β§ (πΆ +o π§) = π₯) β π¦ = (πΉβπ₯)) |
70 | 67, 68, 69 | 3eqtr4rd 2782 |
. . . . . . . . . . . . . . 15
β’
((((((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β§ π₯ β ((πΆ +o π·) β πΆ)) β§ π¦ = (πΉβπ₯)) β§ π§ β π·) β§ (πΆ +o π§) = π₯) β π¦ = ((π β π· β¦ (πΉβ(πΆ +o π)))βπ§)) |
71 | 66, 70 | jca 511 |
. . . . . . . . . . . . . 14
β’
((((((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β§ π₯ β ((πΆ +o π·) β πΆ)) β§ π¦ = (πΉβπ₯)) β§ π§ β π·) β§ (πΆ +o π§) = π₯) β (π₯ = (πΆ +o π§) β§ π¦ = ((π β π· β¦ (πΉβ(πΆ +o π)))βπ§))) |
72 | 71 | ex 412 |
. . . . . . . . . . . . 13
β’
(((((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β§ π₯ β ((πΆ +o π·) β πΆ)) β§ π¦ = (πΉβπ₯)) β§ π§ β π·) β ((πΆ +o π§) = π₯ β (π₯ = (πΆ +o π§) β§ π¦ = ((π β π· β¦ (πΉβ(πΆ +o π)))βπ§)))) |
73 | 72 | reximdva 3167 |
. . . . . . . . . . . 12
β’ ((((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β§ π₯ β ((πΆ +o π·) β πΆ)) β§ π¦ = (πΉβπ₯)) β (βπ§ β π· (πΆ +o π§) = π₯ β βπ§ β π· (π₯ = (πΆ +o π§) β§ π¦ = ((π β π· β¦ (πΉβ(πΆ +o π)))βπ§)))) |
74 | 64, 73 | mpd 15 |
. . . . . . . . . . 11
β’ ((((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β§ π₯ β ((πΆ +o π·) β πΆ)) β§ π¦ = (πΉβπ₯)) β βπ§ β π· (π₯ = (πΆ +o π§) β§ π¦ = ((π β π· β¦ (πΉβ(πΆ +o π)))βπ§))) |
75 | 74 | ex 412 |
. . . . . . . . . 10
β’ (((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β§ π₯ β ((πΆ +o π·) β πΆ)) β (π¦ = (πΉβπ₯) β βπ§ β π· (π₯ = (πΆ +o π§) β§ π¦ = ((π β π· β¦ (πΉβ(πΆ +o π)))βπ§)))) |
76 | 50, 75 | impbid 211 |
. . . . . . . . 9
β’ (((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β§ π₯ β ((πΆ +o π·) β πΆ)) β (βπ§ β π· (π₯ = (πΆ +o π§) β§ π¦ = ((π β π· β¦ (πΉβ(πΆ +o π)))βπ§)) β π¦ = (πΉβπ₯))) |
77 | | eldifi 4127 |
. . . . . . . . . 10
β’ (π₯ β ((πΆ +o π·) β πΆ) β π₯ β (πΆ +o π·)) |
78 | | eqcom 2738 |
. . . . . . . . . . 11
β’ (π¦ = (πΉβπ₯) β (πΉβπ₯) = π¦) |
79 | | fnbrfvb 6945 |
. . . . . . . . . . 11
β’ ((πΉ Fn (πΆ +o π·) β§ π₯ β (πΆ +o π·)) β ((πΉβπ₯) = π¦ β π₯πΉπ¦)) |
80 | 78, 79 | bitrid 282 |
. . . . . . . . . 10
β’ ((πΉ Fn (πΆ +o π·) β§ π₯ β (πΆ +o π·)) β (π¦ = (πΉβπ₯) β π₯πΉπ¦)) |
81 | 19, 77, 80 | syl2an 595 |
. . . . . . . . 9
β’ (((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β§ π₯ β ((πΆ +o π·) β πΆ)) β (π¦ = (πΉβπ₯) β π₯πΉπ¦)) |
82 | 76, 81 | bitrd 278 |
. . . . . . . 8
β’ (((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β§ π₯ β ((πΆ +o π·) β πΆ)) β (βπ§ β π· (π₯ = (πΆ +o π§) β§ π¦ = ((π β π· β¦ (πΉβ(πΆ +o π)))βπ§)) β π₯πΉπ¦)) |
83 | 82 | pm5.32da 578 |
. . . . . . 7
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β ((π₯ β ((πΆ +o π·) β πΆ) β§ βπ§ β π· (π₯ = (πΆ +o π§) β§ π¦ = ((π β π· β¦ (πΉβ(πΆ +o π)))βπ§))) β (π₯ β ((πΆ +o π·) β πΆ) β§ π₯πΉπ¦))) |
84 | 83 | opabbidv 5215 |
. . . . . 6
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β {β¨π₯, π¦β© β£ (π₯ β ((πΆ +o π·) β πΆ) β§ βπ§ β π· (π₯ = (πΆ +o π§) β§ π¦ = ((π β π· β¦ (πΉβ(πΆ +o π)))βπ§)))} = {β¨π₯, π¦β© β£ (π₯ β ((πΆ +o π·) β πΆ) β§ π₯πΉπ¦)}) |
85 | | dfres2 6042 |
. . . . . 6
β’ (πΉ βΎ ((πΆ +o π·) β πΆ)) = {β¨π₯, π¦β© β£ (π₯ β ((πΆ +o π·) β πΆ) β§ π₯πΉπ¦)} |
86 | 84, 85 | eqtr4di 2789 |
. . . . 5
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β {β¨π₯, π¦β© β£ (π₯ β ((πΆ +o π·) β πΆ) β§ βπ§ β π· (π₯ = (πΆ +o π§) β§ π¦ = ((π β π· β¦ (πΉβ(πΆ +o π)))βπ§)))} = (πΉ βΎ ((πΆ +o π·) β πΆ))) |
87 | 86 | uneq2d 4164 |
. . . 4
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β ((πΉ βΎ πΆ) βͺ {β¨π₯, π¦β© β£ (π₯ β ((πΆ +o π·) β πΆ) β§ βπ§ β π· (π₯ = (πΆ +o π§) β§ π¦ = ((π β π· β¦ (πΉβ(πΆ +o π)))βπ§)))}) = ((πΉ βΎ πΆ) βͺ (πΉ βΎ ((πΆ +o π·) β πΆ)))) |
88 | 38, 87 | eqtrd 2771 |
. . 3
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β ((πΉ βΎ πΆ) + (π β π· β¦ (πΉβ(πΆ +o π)))) = ((πΉ βΎ πΆ) βͺ (πΉ βΎ ((πΆ +o π·) β πΆ)))) |
89 | | resundi 5996 |
. . . 4
β’ (πΉ βΎ (πΆ βͺ ((πΆ +o π·) β πΆ))) = ((πΉ βΎ πΆ) βͺ (πΉ βΎ ((πΆ +o π·) β πΆ))) |
90 | 89 | a1i 11 |
. . 3
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β (πΉ βΎ (πΆ βͺ ((πΆ +o π·) β πΆ))) = ((πΉ βΎ πΆ) βͺ (πΉ βΎ ((πΆ +o π·) β πΆ)))) |
91 | | undif 4482 |
. . . . . . 7
β’ (πΆ β (πΆ +o π·) β (πΆ βͺ ((πΆ +o π·) β πΆ)) = (πΆ +o π·)) |
92 | 15, 91 | sylib 217 |
. . . . . 6
β’ ((πΆ β On β§ π· β On) β (πΆ βͺ ((πΆ +o π·) β πΆ)) = (πΆ +o π·)) |
93 | 92 | adantl 481 |
. . . . 5
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β (πΆ βͺ ((πΆ +o π·) β πΆ)) = (πΆ +o π·)) |
94 | 93 | reseq2d 5982 |
. . . 4
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β (πΉ βΎ (πΆ βͺ ((πΆ +o π·) β πΆ))) = (πΉ βΎ (πΆ +o π·))) |
95 | | fnresdm 6670 |
. . . . 5
β’ (πΉ Fn (πΆ +o π·) β (πΉ βΎ (πΆ +o π·)) = πΉ) |
96 | 95 | adantr 480 |
. . . 4
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β (πΉ βΎ (πΆ +o π·)) = πΉ) |
97 | 94, 96 | eqtrd 2771 |
. . 3
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β (πΉ βΎ (πΆ βͺ ((πΆ +o π·) β πΆ))) = πΉ) |
98 | 88, 90, 97 | 3eqtr2d 2777 |
. 2
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β ((πΉ βΎ πΆ) + (π β π· β¦ (πΉβ(πΆ +o π)))) = πΉ) |
99 | | dmres 6004 |
. . 3
β’ dom
(πΉ βΎ πΆ) = (πΆ β© dom πΉ) |
100 | 16, 5 | sseqtrrd 4024 |
. . . 4
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β πΆ β dom πΉ) |
101 | | df-ss 3966 |
. . . 4
β’ (πΆ β dom πΉ β (πΆ β© dom πΉ) = πΆ) |
102 | 100, 101 | sylib 217 |
. . 3
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β (πΆ β© dom πΉ) = πΆ) |
103 | 99, 102 | eqtrid 2783 |
. 2
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β dom (πΉ βΎ πΆ) = πΆ) |
104 | 31, 32 | dmmpti 6695 |
. . 3
β’ dom
(π β π· β¦ (πΉβ(πΆ +o π))) = π· |
105 | 104 | a1i 11 |
. 2
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β dom (π β π· β¦ (πΉβ(πΆ +o π))) = π·) |
106 | | oveq1 7419 |
. . . . 5
β’ (π’ = (πΉ βΎ πΆ) β (π’ + π£) = ((πΉ βΎ πΆ) + π£)) |
107 | 106 | eqeq1d 2733 |
. . . 4
β’ (π’ = (πΉ βΎ πΆ) β ((π’ + π£) = πΉ β ((πΉ βΎ πΆ) + π£) = πΉ)) |
108 | | dmeq 5904 |
. . . . 5
β’ (π’ = (πΉ βΎ πΆ) β dom π’ = dom (πΉ βΎ πΆ)) |
109 | 108 | eqeq1d 2733 |
. . . 4
β’ (π’ = (πΉ βΎ πΆ) β (dom π’ = πΆ β dom (πΉ βΎ πΆ) = πΆ)) |
110 | 107, 109 | 3anbi12d 1436 |
. . 3
β’ (π’ = (πΉ βΎ πΆ) β (((π’ + π£) = πΉ β§ dom π’ = πΆ β§ dom π£ = π·) β (((πΉ βΎ πΆ) + π£) = πΉ β§ dom (πΉ βΎ πΆ) = πΆ β§ dom π£ = π·))) |
111 | | oveq2 7420 |
. . . . 5
β’ (π£ = (π β π· β¦ (πΉβ(πΆ +o π))) β ((πΉ βΎ πΆ) + π£) = ((πΉ βΎ πΆ) + (π β π· β¦ (πΉβ(πΆ +o π))))) |
112 | 111 | eqeq1d 2733 |
. . . 4
β’ (π£ = (π β π· β¦ (πΉβ(πΆ +o π))) β (((πΉ βΎ πΆ) + π£) = πΉ β ((πΉ βΎ πΆ) + (π β π· β¦ (πΉβ(πΆ +o π)))) = πΉ)) |
113 | | dmeq 5904 |
. . . . 5
β’ (π£ = (π β π· β¦ (πΉβ(πΆ +o π))) β dom π£ = dom (π β π· β¦ (πΉβ(πΆ +o π)))) |
114 | 113 | eqeq1d 2733 |
. . . 4
β’ (π£ = (π β π· β¦ (πΉβ(πΆ +o π))) β (dom π£ = π· β dom (π β π· β¦ (πΉβ(πΆ +o π))) = π·)) |
115 | 112, 114 | 3anbi13d 1437 |
. . 3
β’ (π£ = (π β π· β¦ (πΉβ(πΆ +o π))) β ((((πΉ βΎ πΆ) + π£) = πΉ β§ dom (πΉ βΎ πΆ) = πΆ β§ dom π£ = π·) β (((πΉ βΎ πΆ) + (π β π· β¦ (πΉβ(πΆ +o π)))) = πΉ β§ dom (πΉ βΎ πΆ) = πΆ β§ dom (π β π· β¦ (πΉβ(πΆ +o π))) = π·))) |
116 | 110, 115 | rspc2ev 3625 |
. 2
β’ (((πΉ βΎ πΆ) β (ran πΉ βm πΆ) β§ (π β π· β¦ (πΉβ(πΆ +o π))) β (ran πΉ βm π·) β§ (((πΉ βΎ πΆ) + (π β π· β¦ (πΉβ(πΆ +o π)))) = πΉ β§ dom (πΉ βΎ πΆ) = πΆ β§ dom (π β π· β¦ (πΉβ(πΆ +o π))) = π·)) β βπ’ β (ran πΉ βm πΆ)βπ£ β (ran πΉ βm π·)((π’ + π£) = πΉ β§ dom π’ = πΆ β§ dom π£ = π·)) |
117 | 18, 29, 98, 103, 105, 116 | syl113anc 1381 |
1
β’ ((πΉ Fn (πΆ +o π·) β§ (πΆ β On β§ π· β On)) β βπ’ β (ran πΉ βm πΆ)βπ£ β (ran πΉ βm π·)((π’ + π£) = πΉ β§ dom π’ = πΆ β§ dom π£ = π·)) |