Step | Hyp | Ref
| Expression |
1 | | hoidmvle.s |
. 2
β’ (π β Xπ β
π ((π΄βπ)[,)(π΅βπ)) β βͺ π β β Xπ β π (((πΆβπ)βπ)[,)((π·βπ)βπ))) |
2 | | hoidmvle.d |
. . . 4
β’ (π β π·:ββΆ(β βm
π)) |
3 | | ovex 7395 |
. . . . . . 7
β’ (β
βm π)
β V |
4 | | nnex 12166 |
. . . . . . 7
β’ β
β V |
5 | 3, 4 | pm3.2i 472 |
. . . . . 6
β’ ((β
βm π)
β V β§ β β V) |
6 | 5 | a1i 11 |
. . . . 5
β’ (π β ((β
βm π)
β V β§ β β V)) |
7 | | elmapg 8785 |
. . . . 5
β’
(((β βm π) β V β§ β β V) β
(π· β ((β
βm π)
βm β) β π·:ββΆ(β βm
π))) |
8 | 6, 7 | syl 17 |
. . . 4
β’ (π β (π· β ((β βm π) βm β)
β π·:ββΆ(β βm
π))) |
9 | 2, 8 | mpbird 257 |
. . 3
β’ (π β π· β ((β βm π) βm
β)) |
10 | | hoidmvle.c |
. . . . 5
β’ (π β πΆ:ββΆ(β βm
π)) |
11 | | elmapg 8785 |
. . . . . 6
β’
(((β βm π) β V β§ β β V) β
(πΆ β ((β
βm π)
βm β) β πΆ:ββΆ(β βm
π))) |
12 | 6, 11 | syl 17 |
. . . . 5
β’ (π β (πΆ β ((β βm π) βm β)
β πΆ:ββΆ(β βm
π))) |
13 | 10, 12 | mpbird 257 |
. . . 4
β’ (π β πΆ β ((β βm π) βm
β)) |
14 | | hoidmvle.b |
. . . . . 6
β’ (π β π΅:πβΆβ) |
15 | | reex 11149 |
. . . . . . . . 9
β’ β
β V |
16 | 15 | a1i 11 |
. . . . . . . 8
β’ (π β β β
V) |
17 | | hoidmvle.x |
. . . . . . . 8
β’ (π β π β Fin) |
18 | 16, 17 | jca 513 |
. . . . . . 7
β’ (π β (β β V β§
π β
Fin)) |
19 | | elmapg 8785 |
. . . . . . 7
β’ ((β
β V β§ π β
Fin) β (π΅ β
(β βm π) β π΅:πβΆβ)) |
20 | 18, 19 | syl 17 |
. . . . . 6
β’ (π β (π΅ β (β βm π) β π΅:πβΆβ)) |
21 | 14, 20 | mpbird 257 |
. . . . 5
β’ (π β π΅ β (β βm π)) |
22 | | hoidmvle.a |
. . . . . . 7
β’ (π β π΄:πβΆβ) |
23 | | elmapg 8785 |
. . . . . . . 8
β’ ((β
β V β§ π β
Fin) β (π΄ β
(β βm π) β π΄:πβΆβ)) |
24 | 18, 23 | syl 17 |
. . . . . . 7
β’ (π β (π΄ β (β βm π) β π΄:πβΆβ)) |
25 | 22, 24 | mpbird 257 |
. . . . . 6
β’ (π β π΄ β (β βm π)) |
26 | | oveq2 7370 |
. . . . . . . . . 10
β’ (π₯ = β
β (β
βm π₯) =
(β βm β
)) |
27 | 26 | eleq2d 2824 |
. . . . . . . . 9
β’ (π₯ = β
β (π β (β
βm π₯)
β π β (β
βm β
))) |
28 | 26 | eleq2d 2824 |
. . . . . . . . . . 11
β’ (π₯ = β
β (π β (β
βm π₯)
β π β (β
βm β
))) |
29 | 26 | oveq1d 7377 |
. . . . . . . . . . . . . 14
β’ (π₯ = β
β ((β
βm π₯)
βm β) = ((β βm β
)
βm β)) |
30 | 29 | eleq2d 2824 |
. . . . . . . . . . . . 13
β’ (π₯ = β
β (π β ((β
βm π₯)
βm β) β π β ((β βm β
)
βm β))) |
31 | 29 | eleq2d 2824 |
. . . . . . . . . . . . . . 15
β’ (π₯ = β
β (π β ((β
βm π₯)
βm β) β π β ((β βm β
)
βm β))) |
32 | | ixpeq1 8853 |
. . . . . . . . . . . . . . . . 17
β’ (π₯ = β
β Xπ β
π₯ ((πβπ)[,)(πβπ)) = Xπ β β
((πβπ)[,)(πβπ))) |
33 | | ixpeq1 8853 |
. . . . . . . . . . . . . . . . . 18
β’ (π₯ = β
β Xπ β
π₯ (((πβπ)βπ)[,)((πβπ)βπ)) = Xπ β β
(((πβπ)βπ)[,)((πβπ)βπ))) |
34 | 33 | iuneq2d 4988 |
. . . . . . . . . . . . . . . . 17
β’ (π₯ = β
β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) = βͺ
π β β Xπ β
β
(((πβπ)βπ)[,)((πβπ)βπ))) |
35 | 32, 34 | sseq12d 3982 |
. . . . . . . . . . . . . . . 16
β’ (π₯ = β
β (Xπ β
π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β Xπ β β
((πβπ)[,)(πβπ)) β βͺ π β β Xπ β β
(((πβπ)βπ)[,)((πβπ)βπ)))) |
36 | | fveq2 6847 |
. . . . . . . . . . . . . . . . . 18
β’ (π₯ = β
β (πΏβπ₯) = (πΏββ
)) |
37 | 36 | oveqd 7379 |
. . . . . . . . . . . . . . . . 17
β’ (π₯ = β
β (π(πΏβπ₯)π) = (π(πΏββ
)π)) |
38 | 36 | oveqd 7379 |
. . . . . . . . . . . . . . . . . . 19
β’ (π₯ = β
β ((πβπ)(πΏβπ₯)(πβπ)) = ((πβπ)(πΏββ
)(πβπ))) |
39 | 38 | mpteq2dv 5212 |
. . . . . . . . . . . . . . . . . 18
β’ (π₯ = β
β (π β β β¦ ((πβπ)(πΏβπ₯)(πβπ))) = (π β β β¦ ((πβπ)(πΏββ
)(πβπ)))) |
40 | 39 | fveq2d 6851 |
. . . . . . . . . . . . . . . . 17
β’ (π₯ = β
β
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ)))) =
(Ξ£^β(π β β β¦ ((πβπ)(πΏββ
)(πβπ))))) |
41 | 37, 40 | breq12d 5123 |
. . . . . . . . . . . . . . . 16
β’ (π₯ = β
β ((π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ)))) β (π(πΏββ
)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏββ
)(πβπ)))))) |
42 | 35, 41 | imbi12d 345 |
. . . . . . . . . . . . . . 15
β’ (π₯ = β
β ((Xπ β
π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ))))) β (Xπ β β
((πβπ)[,)(πβπ)) β βͺ π β β Xπ β β
(((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏββ
)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏββ
)(πβπ))))))) |
43 | 31, 42 | imbi12d 345 |
. . . . . . . . . . . . . 14
β’ (π₯ = β
β ((π β ((β
βm π₯)
βm β) β (Xπ β π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ)))))) β (π β ((β βm β
)
βm β) β (Xπ β β
((πβπ)[,)(πβπ)) β βͺ π β β Xπ β β
(((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏββ
)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏββ
)(πβπ)))))))) |
44 | 43 | ralbidv2 3171 |
. . . . . . . . . . . . 13
β’ (π₯ = β
β (βπ β ((β
βm π₯)
βm β)(Xπ β π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ))))) β βπ β ((β βm β
)
βm β)(Xπ β β
((πβπ)[,)(πβπ)) β βͺ π β β Xπ β β
(((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏββ
)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏββ
)(πβπ))))))) |
45 | 30, 44 | imbi12d 345 |
. . . . . . . . . . . 12
β’ (π₯ = β
β ((π β ((β
βm π₯)
βm β) β βπ β ((β βm π₯) βm
β)(Xπ β π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ)))))) β (π β ((β βm β
)
βm β) β βπ β ((β βm β
)
βm β)(Xπ β β
((πβπ)[,)(πβπ)) β βͺ π β β Xπ β β
(((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏββ
)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏββ
)(πβπ)))))))) |
46 | 45 | ralbidv2 3171 |
. . . . . . . . . . 11
β’ (π₯ = β
β (βπ β ((β
βm π₯)
βm β)βπ β ((β βm π₯) βm
β)(Xπ β π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ))))) β βπ β ((β βm β
)
βm β)βπ β ((β βm β
)
βm β)(Xπ β β
((πβπ)[,)(πβπ)) β βͺ π β β Xπ β β
(((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏββ
)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏββ
)(πβπ))))))) |
47 | 28, 46 | imbi12d 345 |
. . . . . . . . . 10
β’ (π₯ = β
β ((π β (β
βm π₯)
β βπ β
((β βm π₯) βm β)βπ β ((β
βm π₯)
βm β)(Xπ β π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ)))))) β (π β (β βm β
)
β βπ β
((β βm β
) βm β)βπ β ((β
βm β
) βm β)(Xπ β
β
((πβπ)[,)(πβπ)) β βͺ π β β Xπ β β
(((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏββ
)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏββ
)(πβπ)))))))) |
48 | 47 | ralbidv2 3171 |
. . . . . . . . 9
β’ (π₯ = β
β (βπ β (β
βm π₯)βπ β ((β βm π₯) βm
β)βπ β
((β βm π₯) βm β)(Xπ β
π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ))))) β βπ β (β βm
β
)βπ β
((β βm β
) βm β)βπ β ((β
βm β
) βm β)(Xπ β
β
((πβπ)[,)(πβπ)) β βͺ π β β Xπ β β
(((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏββ
)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏββ
)(πβπ))))))) |
49 | 27, 48 | imbi12d 345 |
. . . . . . . 8
β’ (π₯ = β
β ((π β (β
βm π₯)
β βπ β
(β βm π₯)βπ β ((β βm π₯) βm
β)βπ β
((β βm π₯) βm β)(Xπ β
π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ)))))) β (π β (β βm β
)
β βπ β
(β βm β
)βπ β ((β βm β
)
βm β)βπ β ((β βm β
)
βm β)(Xπ β β
((πβπ)[,)(πβπ)) β βͺ π β β Xπ β β
(((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏββ
)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏββ
)(πβπ)))))))) |
50 | 49 | ralbidv2 3171 |
. . . . . . 7
β’ (π₯ = β
β (βπ β (β
βm π₯)βπ β (β βm π₯)βπ β ((β βm π₯) βm
β)βπ β
((β βm π₯) βm β)(Xπ β
π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ))))) β βπ β (β βm
β
)βπ β
(β βm β
)βπ β ((β βm β
)
βm β)βπ β ((β βm β
)
βm β)(Xπ β β
((πβπ)[,)(πβπ)) β βͺ π β β Xπ β β
(((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏββ
)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏββ
)(πβπ))))))) |
51 | | oveq2 7370 |
. . . . . . . . . 10
β’ (π₯ = π¦ β (β βm π₯) = (β βm
π¦)) |
52 | 51 | eleq2d 2824 |
. . . . . . . . 9
β’ (π₯ = π¦ β (π β (β βm π₯) β π β (β βm π¦))) |
53 | 51 | eleq2d 2824 |
. . . . . . . . . . 11
β’ (π₯ = π¦ β (π β (β βm π₯) β π β (β βm π¦))) |
54 | 51 | oveq1d 7377 |
. . . . . . . . . . . . . 14
β’ (π₯ = π¦ β ((β βm π₯) βm β) =
((β βm π¦) βm
β)) |
55 | 54 | eleq2d 2824 |
. . . . . . . . . . . . 13
β’ (π₯ = π¦ β (π β ((β βm π₯) βm β)
β π β ((β
βm π¦)
βm β))) |
56 | 54 | eleq2d 2824 |
. . . . . . . . . . . . . . 15
β’ (π₯ = π¦ β (π β ((β βm π₯) βm β)
β π β ((β
βm π¦)
βm β))) |
57 | | ixpeq1 8853 |
. . . . . . . . . . . . . . . . 17
β’ (π₯ = π¦ β Xπ β π₯ ((πβπ)[,)(πβπ)) = Xπ β π¦ ((πβπ)[,)(πβπ))) |
58 | | ixpeq1 8853 |
. . . . . . . . . . . . . . . . . 18
β’ (π₯ = π¦ β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) = Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ))) |
59 | 58 | iuneq2d 4988 |
. . . . . . . . . . . . . . . . 17
β’ (π₯ = π¦ β βͺ
π β β Xπ β
π₯ (((πβπ)βπ)[,)((πβπ)βπ)) = βͺ
π β β Xπ β
π¦ (((πβπ)βπ)[,)((πβπ)βπ))) |
60 | 57, 59 | sseq12d 3982 |
. . . . . . . . . . . . . . . 16
β’ (π₯ = π¦ β (Xπ β π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)))) |
61 | | fveq2 6847 |
. . . . . . . . . . . . . . . . . 18
β’ (π₯ = π¦ β (πΏβπ₯) = (πΏβπ¦)) |
62 | 61 | oveqd 7379 |
. . . . . . . . . . . . . . . . 17
β’ (π₯ = π¦ β (π(πΏβπ₯)π) = (π(πΏβπ¦)π)) |
63 | 61 | oveqd 7379 |
. . . . . . . . . . . . . . . . . . 19
β’ (π₯ = π¦ β ((πβπ)(πΏβπ₯)(πβπ)) = ((πβπ)(πΏβπ¦)(πβπ))) |
64 | 63 | mpteq2dv 5212 |
. . . . . . . . . . . . . . . . . 18
β’ (π₯ = π¦ β (π β β β¦ ((πβπ)(πΏβπ₯)(πβπ))) = (π β β β¦ ((πβπ)(πΏβπ¦)(πβπ)))) |
65 | 64 | fveq2d 6851 |
. . . . . . . . . . . . . . . . 17
β’ (π₯ = π¦ β
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ)))) =
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))) |
66 | 62, 65 | breq12d 5123 |
. . . . . . . . . . . . . . . 16
β’ (π₯ = π¦ β ((π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ)))) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ)))))) |
67 | 60, 66 | imbi12d 345 |
. . . . . . . . . . . . . . 15
β’ (π₯ = π¦ β ((Xπ β π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ))))) β (Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))))) |
68 | 56, 67 | imbi12d 345 |
. . . . . . . . . . . . . 14
β’ (π₯ = π¦ β ((π β ((β βm π₯) βm β)
β (Xπ β π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ)))))) β (π β ((β βm π¦) βm β)
β (Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ)))))))) |
69 | 68 | ralbidv2 3171 |
. . . . . . . . . . . . 13
β’ (π₯ = π¦ β (βπ β ((β βm π₯) βm
β)(Xπ β π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ))))) β βπ β ((β βm π¦) βm
β)(Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))))) |
70 | 55, 69 | imbi12d 345 |
. . . . . . . . . . . 12
β’ (π₯ = π¦ β ((π β ((β βm π₯) βm β)
β βπ β
((β βm π₯) βm β)(Xπ β
π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ)))))) β (π β ((β βm π¦) βm β)
β βπ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ)))))))) |
71 | 70 | ralbidv2 3171 |
. . . . . . . . . . 11
β’ (π₯ = π¦ β (βπ β ((β βm π₯) βm
β)βπ β
((β βm π₯) βm β)(Xπ β
π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ))))) β βπ β ((β βm π¦) βm
β)βπ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))))) |
72 | 53, 71 | imbi12d 345 |
. . . . . . . . . 10
β’ (π₯ = π¦ β ((π β (β βm π₯) β βπ β ((β
βm π₯)
βm β)βπ β ((β βm π₯) βm
β)(Xπ β π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ)))))) β (π β (β βm π¦) β βπ β ((β
βm π¦)
βm β)βπ β ((β βm π¦) βm
β)(Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ)))))))) |
73 | 72 | ralbidv2 3171 |
. . . . . . . . 9
β’ (π₯ = π¦ β (βπ β (β βm π₯)βπ β ((β βm π₯) βm
β)βπ β
((β βm π₯) βm β)(Xπ β
π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ))))) β βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)βπ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))))) |
74 | 52, 73 | imbi12d 345 |
. . . . . . . 8
β’ (π₯ = π¦ β ((π β (β βm π₯) β βπ β (β
βm π₯)βπ β ((β βm π₯) βm
β)βπ β
((β βm π₯) βm β)(Xπ β
π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ)))))) β (π β (β βm π¦) β βπ β (β
βm π¦)βπ β ((β βm π¦) βm
β)βπ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ)))))))) |
75 | 74 | ralbidv2 3171 |
. . . . . . 7
β’ (π₯ = π¦ β (βπ β (β βm π₯)βπ β (β βm π₯)βπ β ((β βm π₯) βm
β)βπ β
((β βm π₯) βm β)(Xπ β
π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ))))) β βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)βπ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))))) |
76 | | oveq2 7370 |
. . . . . . . . . 10
β’ (π₯ = (π¦ βͺ {π§}) β (β βm π₯) = (β βm
(π¦ βͺ {π§}))) |
77 | 76 | eleq2d 2824 |
. . . . . . . . 9
β’ (π₯ = (π¦ βͺ {π§}) β (π β (β βm π₯) β π β (β βm (π¦ βͺ {π§})))) |
78 | 76 | eleq2d 2824 |
. . . . . . . . . . 11
β’ (π₯ = (π¦ βͺ {π§}) β (π β (β βm π₯) β π β (β βm (π¦ βͺ {π§})))) |
79 | 76 | oveq1d 7377 |
. . . . . . . . . . . . . 14
β’ (π₯ = (π¦ βͺ {π§}) β ((β βm π₯) βm β) =
((β βm (π¦ βͺ {π§})) βm
β)) |
80 | 79 | eleq2d 2824 |
. . . . . . . . . . . . 13
β’ (π₯ = (π¦ βͺ {π§}) β (π β ((β βm π₯) βm β)
β π β ((β
βm (π¦ βͺ
{π§})) βm
β))) |
81 | 79 | eleq2d 2824 |
. . . . . . . . . . . . . . 15
β’ (π₯ = (π¦ βͺ {π§}) β (π β ((β βm π₯) βm β)
β π β ((β
βm (π¦ βͺ
{π§})) βm
β))) |
82 | | ixpeq1 8853 |
. . . . . . . . . . . . . . . . 17
β’ (π₯ = (π¦ βͺ {π§}) β Xπ β π₯ ((πβπ)[,)(πβπ)) = Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ))) |
83 | | ixpeq1 8853 |
. . . . . . . . . . . . . . . . . 18
β’ (π₯ = (π¦ βͺ {π§}) β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) = Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) |
84 | 83 | iuneq2d 4988 |
. . . . . . . . . . . . . . . . 17
β’ (π₯ = (π¦ βͺ {π§}) β βͺ
π β β Xπ β
π₯ (((πβπ)βπ)[,)((πβπ)βπ)) = βͺ
π β β Xπ β
(π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) |
85 | 82, 84 | sseq12d 3982 |
. . . . . . . . . . . . . . . 16
β’ (π₯ = (π¦ βͺ {π§}) β (Xπ β π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)))) |
86 | | fveq2 6847 |
. . . . . . . . . . . . . . . . . 18
β’ (π₯ = (π¦ βͺ {π§}) β (πΏβπ₯) = (πΏβ(π¦ βͺ {π§}))) |
87 | 86 | oveqd 7379 |
. . . . . . . . . . . . . . . . 17
β’ (π₯ = (π¦ βͺ {π§}) β (π(πΏβπ₯)π) = (π(πΏβ(π¦ βͺ {π§}))π)) |
88 | 86 | oveqd 7379 |
. . . . . . . . . . . . . . . . . . 19
β’ (π₯ = (π¦ βͺ {π§}) β ((πβπ)(πΏβπ₯)(πβπ)) = ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ))) |
89 | 88 | mpteq2dv 5212 |
. . . . . . . . . . . . . . . . . 18
β’ (π₯ = (π¦ βͺ {π§}) β (π β β β¦ ((πβπ)(πΏβπ₯)(πβπ))) = (π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ)))) |
90 | 89 | fveq2d 6851 |
. . . . . . . . . . . . . . . . 17
β’ (π₯ = (π¦ βͺ {π§}) β
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ)))) =
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ))))) |
91 | 87, 90 | breq12d 5123 |
. . . . . . . . . . . . . . . 16
β’ (π₯ = (π¦ βͺ {π§}) β ((π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ)))) β (π(πΏβ(π¦ βͺ {π§}))π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ)))))) |
92 | 85, 91 | imbi12d 345 |
. . . . . . . . . . . . . . 15
β’ (π₯ = (π¦ βͺ {π§}) β ((Xπ β π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ))))) β (Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβ(π¦ βͺ {π§}))π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ))))))) |
93 | 81, 92 | imbi12d 345 |
. . . . . . . . . . . . . 14
β’ (π₯ = (π¦ βͺ {π§}) β ((π β ((β βm π₯) βm β)
β (Xπ β π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ)))))) β (π β ((β βm (π¦ βͺ {π§})) βm β) β (Xπ β
(π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβ(π¦ βͺ {π§}))π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ)))))))) |
94 | 93 | ralbidv2 3171 |
. . . . . . . . . . . . 13
β’ (π₯ = (π¦ βͺ {π§}) β (βπ β ((β βm π₯) βm
β)(Xπ β π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ))))) β βπ β ((β βm (π¦ βͺ {π§})) βm β)(Xπ β
(π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβ(π¦ βͺ {π§}))π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ))))))) |
95 | 80, 94 | imbi12d 345 |
. . . . . . . . . . . 12
β’ (π₯ = (π¦ βͺ {π§}) β ((π β ((β βm π₯) βm β)
β βπ β
((β βm π₯) βm β)(Xπ β
π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ)))))) β (π β ((β βm (π¦ βͺ {π§})) βm β) β
βπ β ((β
βm (π¦ βͺ
{π§})) βm
β)(Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβ(π¦ βͺ {π§}))π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ)))))))) |
96 | 95 | ralbidv2 3171 |
. . . . . . . . . . 11
β’ (π₯ = (π¦ βͺ {π§}) β (βπ β ((β βm π₯) βm
β)βπ β
((β βm π₯) βm β)(Xπ β
π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ))))) β βπ β ((β βm (π¦ βͺ {π§})) βm β)βπ β ((β
βm (π¦ βͺ
{π§})) βm
β)(Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβ(π¦ βͺ {π§}))π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ))))))) |
97 | 78, 96 | imbi12d 345 |
. . . . . . . . . 10
β’ (π₯ = (π¦ βͺ {π§}) β ((π β (β βm π₯) β βπ β ((β
βm π₯)
βm β)βπ β ((β βm π₯) βm
β)(Xπ β π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ)))))) β (π β (β βm (π¦ βͺ {π§})) β βπ β ((β βm (π¦ βͺ {π§})) βm β)βπ β ((β
βm (π¦ βͺ
{π§})) βm
β)(Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβ(π¦ βͺ {π§}))π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ)))))))) |
98 | 97 | ralbidv2 3171 |
. . . . . . . . 9
β’ (π₯ = (π¦ βͺ {π§}) β (βπ β (β βm π₯)βπ β ((β βm π₯) βm
β)βπ β
((β βm π₯) βm β)(Xπ β
π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ))))) β βπ β (β βm (π¦ βͺ {π§}))βπ β ((β βm (π¦ βͺ {π§})) βm β)βπ β ((β
βm (π¦ βͺ
{π§})) βm
β)(Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβ(π¦ βͺ {π§}))π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ))))))) |
99 | 77, 98 | imbi12d 345 |
. . . . . . . 8
β’ (π₯ = (π¦ βͺ {π§}) β ((π β (β βm π₯) β βπ β (β
βm π₯)βπ β ((β βm π₯) βm
β)βπ β
((β βm π₯) βm β)(Xπ β
π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ)))))) β (π β (β βm (π¦ βͺ {π§})) β βπ β (β βm (π¦ βͺ {π§}))βπ β ((β βm (π¦ βͺ {π§})) βm β)βπ β ((β
βm (π¦ βͺ
{π§})) βm
β)(Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβ(π¦ βͺ {π§}))π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ)))))))) |
100 | 99 | ralbidv2 3171 |
. . . . . . 7
β’ (π₯ = (π¦ βͺ {π§}) β (βπ β (β βm π₯)βπ β (β βm π₯)βπ β ((β βm π₯) βm
β)βπ β
((β βm π₯) βm β)(Xπ β
π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ))))) β βπ β (β βm (π¦ βͺ {π§}))βπ β (β βm (π¦ βͺ {π§}))βπ β ((β βm (π¦ βͺ {π§})) βm β)βπ β ((β
βm (π¦ βͺ
{π§})) βm
β)(Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβ(π¦ βͺ {π§}))π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ))))))) |
101 | | oveq2 7370 |
. . . . . . . . . 10
β’ (π₯ = π β (β βm π₯) = (β βm
π)) |
102 | 101 | eleq2d 2824 |
. . . . . . . . 9
β’ (π₯ = π β (π β (β βm π₯) β π β (β βm π))) |
103 | 101 | eleq2d 2824 |
. . . . . . . . . . 11
β’ (π₯ = π β (π β (β βm π₯) β π β (β βm π))) |
104 | 101 | oveq1d 7377 |
. . . . . . . . . . . . . 14
β’ (π₯ = π β ((β βm π₯) βm β) =
((β βm π) βm
β)) |
105 | 104 | eleq2d 2824 |
. . . . . . . . . . . . 13
β’ (π₯ = π β (π β ((β βm π₯) βm β)
β π β ((β
βm π)
βm β))) |
106 | 104 | eleq2d 2824 |
. . . . . . . . . . . . . . 15
β’ (π₯ = π β (π β ((β βm π₯) βm β)
β π β ((β
βm π)
βm β))) |
107 | | ixpeq1 8853 |
. . . . . . . . . . . . . . . . 17
β’ (π₯ = π β Xπ β π₯ ((πβπ)[,)(πβπ)) = Xπ β π ((πβπ)[,)(πβπ))) |
108 | | ixpeq1 8853 |
. . . . . . . . . . . . . . . . . 18
β’ (π₯ = π β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) = Xπ β π (((πβπ)βπ)[,)((πβπ)βπ))) |
109 | 108 | iuneq2d 4988 |
. . . . . . . . . . . . . . . . 17
β’ (π₯ = π β βͺ
π β β Xπ β
π₯ (((πβπ)βπ)[,)((πβπ)βπ)) = βͺ
π β β Xπ β
π (((πβπ)βπ)[,)((πβπ)βπ))) |
110 | 107, 109 | sseq12d 3982 |
. . . . . . . . . . . . . . . 16
β’ (π₯ = π β (Xπ β π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β Xπ β π ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)))) |
111 | | fveq2 6847 |
. . . . . . . . . . . . . . . . . 18
β’ (π₯ = π β (πΏβπ₯) = (πΏβπ)) |
112 | 111 | oveqd 7379 |
. . . . . . . . . . . . . . . . 17
β’ (π₯ = π β (π(πΏβπ₯)π) = (π(πΏβπ)π)) |
113 | 111 | oveqd 7379 |
. . . . . . . . . . . . . . . . . . 19
β’ (π₯ = π β ((πβπ)(πΏβπ₯)(πβπ)) = ((πβπ)(πΏβπ)(πβπ))) |
114 | 113 | mpteq2dv 5212 |
. . . . . . . . . . . . . . . . . 18
β’ (π₯ = π β (π β β β¦ ((πβπ)(πΏβπ₯)(πβπ))) = (π β β β¦ ((πβπ)(πΏβπ)(πβπ)))) |
115 | 114 | fveq2d 6851 |
. . . . . . . . . . . . . . . . 17
β’ (π₯ = π β
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ)))) =
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ))))) |
116 | 112, 115 | breq12d 5123 |
. . . . . . . . . . . . . . . 16
β’ (π₯ = π β ((π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ)))) β (π(πΏβπ)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ)))))) |
117 | 110, 116 | imbi12d 345 |
. . . . . . . . . . . . . . 15
β’ (π₯ = π β ((Xπ β π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ))))) β (Xπ β π ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ))))))) |
118 | 106, 117 | imbi12d 345 |
. . . . . . . . . . . . . 14
β’ (π₯ = π β ((π β ((β βm π₯) βm β)
β (Xπ β π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ)))))) β (π β ((β βm π) βm β)
β (Xπ β π ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ)))))))) |
119 | 118 | ralbidv2 3171 |
. . . . . . . . . . . . 13
β’ (π₯ = π β (βπ β ((β βm π₯) βm
β)(Xπ β π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ))))) β βπ β ((β βm π) βm
β)(Xπ β π ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ))))))) |
120 | 105, 119 | imbi12d 345 |
. . . . . . . . . . . 12
β’ (π₯ = π β ((π β ((β βm π₯) βm β)
β βπ β
((β βm π₯) βm β)(Xπ β
π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ)))))) β (π β ((β βm π) βm β)
β βπ β
((β βm π) βm β)(Xπ β
π ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ)))))))) |
121 | 120 | ralbidv2 3171 |
. . . . . . . . . . 11
β’ (π₯ = π β (βπ β ((β βm π₯) βm
β)βπ β
((β βm π₯) βm β)(Xπ β
π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ))))) β βπ β ((β βm π) βm
β)βπ β
((β βm π) βm β)(Xπ β
π ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ))))))) |
122 | 103, 121 | imbi12d 345 |
. . . . . . . . . 10
β’ (π₯ = π β ((π β (β βm π₯) β βπ β ((β
βm π₯)
βm β)βπ β ((β βm π₯) βm
β)(Xπ β π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ)))))) β (π β (β βm π) β βπ β ((β
βm π)
βm β)βπ β ((β βm π) βm
β)(Xπ β π ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ)))))))) |
123 | 122 | ralbidv2 3171 |
. . . . . . . . 9
β’ (π₯ = π β (βπ β (β βm π₯)βπ β ((β βm π₯) βm
β)βπ β
((β βm π₯) βm β)(Xπ β
π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ))))) β βπ β (β βm π)βπ β ((β βm π) βm
β)βπ β
((β βm π) βm β)(Xπ β
π ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ))))))) |
124 | 102, 123 | imbi12d 345 |
. . . . . . . 8
β’ (π₯ = π β ((π β (β βm π₯) β βπ β (β
βm π₯)βπ β ((β βm π₯) βm
β)βπ β
((β βm π₯) βm β)(Xπ β
π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ)))))) β (π β (β βm π) β βπ β (β
βm π)βπ β ((β βm π) βm
β)βπ β
((β βm π) βm β)(Xπ β
π ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ)))))))) |
125 | 124 | ralbidv2 3171 |
. . . . . . 7
β’ (π₯ = π β (βπ β (β βm π₯)βπ β (β βm π₯)βπ β ((β βm π₯) βm
β)βπ β
((β βm π₯) βm β)(Xπ β
π₯ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π₯ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ₯)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ₯)(πβπ))))) β βπ β (β βm π)βπ β (β βm π)βπ β ((β βm π) βm
β)βπ β
((β βm π) βm β)(Xπ β
π ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ))))))) |
126 | | hoidmvle.l |
. . . . . . . . . . . . . . . 16
β’ πΏ = (π₯ β Fin β¦ (π β (β βm π₯), π β (β βm π₯) β¦ if(π₯ = β
, 0, βπ β π₯ (volβ((πβπ)[,)(πβπ)))))) |
127 | | fveq1 6846 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π = π β (πβπ) = (πβπ)) |
128 | 127 | oveq1d 7377 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π = π β ((πβπ)[,)(πβπ)) = ((πβπ)[,)(πβπ))) |
129 | 128 | fveq2d 6851 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π = π β (volβ((πβπ)[,)(πβπ))) = (volβ((πβπ)[,)(πβπ)))) |
130 | 129 | prodeq2ad 43907 |
. . . . . . . . . . . . . . . . . . 19
β’ (π = π β βπ β π₯ (volβ((πβπ)[,)(πβπ))) = βπ β π₯ (volβ((πβπ)[,)(πβπ)))) |
131 | 130 | ifeq2d 4511 |
. . . . . . . . . . . . . . . . . 18
β’ (π = π β if(π₯ = β
, 0, βπ β π₯ (volβ((πβπ)[,)(πβπ)))) = if(π₯ = β
, 0, βπ β π₯ (volβ((πβπ)[,)(πβπ))))) |
132 | | fveq1 6846 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π = π β (πβπ) = (πβπ)) |
133 | 132 | oveq2d 7378 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π = π β ((πβπ)[,)(πβπ)) = ((πβπ)[,)(πβπ))) |
134 | 133 | fveq2d 6851 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π = π β (volβ((πβπ)[,)(πβπ))) = (volβ((πβπ)[,)(πβπ)))) |
135 | 134 | prodeq2ad 43907 |
. . . . . . . . . . . . . . . . . . 19
β’ (π = π β βπ β π₯ (volβ((πβπ)[,)(πβπ))) = βπ β π₯ (volβ((πβπ)[,)(πβπ)))) |
136 | 135 | ifeq2d 4511 |
. . . . . . . . . . . . . . . . . 18
β’ (π = π β if(π₯ = β
, 0, βπ β π₯ (volβ((πβπ)[,)(πβπ)))) = if(π₯ = β
, 0, βπ β π₯ (volβ((πβπ)[,)(πβπ))))) |
137 | 131, 136 | cbvmpov 7457 |
. . . . . . . . . . . . . . . . 17
β’ (π β (β
βm π₯),
π β (β
βm π₯)
β¦ if(π₯ = β
, 0,
βπ β π₯ (volβ((πβπ)[,)(πβπ))))) = (π β (β βm π₯), π β (β βm π₯) β¦ if(π₯ = β
, 0, βπ β π₯ (volβ((πβπ)[,)(πβπ))))) |
138 | 137 | mpteq2i 5215 |
. . . . . . . . . . . . . . . 16
β’ (π₯ β Fin β¦ (π β (β
βm π₯),
π β (β
βm π₯)
β¦ if(π₯ = β
, 0,
βπ β π₯ (volβ((πβπ)[,)(πβπ)))))) = (π₯ β Fin β¦ (π β (β βm π₯), π β (β βm π₯) β¦ if(π₯ = β
, 0, βπ β π₯ (volβ((πβπ)[,)(πβπ)))))) |
139 | 126, 138 | eqtri 2765 |
. . . . . . . . . . . . . . 15
β’ πΏ = (π₯ β Fin β¦ (π β (β βm π₯), π β (β βm π₯) β¦ if(π₯ = β
, 0, βπ β π₯ (volβ((πβπ)[,)(πβπ)))))) |
140 | | elmapi 8794 |
. . . . . . . . . . . . . . . 16
β’ (π β (β
βm β
) β π:β
βΆβ) |
141 | 140 | adantr 482 |
. . . . . . . . . . . . . . 15
β’ ((π β (β
βm β
) β§ π β (β βm β
))
β π:β
βΆβ) |
142 | | elmapi 8794 |
. . . . . . . . . . . . . . . 16
β’ (π β (β
βm β
) β π:β
βΆβ) |
143 | 142 | adantl 483 |
. . . . . . . . . . . . . . 15
β’ ((π β (β
βm β
) β§ π β (β βm β
))
β π:β
βΆβ) |
144 | 139, 141,
143 | hoidmv0val 44898 |
. . . . . . . . . . . . . 14
β’ ((π β (β
βm β
) β§ π β (β βm β
))
β (π(πΏββ
)π) = 0) |
145 | 144 | ad5ant23 759 |
. . . . . . . . . . . . 13
β’
(((((π β§ π β (β
βm β
)) β§ π β (β βm β
))
β§ π β ((β
βm β
) βm β)) β§ π β ((β
βm β
) βm β)) β (π(πΏββ
)π) = 0) |
146 | | nfv 1918 |
. . . . . . . . . . . . . . 15
β’
β²π(π β ((β
βm β
) βm β) β§ π β ((β
βm β
) βm β)) |
147 | 4 | a1i 11 |
. . . . . . . . . . . . . . 15
β’ ((π β ((β
βm β
) βm β) β§ π β ((β
βm β
) βm β)) β β β
V) |
148 | | icossicc 13360 |
. . . . . . . . . . . . . . . 16
β’
(0[,)+β) β (0[,]+β) |
149 | | 0fin 9122 |
. . . . . . . . . . . . . . . . . 18
β’ β
β Fin |
150 | 149 | a1i 11 |
. . . . . . . . . . . . . . . . 17
β’ (((π β ((β
βm β
) βm β) β§ π β ((β
βm β
) βm β)) β§ π β β) β β
β Fin) |
151 | | ovexd 7397 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β ((β
βm β
) βm β) β§ π β β) β (β
βm β
) β V) |
152 | 4 | a1i 11 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β ((β
βm β
) βm β) β§ π β β) β β
β V) |
153 | | simpl 484 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β ((β
βm β
) βm β) β§ π β β) β π β ((β
βm β
) βm β)) |
154 | | simpr 486 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β ((β
βm β
) βm β) β§ π β β) β π β
β) |
155 | 151, 152,
153, 154 | fvmap 43492 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π β ((β
βm β
) βm β) β§ π β β) β (πβπ) β (β βm
β
)) |
156 | | elmapi 8794 |
. . . . . . . . . . . . . . . . . . 19
β’ ((πβπ) β (β βm β
)
β (πβπ):β
βΆβ) |
157 | 155, 156 | syl 17 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β ((β
βm β
) βm β) β§ π β β) β (πβπ):β
βΆβ) |
158 | 157 | adantlr 714 |
. . . . . . . . . . . . . . . . 17
β’ (((π β ((β
βm β
) βm β) β§ π β ((β
βm β
) βm β)) β§ π β β) β (πβπ):β
βΆβ) |
159 | | ovexd 7397 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β ((β
βm β
) βm β) β§ π β β) β (β
βm β
) β V) |
160 | 4 | a1i 11 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β ((β
βm β
) βm β) β§ π β β) β β
β V) |
161 | | simpl 484 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β ((β
βm β
) βm β) β§ π β β) β π β ((β
βm β
) βm β)) |
162 | | simpr 486 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β ((β
βm β
) βm β) β§ π β β) β π β
β) |
163 | 159, 160,
161, 162 | fvmap 43492 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π β ((β
βm β
) βm β) β§ π β β) β (πβπ) β (β βm
β
)) |
164 | | elmapi 8794 |
. . . . . . . . . . . . . . . . . . 19
β’ ((πβπ) β (β βm β
)
β (πβπ):β
βΆβ) |
165 | 163, 164 | syl 17 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β ((β
βm β
) βm β) β§ π β β) β (πβπ):β
βΆβ) |
166 | 165 | adantll 713 |
. . . . . . . . . . . . . . . . 17
β’ (((π β ((β
βm β
) βm β) β§ π β ((β
βm β
) βm β)) β§ π β β) β (πβπ):β
βΆβ) |
167 | 126, 150,
158, 166 | hoidmvcl 44897 |
. . . . . . . . . . . . . . . 16
β’ (((π β ((β
βm β
) βm β) β§ π β ((β
βm β
) βm β)) β§ π β β) β ((πβπ)(πΏββ
)(πβπ)) β (0[,)+β)) |
168 | 148, 167 | sselid 3947 |
. . . . . . . . . . . . . . 15
β’ (((π β ((β
βm β
) βm β) β§ π β ((β
βm β
) βm β)) β§ π β β) β ((πβπ)(πΏββ
)(πβπ)) β (0[,]+β)) |
169 | 146, 147,
168 | sge0ge0mpt 44753 |
. . . . . . . . . . . . . 14
β’ ((π β ((β
βm β
) βm β) β§ π β ((β
βm β
) βm β)) β 0 β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏββ
)(πβπ))))) |
170 | 169 | adantll 713 |
. . . . . . . . . . . . 13
β’
(((((π β§ π β (β
βm β
)) β§ π β (β βm β
))
β§ π β ((β
βm β
) βm β)) β§ π β ((β
βm β
) βm β)) β 0 β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏββ
)(πβπ))))) |
171 | 145, 170 | eqbrtrd 5132 |
. . . . . . . . . . . 12
β’
(((((π β§ π β (β
βm β
)) β§ π β (β βm β
))
β§ π β ((β
βm β
) βm β)) β§ π β ((β
βm β
) βm β)) β (π(πΏββ
)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏββ
)(πβπ))))) |
172 | 171 | a1d 25 |
. . . . . . . . . . 11
β’
(((((π β§ π β (β
βm β
)) β§ π β (β βm β
))
β§ π β ((β
βm β
) βm β)) β§ π β ((β
βm β
) βm β)) β (Xπ β
β
((πβπ)[,)(πβπ)) β βͺ π β β Xπ β β
(((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏββ
)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏββ
)(πβπ)))))) |
173 | 172 | ralrimiva 3144 |
. . . . . . . . . 10
β’ ((((π β§ π β (β βm β
))
β§ π β (β
βm β
)) β§ π β ((β βm β
)
βm β)) β βπ β ((β βm β
)
βm β)(Xπ β β
((πβπ)[,)(πβπ)) β βͺ π β β Xπ β β
(((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏββ
)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏββ
)(πβπ)))))) |
174 | 173 | ralrimiva 3144 |
. . . . . . . . 9
β’ (((π β§ π β (β βm β
))
β§ π β (β
βm β
)) β βπ β ((β βm β
)
βm β)βπ β ((β βm β
)
βm β)(Xπ β β
((πβπ)[,)(πβπ)) β βͺ π β β Xπ β β
(((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏββ
)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏββ
)(πβπ)))))) |
175 | 174 | ralrimiva 3144 |
. . . . . . . 8
β’ ((π β§ π β (β βm β
))
β βπ β
(β βm β
)βπ β ((β βm β
)
βm β)βπ β ((β βm β
)
βm β)(Xπ β β
((πβπ)[,)(πβπ)) β βͺ π β β Xπ β β
(((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏββ
)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏββ
)(πβπ)))))) |
176 | 175 | ralrimiva 3144 |
. . . . . . 7
β’ (π β βπ β (β βm
β
)βπ β
(β βm β
)βπ β ((β βm β
)
βm β)βπ β ((β βm β
)
βm β)(Xπ β β
((πβπ)[,)(πβπ)) β βͺ π β β Xπ β β
(((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏββ
)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏββ
)(πβπ)))))) |
177 | | simpl 484 |
. . . . . . . . 9
β’ (((π β§ (π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)βπ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ)))))) β (π β§ (π¦ β π β§ π§ β (π β π¦)))) |
178 | 128 | ixpeq2dv 8858 |
. . . . . . . . . . . . . . . . . 18
β’ (π = π β Xπ β π¦ ((πβπ)[,)(πβπ)) = Xπ β π¦ ((πβπ)[,)(πβπ))) |
179 | 178 | sseq1d 3980 |
. . . . . . . . . . . . . . . . 17
β’ (π = π β (Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)))) |
180 | | oveq1 7369 |
. . . . . . . . . . . . . . . . . 18
β’ (π = π β (π(πΏβπ¦)π) = (π(πΏβπ¦)π)) |
181 | 180 | breq1d 5120 |
. . . . . . . . . . . . . . . . 17
β’ (π = π β ((π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ)))) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ)))))) |
182 | 179, 181 | imbi12d 345 |
. . . . . . . . . . . . . . . 16
β’ (π = π β ((Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))) β (Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))))) |
183 | 182 | ralbidv 3175 |
. . . . . . . . . . . . . . 15
β’ (π = π β (βπ β ((β βm π¦) βm
β)(Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))) β βπ β ((β βm π¦) βm
β)(Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))))) |
184 | 183 | ralbidv 3175 |
. . . . . . . . . . . . . 14
β’ (π = π β (βπ β ((β βm π¦) βm
β)βπ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))) β βπ β ((β βm π¦) βm
β)βπ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))))) |
185 | 184 | ralbidv 3175 |
. . . . . . . . . . . . 13
β’ (π = π β (βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)βπ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))) β βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)βπ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))))) |
186 | 133 | ixpeq2dv 8858 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π = π β Xπ β π¦ ((πβπ)[,)(πβπ)) = Xπ β π¦ ((πβπ)[,)(πβπ))) |
187 | 186 | sseq1d 3980 |
. . . . . . . . . . . . . . . . . . 19
β’ (π = π β (Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)))) |
188 | | oveq2 7370 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π = π β (π(πΏβπ¦)π) = (π(πΏβπ¦)π)) |
189 | 188 | breq1d 5120 |
. . . . . . . . . . . . . . . . . . 19
β’ (π = π β ((π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ)))) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ)))))) |
190 | 187, 189 | imbi12d 345 |
. . . . . . . . . . . . . . . . . 18
β’ (π = π β ((Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))) β (Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))))) |
191 | 190 | ralbidv 3175 |
. . . . . . . . . . . . . . . . 17
β’ (π = π β (βπ β ((β βm π¦) βm
β)(Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))) β βπ β ((β βm π¦) βm
β)(Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))))) |
192 | 191 | ralbidv 3175 |
. . . . . . . . . . . . . . . 16
β’ (π = π β (βπ β ((β βm π¦) βm
β)βπ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))) β βπ β ((β βm π¦) βm
β)βπ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))))) |
193 | | fveq1 6846 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
β’ (π = π β (πβπ) = (πβπ)) |
194 | 193 | fveq1d 6849 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
β’ (π = π β ((πβπ)βπ) = ((πβπ)βπ)) |
195 | 194 | oveq1d 7377 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ (π = π β (((πβπ)βπ)[,)((πβπ)βπ)) = (((πβπ)βπ)[,)((πβπ)βπ))) |
196 | 195 | ixpeq2dv 8858 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ (π = π β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) = Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ))) |
197 | 196 | adantr 482 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ ((π = π β§ π β β) β Xπ β
π¦ (((πβπ)βπ)[,)((πβπ)βπ)) = Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ))) |
198 | 197 | iuneq2dv 4983 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π = π β βͺ
π β β Xπ β
π¦ (((πβπ)βπ)[,)((πβπ)βπ)) = βͺ
π β β Xπ β
π¦ (((πβπ)βπ)[,)((πβπ)βπ))) |
199 | 198 | sseq2d 3981 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π = π β (Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)))) |
200 | 193 | oveq1d 7377 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ (π = π β ((πβπ)(πΏβπ¦)(πβπ)) = ((πβπ)(πΏβπ¦)(πβπ))) |
201 | 200 | mpteq2dv 5212 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ (π = π β (π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))) = (π β β β¦ ((πβπ)(πΏβπ¦)(πβπ)))) |
202 | 201 | fveq2d 6851 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π = π β
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ)))) =
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))) |
203 | 202 | breq2d 5122 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π = π β ((π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ)))) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ)))))) |
204 | 199, 203 | imbi12d 345 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π = π β ((Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))) β (Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))))) |
205 | 204 | ralbidv 3175 |
. . . . . . . . . . . . . . . . . . 19
β’ (π = π β (βπ β ((β βm π¦) βm
β)(Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))) β βπ β ((β βm π¦) βm
β)(Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))))) |
206 | | fveq1 6846 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
β’ (π = β β (πβπ) = (ββπ)) |
207 | 206 | fveq1d 6849 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
β’ (π = β β ((πβπ)βπ) = ((ββπ)βπ)) |
208 | 207 | oveq2d 7378 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
β’ (π = β β (((πβπ)βπ)[,)((πβπ)βπ)) = (((πβπ)βπ)[,)((ββπ)βπ))) |
209 | 208 | ixpeq2dv 8858 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ (π = β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) = Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ))) |
210 | 209 | adantr 482 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ ((π = β β§ π β β) β Xπ β
π¦ (((πβπ)βπ)[,)((πβπ)βπ)) = Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ))) |
211 | 210 | iuneq2dv 4983 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ (π = β β βͺ
π β β Xπ β
π¦ (((πβπ)βπ)[,)((πβπ)βπ)) = βͺ
π β β Xπ β
π¦ (((πβπ)βπ)[,)((ββπ)βπ))) |
212 | 211 | sseq2d 3981 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π = β β (Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)))) |
213 | 206 | oveq2d 7378 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ (π = β β ((πβπ)(πΏβπ¦)(πβπ)) = ((πβπ)(πΏβπ¦)(ββπ))) |
214 | 213 | mpteq2dv 5212 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ (π = β β (π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))) = (π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))) |
215 | 214 | fveq2d 6851 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ (π = β β
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ)))) =
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ))))) |
216 | 215 | breq2d 5122 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π = β β ((π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ)))) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) |
217 | 212, 216 | imbi12d 345 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π = β β ((Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))) β (Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ))))))) |
218 | 217 | cbvralvw 3228 |
. . . . . . . . . . . . . . . . . . . 20
β’
(βπ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))) β ββ β ((β βm π¦) βm
β)(Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) |
219 | 218 | a1i 11 |
. . . . . . . . . . . . . . . . . . 19
β’ (π = π β (βπ β ((β βm π¦) βm
β)(Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))) β ββ β ((β βm π¦) βm
β)(Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ))))))) |
220 | 205, 219 | bitrd 279 |
. . . . . . . . . . . . . . . . . 18
β’ (π = π β (βπ β ((β βm π¦) βm
β)(Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))) β ββ β ((β βm π¦) βm
β)(Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ))))))) |
221 | 220 | cbvralvw 3228 |
. . . . . . . . . . . . . . . . 17
β’
(βπ β
((β βm π¦) βm β)βπ β ((β
βm π¦)
βm β)(Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))) β βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) |
222 | 221 | a1i 11 |
. . . . . . . . . . . . . . . 16
β’ (π = π β (βπ β ((β βm π¦) βm
β)βπ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))) β βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ))))))) |
223 | 192, 222 | bitrd 279 |
. . . . . . . . . . . . . . 15
β’ (π = π β (βπ β ((β βm π¦) βm
β)βπ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))) β βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ))))))) |
224 | 223 | cbvralvw 3228 |
. . . . . . . . . . . . . 14
β’
(βπ β
(β βm π¦)βπ β ((β βm π¦) βm
β)βπ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))) β βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) |
225 | 224 | a1i 11 |
. . . . . . . . . . . . 13
β’ (π = π β (βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)βπ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))) β βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ))))))) |
226 | 185, 225 | bitrd 279 |
. . . . . . . . . . . 12
β’ (π = π β (βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)βπ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))) β βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ))))))) |
227 | 226 | cbvralvw 3228 |
. . . . . . . . . . 11
β’
(βπ β
(β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)βπ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))) β βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) |
228 | 227 | biimpi 215 |
. . . . . . . . . 10
β’
(βπ β
(β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)βπ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))) β βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) |
229 | 228 | adantl 483 |
. . . . . . . . 9
β’ (((π β§ (π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)βπ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ)))))) β βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) |
230 | | simplll 774 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ ((((π β§ (π¦ β π β§ π§ β (π β π¦))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π¦ = β
) β π) |
231 | | eldifi 4091 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
β’ (π§ β (π β π¦) β π§ β π) |
232 | 231 | adantl 483 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
β’ ((π β§ π§ β (π β π¦)) β π§ β π) |
233 | 232 | adantrl 715 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ ((π β§ (π¦ β π β§ π§ β (π β π¦))) β π§ β π) |
234 | 233 | ad2antrr 725 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ ((((π β§ (π¦ β π β§ π§ β (π β π¦))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π¦ = β
) β π§ β π) |
235 | | simpl 484 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
β’ ((π β (β
βm (π¦ βͺ
{π§})) β§ π¦ = β
) β π β (β
βm (π¦ βͺ
{π§}))) |
236 | | uneq1 4121 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . .
30
β’ (π¦ = β
β (π¦ βͺ {π§}) = (β
βͺ {π§})) |
237 | | 0un 4357 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
β’ (β
βͺ {π§}) = {π§} |
238 | 237 | a1i 11 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . .
30
β’ (π¦ = β
β (β
βͺ
{π§}) = {π§}) |
239 | 236, 238 | eqtr2d 2778 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
β’ (π¦ = β
β {π§} = (π¦ βͺ {π§})) |
240 | 239 | eqcomd 2743 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
β’ (π¦ = β
β (π¦ βͺ {π§}) = {π§}) |
241 | 240 | oveq2d 7378 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
β’ (π¦ = β
β (β
βm (π¦ βͺ
{π§})) = (β
βm {π§})) |
242 | 241 | adantl 483 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
β’ ((π β (β
βm (π¦ βͺ
{π§})) β§ π¦ = β
) β (β
βm (π¦ βͺ
{π§})) = (β
βm {π§})) |
243 | 235, 242 | eleqtrd 2840 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ ((π β (β
βm (π¦ βͺ
{π§})) β§ π¦ = β
) β π β (β
βm {π§})) |
244 | 243 | adantll 713 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ ((((π β§ (π¦ β π β§ π§ β (π β π¦))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π¦ = β
) β π β (β βm {π§})) |
245 | 230, 234,
244 | jca31 516 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ ((((π β§ (π¦ β π β§ π§ β (π β π¦))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π¦ = β
) β ((π β§ π§ β π) β§ π β (β βm {π§}))) |
246 | 245 | adantllr 718 |
. . . . . . . . . . . . . . . . . . . . . 22
β’
(((((π β§ (π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π¦ = β
) β ((π β§ π§ β π) β§ π β (β βm {π§}))) |
247 | 246 | adantlr 714 |
. . . . . . . . . . . . . . . . . . . . 21
β’
((((((π β§ (π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π¦ = β
) β ((π β§ π§ β π) β§ π β (β βm {π§}))) |
248 | 247 | adantlr 714 |
. . . . . . . . . . . . . . . . . . . 20
β’
(((((((π β§ (π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β ((β βm (π¦ βͺ {π§})) βm β)) β§ π¦ = β
) β ((π β§ π§ β π) β§ π β (β βm {π§}))) |
249 | | simpl 484 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ ((π β (β
βm (π¦ βͺ
{π§})) β§ π¦ = β
) β π β (β
βm (π¦ βͺ
{π§}))) |
250 | 241 | adantl 483 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ ((π β (β
βm (π¦ βͺ
{π§})) β§ π¦ = β
) β (β
βm (π¦ βͺ
{π§})) = (β
βm {π§})) |
251 | 249, 250 | eleqtrd 2840 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ ((π β (β
βm (π¦ βͺ
{π§})) β§ π¦ = β
) β π β (β
βm {π§})) |
252 | 251 | adantlr 714 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (((π β (β
βm (π¦ βͺ
{π§})) β§ π β ((β
βm (π¦ βͺ
{π§})) βm
β)) β§ π¦ =
β
) β π β
(β βm {π§})) |
253 | 252 | adantlll 717 |
. . . . . . . . . . . . . . . . . . . 20
β’
(((((((π β§ (π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β ((β βm (π¦ βͺ {π§})) βm β)) β§ π¦ = β
) β π β (β
βm {π§})) |
254 | | simpl 484 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ ((π β ((β
βm (π¦ βͺ
{π§})) βm
β) β§ π¦ = β
)
β π β ((β
βm (π¦ βͺ
{π§})) βm
β)) |
255 | 241 | oveq1d 7377 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ (π¦ = β
β ((β
βm (π¦ βͺ
{π§})) βm
β) = ((β βm {π§}) βm
β)) |
256 | 255 | adantl 483 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ ((π β ((β
βm (π¦ βͺ
{π§})) βm
β) β§ π¦ = β
)
β ((β βm (π¦ βͺ {π§})) βm β) = ((β
βm {π§})
βm β)) |
257 | 254, 256 | eleqtrd 2840 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((π β ((β
βm (π¦ βͺ
{π§})) βm
β) β§ π¦ = β
)
β π β ((β
βm {π§})
βm β)) |
258 | 257 | adantll 713 |
. . . . . . . . . . . . . . . . . . . 20
β’
(((((((π β§ (π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β ((β βm (π¦ βͺ {π§})) βm β)) β§ π¦ = β
) β π β ((β
βm {π§})
βm β)) |
259 | 248, 253,
258 | jca31 516 |
. . . . . . . . . . . . . . . . . . 19
β’
(((((((π β§ (π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β ((β βm (π¦ βͺ {π§})) βm β)) β§ π¦ = β
) β ((((π β§ π§ β π) β§ π β (β βm {π§})) β§ π β (β βm {π§})) β§ π β ((β βm {π§}) βm
β))) |
260 | 259 | adantlr 714 |
. . . . . . . . . . . . . . . . . 18
β’
((((((((π β§ (π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β ((β βm (π¦ βͺ {π§})) βm β)) β§ π β ((β
βm (π¦ βͺ
{π§})) βm
β)) β§ π¦ =
β
) β ((((π β§
π§ β π) β§ π β (β βm {π§})) β§ π β (β βm {π§})) β§ π β ((β βm {π§}) βm
β))) |
261 | 260 | adantlr 714 |
. . . . . . . . . . . . . . . . 17
β’
(((((((((π β§
(π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β ((β βm (π¦ βͺ {π§})) βm β)) β§ π β ((β
βm (π¦ βͺ
{π§})) βm
β)) β§ Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) β§ π¦ = β
) β ((((π β§ π§ β π) β§ π β (β βm {π§})) β§ π β (β βm {π§})) β§ π β ((β βm {π§}) βm
β))) |
262 | | simpl 484 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β ((β
βm (π¦ βͺ
{π§})) βm
β) β§ π¦ = β
)
β π β ((β
βm (π¦ βͺ
{π§})) βm
β)) |
263 | 255 | adantl 483 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β ((β
βm (π¦ βͺ
{π§})) βm
β) β§ π¦ = β
)
β ((β βm (π¦ βͺ {π§})) βm β) = ((β
βm {π§})
βm β)) |
264 | 262, 263 | eleqtrd 2840 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π β ((β
βm (π¦ βͺ
{π§})) βm
β) β§ π¦ = β
)
β π β ((β
βm {π§})
βm β)) |
265 | 264 | adantlr 714 |
. . . . . . . . . . . . . . . . . 18
β’ (((π β ((β
βm (π¦ βͺ
{π§})) βm
β) β§ Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) β§ π¦ = β
) β π β ((β βm {π§}) βm
β)) |
266 | 265 | adantlll 717 |
. . . . . . . . . . . . . . . . 17
β’
(((((((((π β§
(π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β ((β βm (π¦ βͺ {π§})) βm β)) β§ π β ((β
βm (π¦ βͺ
{π§})) βm
β)) β§ Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) β§ π¦ = β
) β π β ((β βm {π§}) βm
β)) |
267 | | simpl 484 |
. . . . . . . . . . . . . . . . . . 19
β’ ((Xπ β
(π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) β§ π¦ = β
) β Xπ β
(π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) |
268 | 239 | ixpeq1d 8854 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π¦ = β
β Xπ β
{π§} ((πβπ)[,)(πβπ)) = Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ))) |
269 | 268 | adantl 483 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((Xπ β
(π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) β§ π¦ = β
) β Xπ β
{π§} ((πβπ)[,)(πβπ)) = Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ))) |
270 | 239 | ixpeq1d 8854 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ (π¦ = β
β Xπ β
{π§} (((πβπ)βπ)[,)((πβπ)βπ)) = Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) |
271 | 270 | adantr 482 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ ((π¦ = β
β§ π β β) β Xπ β
{π§} (((πβπ)βπ)[,)((πβπ)βπ)) = Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) |
272 | 271 | iuneq2dv 4983 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π¦ = β
β βͺ π β β Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ)) = βͺ
π β β Xπ β
(π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) |
273 | | fveq2 6847 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
β’ (π = π β (πβπ) = (πβπ)) |
274 | 273 | fveq1d 6849 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
β’ (π = π β ((πβπ)βπ) = ((πβπ)βπ)) |
275 | | fveq2 6847 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
β’ (π = π β (πβπ) = (πβπ)) |
276 | 275 | fveq1d 6849 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
β’ (π = π β ((πβπ)βπ) = ((πβπ)βπ)) |
277 | 274, 276 | oveq12d 7380 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ (π = π β (((πβπ)βπ)[,)((πβπ)βπ)) = (((πβπ)βπ)[,)((πβπ)βπ))) |
278 | 277 | ixpeq2dv 8858 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ (π = π β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) = Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) |
279 | 278 | cbviunv 5005 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) = βͺ
π β β Xπ β
(π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) |
280 | 279 | a1i 11 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π¦ = β
β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) = βͺ
π β β Xπ β
(π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) |
281 | 272, 280 | eqtrd 2777 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π¦ = β
β βͺ π β β Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ)) = βͺ
π β β Xπ β
(π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) |
282 | 281 | adantl 483 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((Xπ β
(π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) β§ π¦ = β
) β βͺ π β β Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ)) = βͺ
π β β Xπ β
(π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) |
283 | 269, 282 | sseq12d 3982 |
. . . . . . . . . . . . . . . . . . 19
β’ ((Xπ β
(π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) β§ π¦ = β
) β (Xπ β
{π§} ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ)) β Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)))) |
284 | 267, 283 | mpbird 257 |
. . . . . . . . . . . . . . . . . 18
β’ ((Xπ β
(π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) β§ π¦ = β
) β Xπ β
{π§} ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ))) |
285 | 284 | adantll 713 |
. . . . . . . . . . . . . . . . 17
β’
(((((((((π β§
(π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β ((β βm (π¦ βͺ {π§})) βm β)) β§ π β ((β
βm (π¦ βͺ
{π§})) βm
β)) β§ Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) β§ π¦ = β
) β Xπ β
{π§} ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ))) |
286 | 261, 266,
285 | jca31 516 |
. . . . . . . . . . . . . . . 16
β’
(((((((((π β§
(π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β ((β βm (π¦ βͺ {π§})) βm β)) β§ π β ((β
βm (π¦ βͺ
{π§})) βm
β)) β§ Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) β§ π¦ = β
) β ((((((π β§ π§ β π) β§ π β (β βm {π§})) β§ π β (β βm {π§})) β§ π β ((β βm {π§}) βm β))
β§ π β ((β
βm {π§})
βm β)) β§ Xπ β {π§} ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ)))) |
287 | | simpr 486 |
. . . . . . . . . . . . . . . 16
β’
(((((((((π β§
(π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β ((β βm (π¦ βͺ {π§})) βm β)) β§ π β ((β
βm (π¦ βͺ
{π§})) βm
β)) β§ Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) β§ π¦ = β
) β π¦ = β
) |
288 | | fveq1 6846 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
β’ (π = π’ β (πβπ) = (π’βπ)) |
289 | 288 | oveq1d 7377 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ (π = π’ β ((πβπ)[,)(πβπ)) = ((π’βπ)[,)(πβπ))) |
290 | 289 | fveq2d 6851 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ (π = π’ β (volβ((πβπ)[,)(πβπ))) = (volβ((π’βπ)[,)(πβπ)))) |
291 | 290 | prodeq2ad 43907 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ (π = π’ β βπ β π₯ (volβ((πβπ)[,)(πβπ))) = βπ β π₯ (volβ((π’βπ)[,)(πβπ)))) |
292 | 291 | ifeq2d 4511 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π = π’ β if(π₯ = β
, 0, βπ β π₯ (volβ((πβπ)[,)(πβπ)))) = if(π₯ = β
, 0, βπ β π₯ (volβ((π’βπ)[,)(πβπ))))) |
293 | | fveq2 6847 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
β’ (π = π β (π’βπ) = (π’βπ)) |
294 | | fveq2 6847 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
β’ (π = π β (πβπ) = (πβπ)) |
295 | 293, 294 | oveq12d 7380 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
β’ (π = π β ((π’βπ)[,)(πβπ)) = ((π’βπ)[,)(πβπ))) |
296 | 295 | fveq2d 6851 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
β’ (π = π β (volβ((π’βπ)[,)(πβπ))) = (volβ((π’βπ)[,)(πβπ)))) |
297 | 296 | cbvprodv 15806 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’
βπ β
π₯ (volβ((π’βπ)[,)(πβπ))) = βπ β π₯ (volβ((π’βπ)[,)(πβπ))) |
298 | 297 | a1i 11 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ (π = π£ β βπ β π₯ (volβ((π’βπ)[,)(πβπ))) = βπ β π₯ (volβ((π’βπ)[,)(πβπ)))) |
299 | | fveq1 6846 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
β’ (π = π£ β (πβπ) = (π£βπ)) |
300 | 299 | oveq2d 7378 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
β’ (π = π£ β ((π’βπ)[,)(πβπ)) = ((π’βπ)[,)(π£βπ))) |
301 | 300 | fveq2d 6851 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ (π = π£ β (volβ((π’βπ)[,)(πβπ))) = (volβ((π’βπ)[,)(π£βπ)))) |
302 | 301 | prodeq2ad 43907 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ (π = π£ β βπ β π₯ (volβ((π’βπ)[,)(πβπ))) = βπ β π₯ (volβ((π’βπ)[,)(π£βπ)))) |
303 | 298, 302 | eqtrd 2777 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ (π = π£ β βπ β π₯ (volβ((π’βπ)[,)(πβπ))) = βπ β π₯ (volβ((π’βπ)[,)(π£βπ)))) |
304 | 303 | ifeq2d 4511 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π = π£ β if(π₯ = β
, 0, βπ β π₯ (volβ((π’βπ)[,)(πβπ)))) = if(π₯ = β
, 0, βπ β π₯ (volβ((π’βπ)[,)(π£βπ))))) |
305 | 292, 304 | cbvmpov 7457 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π β (β
βm π₯),
π β (β
βm π₯)
β¦ if(π₯ = β
, 0,
βπ β π₯ (volβ((πβπ)[,)(πβπ))))) = (π’ β (β βm π₯), π£ β (β βm π₯) β¦ if(π₯ = β
, 0, βπ β π₯ (volβ((π’βπ)[,)(π£βπ))))) |
306 | 305 | mpteq2i 5215 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π₯ β Fin β¦ (π β (β
βm π₯),
π β (β
βm π₯)
β¦ if(π₯ = β
, 0,
βπ β π₯ (volβ((πβπ)[,)(πβπ)))))) = (π₯ β Fin β¦ (π’ β (β βm π₯), π£ β (β βm π₯) β¦ if(π₯ = β
, 0, βπ β π₯ (volβ((π’βπ)[,)(π£βπ)))))) |
307 | 126, 306 | eqtri 2765 |
. . . . . . . . . . . . . . . . . . 19
β’ πΏ = (π₯ β Fin β¦ (π’ β (β βm π₯), π£ β (β βm π₯) β¦ if(π₯ = β
, 0, βπ β π₯ (volβ((π’βπ)[,)(π£βπ)))))) |
308 | | simp-6r 787 |
. . . . . . . . . . . . . . . . . . 19
β’
(((((((π β§ π§ β π) β§ π β (β βm {π§})) β§ π β (β βm {π§})) β§ π β ((β βm {π§}) βm β))
β§ π β ((β
βm {π§})
βm β)) β§ Xπ β {π§} ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ))) β π§ β π) |
309 | | eqid 2737 |
. . . . . . . . . . . . . . . . . . 19
β’ {π§} = {π§} |
310 | | elmapi 8794 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π β (β
βm {π§})
β π:{π§}βΆβ) |
311 | 310 | ad2antlr 726 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((((π β§ π§ β π) β§ π β (β βm {π§})) β§ π β (β βm {π§})) β π:{π§}βΆβ) |
312 | 311 | ad3antrrr 729 |
. . . . . . . . . . . . . . . . . . 19
β’
(((((((π β§ π§ β π) β§ π β (β βm {π§})) β§ π β (β βm {π§})) β§ π β ((β βm {π§}) βm β))
β§ π β ((β
βm {π§})
βm β)) β§ Xπ β {π§} ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ))) β π:{π§}βΆβ) |
313 | | elmapi 8794 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π β (β
βm {π§})
β π:{π§}βΆβ) |
314 | 313 | adantl 483 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((((π β§ π§ β π) β§ π β (β βm {π§})) β§ π β (β βm {π§})) β π:{π§}βΆβ) |
315 | 314 | ad3antrrr 729 |
. . . . . . . . . . . . . . . . . . 19
β’
(((((((π β§ π§ β π) β§ π β (β βm {π§})) β§ π β (β βm {π§})) β§ π β ((β βm {π§}) βm β))
β§ π β ((β
βm {π§})
βm β)) β§ Xπ β {π§} ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ))) β π:{π§}βΆβ) |
316 | | elmapi 8794 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π β ((β
βm {π§})
βm β) β π:ββΆ(β βm
{π§})) |
317 | 316 | adantl 483 |
. . . . . . . . . . . . . . . . . . . 20
β’
(((((π β§ π§ β π) β§ π β (β βm {π§})) β§ π β (β βm {π§})) β§ π β ((β βm {π§}) βm β))
β π:ββΆ(β βm
{π§})) |
318 | 317 | ad2antrr 725 |
. . . . . . . . . . . . . . . . . . 19
β’
(((((((π β§ π§ β π) β§ π β (β βm {π§})) β§ π β (β βm {π§})) β§ π β ((β βm {π§}) βm β))
β§ π β ((β
βm {π§})
βm β)) β§ Xπ β {π§} ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ))) β π:ββΆ(β βm
{π§})) |
319 | | elmapi 8794 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β ((β
βm {π§})
βm β) β π:ββΆ(β βm
{π§})) |
320 | 319 | ad2antlr 726 |
. . . . . . . . . . . . . . . . . . 19
β’
(((((((π β§ π§ β π) β§ π β (β βm {π§})) β§ π β (β βm {π§})) β§ π β ((β βm {π§}) βm β))
β§ π β ((β
βm {π§})
βm β)) β§ Xπ β {π§} ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ))) β π:ββΆ(β βm
{π§})) |
321 | | id 22 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (Xπ β
{π§} ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ)) β Xπ β {π§} ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ))) |
322 | | fveq2 6847 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
β’ (π = π β (πβπ) = (πβπ)) |
323 | 322, 294 | oveq12d 7380 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ (π = π β ((πβπ)[,)(πβπ)) = ((πβπ)[,)(πβπ))) |
324 | | eqcom 2744 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
β’ (π = π β π = π) |
325 | 324 | imbi1i 350 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
β’ ((π = π β ((πβπ)[,)(πβπ)) = ((πβπ)[,)(πβπ))) β (π = π β ((πβπ)[,)(πβπ)) = ((πβπ)[,)(πβπ)))) |
326 | | eqcom 2744 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
β’ (((πβπ)[,)(πβπ)) = ((πβπ)[,)(πβπ)) β ((πβπ)[,)(πβπ)) = ((πβπ)[,)(πβπ))) |
327 | 326 | imbi2i 336 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
β’ ((π = π β ((πβπ)[,)(πβπ)) = ((πβπ)[,)(πβπ))) β (π = π β ((πβπ)[,)(πβπ)) = ((πβπ)[,)(πβπ)))) |
328 | 325, 327 | bitri 275 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ ((π = π β ((πβπ)[,)(πβπ)) = ((πβπ)[,)(πβπ))) β (π = π β ((πβπ)[,)(πβπ)) = ((πβπ)[,)(πβπ)))) |
329 | 323, 328 | mpbi 229 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ (π = π β ((πβπ)[,)(πβπ)) = ((πβπ)[,)(πβπ))) |
330 | 329 | cbvixpv 8860 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ Xπ β
{π§} ((πβπ)[,)(πβπ)) = Xπ β {π§} ((πβπ)[,)(πβπ)) |
331 | 330 | a1i 11 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (Xπ β
{π§} ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ)) β Xπ β {π§} ((πβπ)[,)(πβπ)) = Xπ β {π§} ((πβπ)[,)(πβπ))) |
332 | 277 | ixpeq2dv 8858 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ (π = π β Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ)) = Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ))) |
333 | 332 | cbviunv 5005 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ βͺ π β β Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ)) = βͺ
π β β Xπ β
{π§} (((πβπ)βπ)[,)((πβπ)βπ)) |
334 | | fveq2 6847 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
β’ (π = π β ((πβπ)βπ) = ((πβπ)βπ)) |
335 | | fveq2 6847 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
β’ (π = π β ((πβπ)βπ) = ((πβπ)βπ)) |
336 | 334, 335 | oveq12d 7380 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
β’ (π = π β (((πβπ)βπ)[,)((πβπ)βπ)) = (((πβπ)βπ)[,)((πβπ)βπ))) |
337 | 336 | cbvixpv 8860 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
β’ Xπ β
{π§} (((πβπ)βπ)[,)((πβπ)βπ)) = Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ)) |
338 | 337 | a1i 11 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ (π β β β Xπ β
{π§} (((πβπ)βπ)[,)((πβπ)βπ)) = Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ))) |
339 | 338 | iuneq2i 4980 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ βͺ π β β Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ)) = βͺ
π β β Xπ β
{π§} (((πβπ)βπ)[,)((πβπ)βπ)) |
340 | 333, 339 | eqtr2i 2766 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ βͺ π β β Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ)) = βͺ
π β β Xπ β
{π§} (((πβπ)βπ)[,)((πβπ)βπ)) |
341 | 340 | a1i 11 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (Xπ β
{π§} ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ)) β βͺ
π β β Xπ β
{π§} (((πβπ)βπ)[,)((πβπ)βπ)) = βͺ
π β β Xπ β
{π§} (((πβπ)βπ)[,)((πβπ)βπ))) |
342 | 331, 341 | sseq12d 3982 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (Xπ β
{π§} ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ)) β (Xπ β {π§} ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ)) β Xπ β {π§} ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ)))) |
343 | 321, 342 | mpbird 257 |
. . . . . . . . . . . . . . . . . . . 20
β’ (Xπ β
{π§} ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ)) β Xπ β {π§} ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ))) |
344 | 343 | adantl 483 |
. . . . . . . . . . . . . . . . . . 19
β’
(((((((π β§ π§ β π) β§ π β (β βm {π§})) β§ π β (β βm {π§})) β§ π β ((β βm {π§}) βm β))
β§ π β ((β
βm {π§})
βm β)) β§ Xπ β {π§} ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ))) β Xπ β {π§} ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ))) |
345 | 307, 308,
309, 312, 315, 318, 320, 344 | hoidmv1le 44909 |
. . . . . . . . . . . . . . . . . 18
β’
(((((((π β§ π§ β π) β§ π β (β βm {π§})) β§ π β (β βm {π§})) β§ π β ((β βm {π§}) βm β))
β§ π β ((β
βm {π§})
βm β)) β§ Xπ β {π§} ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ))) β (π(πΏβ{π§})π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ{π§})(πβπ))))) |
346 | 345 | adantr 482 |
. . . . . . . . . . . . . . . . 17
β’
((((((((π β§ π§ β π) β§ π β (β βm {π§})) β§ π β (β βm {π§})) β§ π β ((β βm {π§}) βm β))
β§ π β ((β
βm {π§})
βm β)) β§ Xπ β {π§} ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ))) β§ π¦ = β
) β (π(πΏβ{π§})π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ{π§})(πβπ))))) |
347 | 236, 238 | eqtrd 2777 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π¦ = β
β (π¦ βͺ {π§}) = {π§}) |
348 | 347 | fveq2d 6851 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π¦ = β
β (πΏβ(π¦ βͺ {π§})) = (πΏβ{π§})) |
349 | 348 | oveqd 7379 |
. . . . . . . . . . . . . . . . . . 19
β’ (π¦ = β
β (π(πΏβ(π¦ βͺ {π§}))π) = (π(πΏβ{π§})π)) |
350 | 349 | adantl 483 |
. . . . . . . . . . . . . . . . . 18
β’
((((((((π β§ π§ β π) β§ π β (β βm {π§})) β§ π β (β βm {π§})) β§ π β ((β βm {π§}) βm β))
β§ π β ((β
βm {π§})
βm β)) β§ Xπ β {π§} ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ))) β§ π¦ = β
) β (π(πΏβ(π¦ βͺ {π§}))π) = (π(πΏβ{π§})π)) |
351 | 348 | oveqd 7379 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π¦ = β
β ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ)) = ((πβπ)(πΏβ{π§})(πβπ))) |
352 | 351 | mpteq2dv 5212 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π¦ = β
β (π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ))) = (π β β β¦ ((πβπ)(πΏβ{π§})(πβπ)))) |
353 | 352 | fveq2d 6851 |
. . . . . . . . . . . . . . . . . . 19
β’ (π¦ = β
β
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ)))) =
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ{π§})(πβπ))))) |
354 | 353 | adantl 483 |
. . . . . . . . . . . . . . . . . 18
β’
((((((((π β§ π§ β π) β§ π β (β βm {π§})) β§ π β (β βm {π§})) β§ π β ((β βm {π§}) βm β))
β§ π β ((β
βm {π§})
βm β)) β§ Xπ β {π§} ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ))) β§ π¦ = β
) β
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ)))) =
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ{π§})(πβπ))))) |
355 | 350, 354 | breq12d 5123 |
. . . . . . . . . . . . . . . . 17
β’
((((((((π β§ π§ β π) β§ π β (β βm {π§})) β§ π β (β βm {π§})) β§ π β ((β βm {π§}) βm β))
β§ π β ((β
βm {π§})
βm β)) β§ Xπ β {π§} ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ))) β§ π¦ = β
) β ((π(πΏβ(π¦ βͺ {π§}))π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ)))) β (π(πΏβ{π§})π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ{π§})(πβπ)))))) |
356 | 346, 355 | mpbird 257 |
. . . . . . . . . . . . . . . 16
β’
((((((((π β§ π§ β π) β§ π β (β βm {π§})) β§ π β (β βm {π§})) β§ π β ((β βm {π§}) βm β))
β§ π β ((β
βm {π§})
βm β)) β§ Xπ β {π§} ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β {π§} (((πβπ)βπ)[,)((πβπ)βπ))) β§ π¦ = β
) β (π(πΏβ(π¦ βͺ {π§}))π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ))))) |
357 | 286, 287,
356 | syl2anc 585 |
. . . . . . . . . . . . . . 15
β’
(((((((((π β§
(π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β ((β βm (π¦ βͺ {π§})) βm β)) β§ π β ((β
βm (π¦ βͺ
{π§})) βm
β)) β§ Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) β§ π¦ = β
) β (π(πΏβ(π¦ βͺ {π§}))π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ))))) |
358 | 17 | ad8antr 739 |
. . . . . . . . . . . . . . . . 17
β’
(((((((((π β§
(π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β ((β βm (π¦ βͺ {π§})) βm β)) β§ π β ((β
βm (π¦ βͺ
{π§})) βm
β)) β§ Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) β§ Β¬ π¦ = β
) β π β Fin) |
359 | | simplrl 776 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π β§ (π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β π¦ β π) |
360 | 359 | ad5ant12 755 |
. . . . . . . . . . . . . . . . . 18
β’
((((((π β§ (π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β ((β βm (π¦ βͺ {π§})) βm β)) β π¦ β π) |
361 | 360 | ad5ant12 755 |
. . . . . . . . . . . . . . . . 17
β’
(((((((((π β§
(π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β ((β βm (π¦ βͺ {π§})) βm β)) β§ π β ((β
βm (π¦ βͺ
{π§})) βm
β)) β§ Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) β§ Β¬ π¦ = β
) β π¦ β π) |
362 | | simplrr 777 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π β§ (π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β π§ β (π β π¦)) |
363 | 362 | ad5ant12 755 |
. . . . . . . . . . . . . . . . . 18
β’
((((((π β§ (π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β ((β βm (π¦ βͺ {π§})) βm β)) β π§ β (π β π¦)) |
364 | 363 | ad5ant12 755 |
. . . . . . . . . . . . . . . . 17
β’
(((((((((π β§
(π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β ((β βm (π¦ βͺ {π§})) βm β)) β§ π β ((β
βm (π¦ βͺ
{π§})) βm
β)) β§ Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) β§ Β¬ π¦ = β
) β π§ β (π β π¦)) |
365 | | eqid 2737 |
. . . . . . . . . . . . . . . . 17
β’ (π¦ βͺ {π§}) = (π¦ βͺ {π§}) |
366 | | elmapi 8794 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β (β
βm (π¦ βͺ
{π§})) β π:(π¦ βͺ {π§})βΆβ) |
367 | 366 | adantr 482 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π β (β
βm (π¦ βͺ
{π§})) β§ π β (β
βm (π¦ βͺ
{π§}))) β π:(π¦ βͺ {π§})βΆβ) |
368 | 367 | ad4ant23 752 |
. . . . . . . . . . . . . . . . . 18
β’
((((((π β§ (π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β ((β βm (π¦ βͺ {π§})) βm β)) β π:(π¦ βͺ {π§})βΆβ) |
369 | 368 | ad3antrrr 729 |
. . . . . . . . . . . . . . . . 17
β’
(((((((((π β§
(π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β ((β βm (π¦ βͺ {π§})) βm β)) β§ π β ((β
βm (π¦ βͺ
{π§})) βm
β)) β§ Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) β§ Β¬ π¦ = β
) β π:(π¦ βͺ {π§})βΆβ) |
370 | | elmapi 8794 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π β (β
βm (π¦ βͺ
{π§})) β π:(π¦ βͺ {π§})βΆβ) |
371 | 370 | adantl 483 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π β (β
βm (π¦ βͺ
{π§})) β§ π β (β
βm (π¦ βͺ
{π§}))) β π:(π¦ βͺ {π§})βΆβ) |
372 | 371 | ad4ant23 752 |
. . . . . . . . . . . . . . . . . 18
β’
((((((π β§ (π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β ((β βm (π¦ βͺ {π§})) βm β)) β π:(π¦ βͺ {π§})βΆβ) |
373 | 372 | ad3antrrr 729 |
. . . . . . . . . . . . . . . . 17
β’
(((((((((π β§
(π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β ((β βm (π¦ βͺ {π§})) βm β)) β§ π β ((β
βm (π¦ βͺ
{π§})) βm
β)) β§ Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) β§ Β¬ π¦ = β
) β π:(π¦ βͺ {π§})βΆβ) |
374 | | elmapi 8794 |
. . . . . . . . . . . . . . . . . . 19
β’ (π β ((β
βm (π¦ βͺ
{π§})) βm
β) β π:ββΆ(β βm
(π¦ βͺ {π§}))) |
375 | 374 | adantl 483 |
. . . . . . . . . . . . . . . . . 18
β’
((((((π β§ (π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β ((β βm (π¦ βͺ {π§})) βm β)) β π:ββΆ(β
βm (π¦ βͺ
{π§}))) |
376 | 375 | ad3antrrr 729 |
. . . . . . . . . . . . . . . . 17
β’
(((((((((π β§
(π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β ((β βm (π¦ βͺ {π§})) βm β)) β§ π β ((β
βm (π¦ βͺ
{π§})) βm
β)) β§ Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) β§ Β¬ π¦ = β
) β π:ββΆ(β βm
(π¦ βͺ {π§}))) |
377 | | elmapi 8794 |
. . . . . . . . . . . . . . . . . . 19
β’ (π β ((β
βm (π¦ βͺ
{π§})) βm
β) β π:ββΆ(β βm
(π¦ βͺ {π§}))) |
378 | 377 | ad2antrr 725 |
. . . . . . . . . . . . . . . . . 18
β’ (((π β ((β
βm (π¦ βͺ
{π§})) βm
β) β§ Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) β§ Β¬ π¦ = β
) β π:ββΆ(β βm
(π¦ βͺ {π§}))) |
379 | 378 | adantlll 717 |
. . . . . . . . . . . . . . . . 17
β’
(((((((((π β§
(π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β ((β βm (π¦ βͺ {π§})) βm β)) β§ π β ((β
βm (π¦ βͺ
{π§})) βm
β)) β§ Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) β§ Β¬ π¦ = β
) β π:ββΆ(β βm
(π¦ βͺ {π§}))) |
380 | | fveq2 6847 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
β’ (π = π β (πβπ) = (πβπ)) |
381 | | fveq2 6847 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
β’ (π = π β (πβπ) = (πβπ)) |
382 | 380, 381 | oveq12d 7380 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
β’ (π = π β ((πβπ)[,)(πβπ)) = ((πβπ)[,)(πβπ))) |
383 | 382 | cbvixpv 8860 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
β’ Xπ β
π¦ ((πβπ)[,)(πβπ)) = Xπ β π¦ ((πβπ)[,)(πβπ)) |
384 | 383 | a1i 11 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
β’ (β = π β Xπ β π¦ ((πβπ)[,)(πβπ)) = Xπ β π¦ ((πβπ)[,)(πβπ))) |
385 | | fveq2 6847 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
32
β’ (π = π β (πβπ) = (πβπ)) |
386 | 385 | fveq1d 6849 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
β’ (π = π β ((πβπ)βπ) = ((πβπ)βπ)) |
387 | | fveq2 6847 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
32
β’ (π = π β (ββπ) = (ββπ)) |
388 | 387 | fveq1d 6849 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
β’ (π = π β ((ββπ)βπ) = ((ββπ)βπ)) |
389 | 386, 388 | oveq12d 7380 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . .
30
β’ (π = π β (((πβπ)βπ)[,)((ββπ)βπ)) = (((πβπ)βπ)[,)((ββπ)βπ))) |
390 | 389 | ixpeq2dv 8858 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
β’ (π = π β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) = Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ))) |
391 | 390 | cbviunv 5005 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
β’ βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) = βͺ
π β β Xπ β
π¦ (((πβπ)βπ)[,)((ββπ)βπ)) |
392 | 391 | a1i 11 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
β’ (β = π β βͺ
π β β Xπ β
π¦ (((πβπ)βπ)[,)((ββπ)βπ)) = βͺ
π β β Xπ β
π¦ (((πβπ)βπ)[,)((ββπ)βπ))) |
393 | | fveq2 6847 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
33
β’ (π = π β ((πβπ)βπ) = ((πβπ)βπ)) |
394 | | fveq2 6847 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
33
β’ (π = π β ((ββπ)βπ) = ((ββπ)βπ)) |
395 | 393, 394 | oveq12d 7380 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
32
β’ (π = π β (((πβπ)βπ)[,)((ββπ)βπ)) = (((πβπ)βπ)[,)((ββπ)βπ))) |
396 | 395 | cbvixpv 8860 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
β’ Xπ β
π¦ (((πβπ)βπ)[,)((ββπ)βπ)) = Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) |
397 | 396 | a1i 11 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . .
30
β’ (β = π β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) = Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ))) |
398 | | fveq1 6846 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
33
β’ (β = π β (ββπ) = (πβπ)) |
399 | 398 | fveq1d 6849 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
32
β’ (β = π β ((ββπ)βπ) = ((πβπ)βπ)) |
400 | 399 | oveq2d 7378 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
β’ (β = π β (((πβπ)βπ)[,)((ββπ)βπ)) = (((πβπ)βπ)[,)((πβπ)βπ))) |
401 | 400 | ixpeq2dv 8858 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . .
30
β’ (β = π β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) = Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ))) |
402 | 397, 401 | eqtrd 2777 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
β’ (β = π β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) = Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ))) |
403 | 402 | adantr 482 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
β’ ((β = π β§ π β β) β Xπ β
π¦ (((πβπ)βπ)[,)((ββπ)βπ)) = Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ))) |
404 | 403 | iuneq2dv 4983 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
β’ (β = π β βͺ
π β β Xπ β
π¦ (((πβπ)βπ)[,)((ββπ)βπ)) = βͺ
π β β Xπ β
π¦ (((πβπ)βπ)[,)((πβπ)βπ))) |
405 | 392, 404 | eqtrd 2777 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
β’ (β = π β βͺ
π β β Xπ β
π¦ (((πβπ)βπ)[,)((ββπ)βπ)) = βͺ
π β β Xπ β
π¦ (((πβπ)βπ)[,)((πβπ)βπ))) |
406 | 384, 405 | sseq12d 3982 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ (β = π β (Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)))) |
407 | 385, 387 | oveq12d 7380 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . .
30
β’ (π = π β ((πβπ)(πΏβπ¦)(ββπ)) = ((πβπ)(πΏβπ¦)(ββπ))) |
408 | 407 | cbvmptv 5223 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
β’ (π β β β¦ ((πβπ)(πΏβπ¦)(ββπ))) = (π β β β¦ ((πβπ)(πΏβπ¦)(ββπ))) |
409 | 408 | a1i 11 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
β’ (β = π β (π β β β¦ ((πβπ)(πΏβπ¦)(ββπ))) = (π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))) |
410 | 398 | oveq2d 7378 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
β’ (β = π β ((πβπ)(πΏβπ¦)(ββπ)) = ((πβπ)(πΏβπ¦)(πβπ))) |
411 | 410 | mpteq2dv 5212 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
β’ (β = π β (π β β β¦ ((πβπ)(πΏβπ¦)(ββπ))) = (π β β β¦ ((πβπ)(πΏβπ¦)(πβπ)))) |
412 | 409, 411 | eqtrd 2777 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
β’ (β = π β (π β β β¦ ((πβπ)(πΏβπ¦)(ββπ))) = (π β β β¦ ((πβπ)(πΏβπ¦)(πβπ)))) |
413 | 412 | fveq2d 6851 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
β’ (β = π β
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))) =
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))) |
414 | 413 | breq2d 5122 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ (β = π β ((π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ)))))) |
415 | 406, 414 | imbi12d 345 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ (β = π β ((Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ))))) β (Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))))) |
416 | 415 | cbvralvw 3228 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’
(ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ))))) β βπ β ((β βm π¦) βm
β)(Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ)))))) |
417 | 416 | ralbii 3097 |
. . . . . . . . . . . . . . . . . . . . . 22
β’
(βπ β
((β βm π¦) βm β)ββ β ((β
βm π¦)
βm β)(Xπ β π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ))))) β βπ β ((β βm π¦) βm
β)βπ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ)))))) |
418 | 417 | ralbii 3097 |
. . . . . . . . . . . . . . . . . . . . 21
β’
(βπ β
(β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ))))) β βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)βπ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ)))))) |
419 | 418 | ralbii 3097 |
. . . . . . . . . . . . . . . . . . . 20
β’
(βπ β
(β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ))))) β βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)βπ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ)))))) |
420 | 419 | biimpi 215 |
. . . . . . . . . . . . . . . . . . 19
β’
(βπ β
(β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ))))) β βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)βπ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ)))))) |
421 | 420 | adantl 483 |
. . . . . . . . . . . . . . . . . 18
β’ (((π β§ (π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)βπ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ)))))) |
422 | 421 | ad6antr 735 |
. . . . . . . . . . . . . . . . 17
β’
(((((((((π β§
(π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β ((β βm (π¦ βͺ {π§})) βm β)) β§ π β ((β
βm (π¦ βͺ
{π§})) βm
β)) β§ Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) β§ Β¬ π¦ = β
) β βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)βπ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ)))))) |
423 | 323 | cbvixpv 8860 |
. . . . . . . . . . . . . . . . . . . 20
β’ Xπ β
(π¦ βͺ {π§})((πβπ)[,)(πβπ)) = Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) |
424 | 336 | cbvixpv 8860 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ Xπ β
(π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) = Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) |
425 | 424 | a1i 11 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π = π β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) = Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) |
426 | | fveq2 6847 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ (π = π β (πβπ) = (πβπ)) |
427 | 426 | fveq1d 6849 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ (π = π β ((πβπ)βπ) = ((πβπ)βπ)) |
428 | | fveq2 6847 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
β’ (π = π β (πβπ) = (πβπ)) |
429 | 428 | fveq1d 6849 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ (π = π β ((πβπ)βπ) = ((πβπ)βπ)) |
430 | 427, 429 | oveq12d 7380 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ (π = π β (((πβπ)βπ)[,)((πβπ)βπ)) = (((πβπ)βπ)[,)((πβπ)βπ))) |
431 | 430 | ixpeq2dv 8858 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π = π β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) = Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) |
432 | 425, 431 | eqtrd 2777 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π = π β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) = Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) |
433 | 432 | cbviunv 5005 |
. . . . . . . . . . . . . . . . . . . 20
β’ βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) = βͺ
π β β Xπ β
(π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) |
434 | 423, 433 | sseq12i 3979 |
. . . . . . . . . . . . . . . . . . 19
β’ (Xπ β
(π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) β Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) |
435 | 434 | biimpi 215 |
. . . . . . . . . . . . . . . . . 18
β’ (Xπ β
(π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) β Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) |
436 | 435 | ad2antlr 726 |
. . . . . . . . . . . . . . . . 17
β’
(((((((((π β§
(π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β ((β βm (π¦ βͺ {π§})) βm β)) β§ π β ((β
βm (π¦ βͺ
{π§})) βm
β)) β§ Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) β§ Β¬ π¦ = β
) β Xπ β
(π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) |
437 | | neqne 2952 |
. . . . . . . . . . . . . . . . . 18
β’ (Β¬
π¦ = β
β π¦ β β
) |
438 | 437 | adantl 483 |
. . . . . . . . . . . . . . . . 17
β’
(((((((((π β§
(π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β ((β βm (π¦ βͺ {π§})) βm β)) β§ π β ((β
βm (π¦ βͺ
{π§})) βm
β)) β§ Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) β§ Β¬ π¦ = β
) β π¦ β β
) |
439 | 307, 358,
361, 364, 365, 369, 373, 376, 379, 422, 436, 438 | hoidmvlelem5 44914 |
. . . . . . . . . . . . . . . 16
β’
(((((((((π β§
(π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β ((β βm (π¦ βͺ {π§})) βm β)) β§ π β ((β
βm (π¦ βͺ
{π§})) βm
β)) β§ Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) β§ Β¬ π¦ = β
) β (π(πΏβ(π¦ βͺ {π§}))π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ))))) |
440 | 273, 275 | oveq12d 7380 |
. . . . . . . . . . . . . . . . . . 19
β’ (π = π β ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ)) = ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ))) |
441 | 440 | cbvmptv 5223 |
. . . . . . . . . . . . . . . . . 18
β’ (π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ))) = (π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ))) |
442 | 441 | fveq2i 6850 |
. . . . . . . . . . . . . . . . 17
β’
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ)))) =
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ)))) |
443 | 442 | breq2i 5118 |
. . . . . . . . . . . . . . . 16
β’ ((π(πΏβ(π¦ βͺ {π§}))π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ)))) β (π(πΏβ(π¦ βͺ {π§}))π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ))))) |
444 | 439, 443 | sylib 217 |
. . . . . . . . . . . . . . 15
β’
(((((((((π β§
(π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β ((β βm (π¦ βͺ {π§})) βm β)) β§ π β ((β
βm (π¦ βͺ
{π§})) βm
β)) β§ Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) β§ Β¬ π¦ = β
) β (π(πΏβ(π¦ βͺ {π§}))π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ))))) |
445 | 357, 444 | pm2.61dan 812 |
. . . . . . . . . . . . . 14
β’
((((((((π β§ (π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β ((β βm (π¦ βͺ {π§})) βm β)) β§ π β ((β
βm (π¦ βͺ
{π§})) βm
β)) β§ Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ))) β (π(πΏβ(π¦ βͺ {π§}))π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ))))) |
446 | 445 | ex 414 |
. . . . . . . . . . . . 13
β’
(((((((π β§ (π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β ((β βm (π¦ βͺ {π§})) βm β)) β§ π β ((β
βm (π¦ βͺ
{π§})) βm
β)) β (Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβ(π¦ βͺ {π§}))π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ)))))) |
447 | 446 | ralrimiva 3144 |
. . . . . . . . . . . 12
β’
((((((π β§ (π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β ((β βm (π¦ βͺ {π§})) βm β)) β
βπ β ((β
βm (π¦ βͺ
{π§})) βm
β)(Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβ(π¦ βͺ {π§}))π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ)))))) |
448 | 447 | ralrimiva 3144 |
. . . . . . . . . . 11
β’
(((((π β§ (π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β§ π β (β βm (π¦ βͺ {π§}))) β βπ β ((β βm (π¦ βͺ {π§})) βm β)βπ β ((β
βm (π¦ βͺ
{π§})) βm
β)(Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβ(π¦ βͺ {π§}))π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ)))))) |
449 | 448 | ralrimiva 3144 |
. . . . . . . . . 10
β’ ((((π β§ (π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β§ π β (β βm (π¦ βͺ {π§}))) β βπ β (β βm (π¦ βͺ {π§}))βπ β ((β βm (π¦ βͺ {π§})) βm β)βπ β ((β
βm (π¦ βͺ
{π§})) βm
β)(Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβ(π¦ βͺ {π§}))π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ)))))) |
450 | 449 | ralrimiva 3144 |
. . . . . . . . 9
β’ (((π β§ (π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)ββ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((ββπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(ββπ)))))) β βπ β (β βm (π¦ βͺ {π§}))βπ β (β βm (π¦ βͺ {π§}))βπ β ((β βm (π¦ βͺ {π§})) βm β)βπ β ((β
βm (π¦ βͺ
{π§})) βm
β)(Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβ(π¦ βͺ {π§}))π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ)))))) |
451 | 177, 229,
450 | syl2anc 585 |
. . . . . . . 8
β’ (((π β§ (π¦ β π β§ π§ β (π β π¦))) β§ βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)βπ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ)))))) β βπ β (β βm (π¦ βͺ {π§}))βπ β (β βm (π¦ βͺ {π§}))βπ β ((β βm (π¦ βͺ {π§})) βm β)βπ β ((β
βm (π¦ βͺ
{π§})) βm
β)(Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβ(π¦ βͺ {π§}))π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ)))))) |
452 | 451 | ex 414 |
. . . . . . 7
β’ ((π β§ (π¦ β π β§ π§ β (π β π¦))) β (βπ β (β βm π¦)βπ β (β βm π¦)βπ β ((β βm π¦) βm
β)βπ β
((β βm π¦) βm β)(Xπ β
π¦ ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π¦ (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ¦)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ¦)(πβπ))))) β βπ β (β βm (π¦ βͺ {π§}))βπ β (β βm (π¦ βͺ {π§}))βπ β ((β βm (π¦ βͺ {π§})) βm β)βπ β ((β
βm (π¦ βͺ
{π§})) βm
β)(Xπ β (π¦ βͺ {π§})((πβπ)[,)(πβπ)) β βͺ π β β Xπ β (π¦ βͺ {π§})(((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβ(π¦ βͺ {π§}))π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβ(π¦ βͺ {π§}))(πβπ))))))) |
453 | 50, 75, 100, 125, 176, 452, 17 | findcard2d 9117 |
. . . . . 6
β’ (π β βπ β (β βm π)βπ β (β βm π)βπ β ((β βm π) βm
β)βπ β
((β βm π) βm β)(Xπ β
π ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ)))))) |
454 | | fveq1 6846 |
. . . . . . . . . . . . . 14
β’ (π = π΄ β (πβπ) = (π΄βπ)) |
455 | 454 | oveq1d 7377 |
. . . . . . . . . . . . 13
β’ (π = π΄ β ((πβπ)[,)(πβπ)) = ((π΄βπ)[,)(πβπ))) |
456 | 455 | ixpeq2dv 8858 |
. . . . . . . . . . . 12
β’ (π = π΄ β Xπ β π ((πβπ)[,)(πβπ)) = Xπ β π ((π΄βπ)[,)(πβπ))) |
457 | 456 | sseq1d 3980 |
. . . . . . . . . . 11
β’ (π = π΄ β (Xπ β π ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β Xπ β π ((π΄βπ)[,)(πβπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)))) |
458 | | oveq1 7369 |
. . . . . . . . . . . 12
β’ (π = π΄ β (π(πΏβπ)π) = (π΄(πΏβπ)π)) |
459 | 458 | breq1d 5120 |
. . . . . . . . . . 11
β’ (π = π΄ β ((π(πΏβπ)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ)))) β (π΄(πΏβπ)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ)))))) |
460 | 457, 459 | imbi12d 345 |
. . . . . . . . . 10
β’ (π = π΄ β ((Xπ β π ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ))))) β (Xπ β π ((π΄βπ)[,)(πβπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β (π΄(πΏβπ)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ))))))) |
461 | 460 | ralbidv 3175 |
. . . . . . . . 9
β’ (π = π΄ β (βπ β ((β βm π) βm
β)(Xπ β π ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ))))) β βπ β ((β βm π) βm
β)(Xπ β π ((π΄βπ)[,)(πβπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β (π΄(πΏβπ)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ))))))) |
462 | 461 | ralbidv 3175 |
. . . . . . . 8
β’ (π = π΄ β (βπ β ((β βm π) βm
β)βπ β
((β βm π) βm β)(Xπ β
π ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ))))) β βπ β ((β βm π) βm
β)βπ β
((β βm π) βm β)(Xπ β
π ((π΄βπ)[,)(πβπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β (π΄(πΏβπ)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ))))))) |
463 | 462 | ralbidv 3175 |
. . . . . . 7
β’ (π = π΄ β (βπ β (β βm π)βπ β ((β βm π) βm
β)βπ β
((β βm π) βm β)(Xπ β
π ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ))))) β βπ β (β βm π)βπ β ((β βm π) βm
β)βπ β
((β βm π) βm β)(Xπ β
π ((π΄βπ)[,)(πβπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β (π΄(πΏβπ)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ))))))) |
464 | 463 | rspcva 3582 |
. . . . . 6
β’ ((π΄ β (β
βm π) β§
βπ β (β
βm π)βπ β (β βm π)βπ β ((β βm π) βm
β)βπ β
((β βm π) βm β)(Xπ β
π ((πβπ)[,)(πβπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β (π(πΏβπ)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ)))))) β βπ β (β βm π)βπ β ((β βm π) βm
β)βπ β
((β βm π) βm β)(Xπ β
π ((π΄βπ)[,)(πβπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β (π΄(πΏβπ)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ)))))) |
465 | 25, 453, 464 | syl2anc 585 |
. . . . 5
β’ (π β βπ β (β βm π)βπ β ((β βm π) βm
β)βπ β
((β βm π) βm β)(Xπ β
π ((π΄βπ)[,)(πβπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β (π΄(πΏβπ)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ)))))) |
466 | | fveq1 6846 |
. . . . . . . . . . . 12
β’ (π = π΅ β (πβπ) = (π΅βπ)) |
467 | 466 | oveq2d 7378 |
. . . . . . . . . . 11
β’ (π = π΅ β ((π΄βπ)[,)(πβπ)) = ((π΄βπ)[,)(π΅βπ))) |
468 | 467 | ixpeq2dv 8858 |
. . . . . . . . . 10
β’ (π = π΅ β Xπ β π ((π΄βπ)[,)(πβπ)) = Xπ β π ((π΄βπ)[,)(π΅βπ))) |
469 | 468 | sseq1d 3980 |
. . . . . . . . 9
β’ (π = π΅ β (Xπ β π ((π΄βπ)[,)(πβπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β Xπ β π ((π΄βπ)[,)(π΅βπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)))) |
470 | | oveq2 7370 |
. . . . . . . . . 10
β’ (π = π΅ β (π΄(πΏβπ)π) = (π΄(πΏβπ)π΅)) |
471 | 470 | breq1d 5120 |
. . . . . . . . 9
β’ (π = π΅ β ((π΄(πΏβπ)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ)))) β (π΄(πΏβπ)π΅) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ)))))) |
472 | 469, 471 | imbi12d 345 |
. . . . . . . 8
β’ (π = π΅ β ((Xπ β π ((π΄βπ)[,)(πβπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β (π΄(πΏβπ)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ))))) β (Xπ β π ((π΄βπ)[,)(π΅βπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β (π΄(πΏβπ)π΅) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ))))))) |
473 | 472 | ralbidv 3175 |
. . . . . . 7
β’ (π = π΅ β (βπ β ((β βm π) βm
β)(Xπ β π ((π΄βπ)[,)(πβπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β (π΄(πΏβπ)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ))))) β βπ β ((β βm π) βm
β)(Xπ β π ((π΄βπ)[,)(π΅βπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β (π΄(πΏβπ)π΅) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ))))))) |
474 | 473 | ralbidv 3175 |
. . . . . 6
β’ (π = π΅ β (βπ β ((β βm π) βm
β)βπ β
((β βm π) βm β)(Xπ β
π ((π΄βπ)[,)(πβπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β (π΄(πΏβπ)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ))))) β βπ β ((β βm π) βm
β)βπ β
((β βm π) βm β)(Xπ β
π ((π΄βπ)[,)(π΅βπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β (π΄(πΏβπ)π΅) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ))))))) |
475 | 474 | rspcva 3582 |
. . . . 5
β’ ((π΅ β (β
βm π) β§
βπ β (β
βm π)βπ β ((β βm π) βm
β)βπ β
((β βm π) βm β)(Xπ β
π ((π΄βπ)[,)(πβπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β (π΄(πΏβπ)π) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ)))))) β βπ β ((β βm π) βm
β)βπ β
((β βm π) βm β)(Xπ β
π ((π΄βπ)[,)(π΅βπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β (π΄(πΏβπ)π΅) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ)))))) |
476 | 21, 465, 475 | syl2anc 585 |
. . . 4
β’ (π β βπ β ((β βm π) βm
β)βπ β
((β βm π) βm β)(Xπ β
π ((π΄βπ)[,)(π΅βπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β (π΄(πΏβπ)π΅) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ)))))) |
477 | | fveq1 6846 |
. . . . . . . . . . . . 13
β’ (π = πΆ β (πβπ) = (πΆβπ)) |
478 | 477 | fveq1d 6849 |
. . . . . . . . . . . 12
β’ (π = πΆ β ((πβπ)βπ) = ((πΆβπ)βπ)) |
479 | 478 | oveq1d 7377 |
. . . . . . . . . . 11
β’ (π = πΆ β (((πβπ)βπ)[,)((πβπ)βπ)) = (((πΆβπ)βπ)[,)((πβπ)βπ))) |
480 | 479 | ixpeq2dv 8858 |
. . . . . . . . . 10
β’ (π = πΆ β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) = Xπ β π (((πΆβπ)βπ)[,)((πβπ)βπ))) |
481 | 480 | adantr 482 |
. . . . . . . . 9
β’ ((π = πΆ β§ π β β) β Xπ β
π (((πβπ)βπ)[,)((πβπ)βπ)) = Xπ β π (((πΆβπ)βπ)[,)((πβπ)βπ))) |
482 | 481 | iuneq2dv 4983 |
. . . . . . . 8
β’ (π = πΆ β βͺ
π β β Xπ β
π (((πβπ)βπ)[,)((πβπ)βπ)) = βͺ
π β β Xπ β
π (((πΆβπ)βπ)[,)((πβπ)βπ))) |
483 | 482 | sseq2d 3981 |
. . . . . . 7
β’ (π = πΆ β (Xπ β π ((π΄βπ)[,)(π΅βπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β Xπ β π ((π΄βπ)[,)(π΅βπ)) β βͺ π β β Xπ β π (((πΆβπ)βπ)[,)((πβπ)βπ)))) |
484 | 477 | oveq1d 7377 |
. . . . . . . . . 10
β’ (π = πΆ β ((πβπ)(πΏβπ)(πβπ)) = ((πΆβπ)(πΏβπ)(πβπ))) |
485 | 484 | mpteq2dv 5212 |
. . . . . . . . 9
β’ (π = πΆ β (π β β β¦ ((πβπ)(πΏβπ)(πβπ))) = (π β β β¦ ((πΆβπ)(πΏβπ)(πβπ)))) |
486 | 485 | fveq2d 6851 |
. . . . . . . 8
β’ (π = πΆ β
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ)))) =
(Ξ£^β(π β β β¦ ((πΆβπ)(πΏβπ)(πβπ))))) |
487 | 486 | breq2d 5122 |
. . . . . . 7
β’ (π = πΆ β ((π΄(πΏβπ)π΅) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ)))) β (π΄(πΏβπ)π΅) β€
(Ξ£^β(π β β β¦ ((πΆβπ)(πΏβπ)(πβπ)))))) |
488 | 483, 487 | imbi12d 345 |
. . . . . 6
β’ (π = πΆ β ((Xπ β π ((π΄βπ)[,)(π΅βπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β (π΄(πΏβπ)π΅) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ))))) β (Xπ β π ((π΄βπ)[,)(π΅βπ)) β βͺ π β β Xπ β π (((πΆβπ)βπ)[,)((πβπ)βπ)) β (π΄(πΏβπ)π΅) β€
(Ξ£^β(π β β β¦ ((πΆβπ)(πΏβπ)(πβπ))))))) |
489 | 488 | ralbidv 3175 |
. . . . 5
β’ (π = πΆ β (βπ β ((β βm π) βm
β)(Xπ β π ((π΄βπ)[,)(π΅βπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β (π΄(πΏβπ)π΅) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ))))) β βπ β ((β βm π) βm
β)(Xπ β π ((π΄βπ)[,)(π΅βπ)) β βͺ π β β Xπ β π (((πΆβπ)βπ)[,)((πβπ)βπ)) β (π΄(πΏβπ)π΅) β€
(Ξ£^β(π β β β¦ ((πΆβπ)(πΏβπ)(πβπ))))))) |
490 | 489 | rspcva 3582 |
. . . 4
β’ ((πΆ β ((β
βm π)
βm β) β§ βπ β ((β βm π) βm
β)βπ β
((β βm π) βm β)(Xπ β
π ((π΄βπ)[,)(π΅βπ)) β βͺ π β β Xπ β π (((πβπ)βπ)[,)((πβπ)βπ)) β (π΄(πΏβπ)π΅) β€
(Ξ£^β(π β β β¦ ((πβπ)(πΏβπ)(πβπ)))))) β βπ β ((β βm π) βm
β)(Xπ β π ((π΄βπ)[,)(π΅βπ)) β βͺ π β β Xπ β π (((πΆβπ)βπ)[,)((πβπ)βπ)) β (π΄(πΏβπ)π΅) β€
(Ξ£^β(π β β β¦ ((πΆβπ)(πΏβπ)(πβπ)))))) |
491 | 13, 476, 490 | syl2anc 585 |
. . 3
β’ (π β βπ β ((β βm π) βm
β)(Xπ β π ((π΄βπ)[,)(π΅βπ)) β βͺ π β β Xπ β π (((πΆβπ)βπ)[,)((πβπ)βπ)) β (π΄(πΏβπ)π΅) β€
(Ξ£^β(π β β β¦ ((πΆβπ)(πΏβπ)(πβπ)))))) |
492 | | fveq1 6846 |
. . . . . . . . . . 11
β’ (π = π· β (πβπ) = (π·βπ)) |
493 | 492 | fveq1d 6849 |
. . . . . . . . . 10
β’ (π = π· β ((πβπ)βπ) = ((π·βπ)βπ)) |
494 | 493 | oveq2d 7378 |
. . . . . . . . 9
β’ (π = π· β (((πΆβπ)βπ)[,)((πβπ)βπ)) = (((πΆβπ)βπ)[,)((π·βπ)βπ))) |
495 | 494 | ixpeq2dv 8858 |
. . . . . . . 8
β’ (π = π· β Xπ β π (((πΆβπ)βπ)[,)((πβπ)βπ)) = Xπ β π (((πΆβπ)βπ)[,)((π·βπ)βπ))) |
496 | 495 | adantr 482 |
. . . . . . 7
β’ ((π = π· β§ π β β) β Xπ β
π (((πΆβπ)βπ)[,)((πβπ)βπ)) = Xπ β π (((πΆβπ)βπ)[,)((π·βπ)βπ))) |
497 | 496 | iuneq2dv 4983 |
. . . . . 6
β’ (π = π· β βͺ
π β β Xπ β
π (((πΆβπ)βπ)[,)((πβπ)βπ)) = βͺ
π β β Xπ β
π (((πΆβπ)βπ)[,)((π·βπ)βπ))) |
498 | 497 | sseq2d 3981 |
. . . . 5
β’ (π = π· β (Xπ β π ((π΄βπ)[,)(π΅βπ)) β βͺ π β β Xπ β π (((πΆβπ)βπ)[,)((πβπ)βπ)) β Xπ β π ((π΄βπ)[,)(π΅βπ)) β βͺ π β β Xπ β π (((πΆβπ)βπ)[,)((π·βπ)βπ)))) |
499 | 492 | oveq2d 7378 |
. . . . . . . 8
β’ (π = π· β ((πΆβπ)(πΏβπ)(πβπ)) = ((πΆβπ)(πΏβπ)(π·βπ))) |
500 | 499 | mpteq2dv 5212 |
. . . . . . 7
β’ (π = π· β (π β β β¦ ((πΆβπ)(πΏβπ)(πβπ))) = (π β β β¦ ((πΆβπ)(πΏβπ)(π·βπ)))) |
501 | 500 | fveq2d 6851 |
. . . . . 6
β’ (π = π· β
(Ξ£^β(π β β β¦ ((πΆβπ)(πΏβπ)(πβπ)))) =
(Ξ£^β(π β β β¦ ((πΆβπ)(πΏβπ)(π·βπ))))) |
502 | 501 | breq2d 5122 |
. . . . 5
β’ (π = π· β ((π΄(πΏβπ)π΅) β€
(Ξ£^β(π β β β¦ ((πΆβπ)(πΏβπ)(πβπ)))) β (π΄(πΏβπ)π΅) β€
(Ξ£^β(π β β β¦ ((πΆβπ)(πΏβπ)(π·βπ)))))) |
503 | 498, 502 | imbi12d 345 |
. . . 4
β’ (π = π· β ((Xπ β π ((π΄βπ)[,)(π΅βπ)) β βͺ π β β Xπ β π (((πΆβπ)βπ)[,)((πβπ)βπ)) β (π΄(πΏβπ)π΅) β€
(Ξ£^β(π β β β¦ ((πΆβπ)(πΏβπ)(πβπ))))) β (Xπ β π ((π΄βπ)[,)(π΅βπ)) β βͺ π β β Xπ β π (((πΆβπ)βπ)[,)((π·βπ)βπ)) β (π΄(πΏβπ)π΅) β€
(Ξ£^β(π β β β¦ ((πΆβπ)(πΏβπ)(π·βπ))))))) |
504 | 503 | rspcva 3582 |
. . 3
β’ ((π· β ((β
βm π)
βm β) β§ βπ β ((β βm π) βm
β)(Xπ β π ((π΄βπ)[,)(π΅βπ)) β βͺ π β β Xπ β π (((πΆβπ)βπ)[,)((πβπ)βπ)) β (π΄(πΏβπ)π΅) β€
(Ξ£^β(π β β β¦ ((πΆβπ)(πΏβπ)(πβπ)))))) β (Xπ β π ((π΄βπ)[,)(π΅βπ)) β βͺ π β β Xπ β π (((πΆβπ)βπ)[,)((π·βπ)βπ)) β (π΄(πΏβπ)π΅) β€
(Ξ£^β(π β β β¦ ((πΆβπ)(πΏβπ)(π·βπ)))))) |
505 | 9, 491, 504 | syl2anc 585 |
. 2
β’ (π β (Xπ β
π ((π΄βπ)[,)(π΅βπ)) β βͺ π β β Xπ β π (((πΆβπ)βπ)[,)((π·βπ)βπ)) β (π΄(πΏβπ)π΅) β€
(Ξ£^β(π β β β¦ ((πΆβπ)(πΏβπ)(π·βπ)))))) |
506 | 1, 505 | mpd 15 |
1
β’ (π β (π΄(πΏβπ)π΅) β€
(Ξ£^β(π β β β¦ ((πΆβπ)(πΏβπ)(π·βπ))))) |