Step | Hyp | Ref
| Expression |
1 | | ssidd 4006 |
. . 3
β’ (π β π β π) |
2 | | elpwi 4610 |
. . . . . . . . 9
β’ (π β π« π β π β π) |
3 | 2 | adantl 481 |
. . . . . . . 8
β’ ((π β§ π β π« π) β π β π) |
4 | | df-ss 3966 |
. . . . . . . 8
β’ (π β π β (π β© π) = π) |
5 | 3, 4 | sylib 217 |
. . . . . . 7
β’ ((π β§ π β π« π) β (π β© π) = π) |
6 | 5 | fveq2d 6896 |
. . . . . 6
β’ ((π β§ π β π« π) β (πβ(π β© π)) = (πβπ)) |
7 | | ssdif0 4364 |
. . . . . . . . 9
β’ (π β π β (π β π) = β
) |
8 | 3, 7 | sylib 217 |
. . . . . . . 8
β’ ((π β§ π β π« π) β (π β π) = β
) |
9 | 8 | fveq2d 6896 |
. . . . . . 7
β’ ((π β§ π β π« π) β (πβ(π β π)) = (πββ
)) |
10 | | baselcarsg.1 |
. . . . . . . 8
β’ (π β (πββ
) = 0) |
11 | 10 | adantr 480 |
. . . . . . 7
β’ ((π β§ π β π« π) β (πββ
) = 0) |
12 | 9, 11 | eqtrd 2771 |
. . . . . 6
β’ ((π β§ π β π« π) β (πβ(π β π)) = 0) |
13 | 6, 12 | oveq12d 7430 |
. . . . 5
β’ ((π β§ π β π« π) β ((πβ(π β© π)) +π (πβ(π β π))) = ((πβπ) +π 0)) |
14 | | iccssxr 13412 |
. . . . . . 7
β’
(0[,]+β) β β* |
15 | | carsgval.2 |
. . . . . . . . 9
β’ (π β π:π« πβΆ(0[,]+β)) |
16 | 15 | adantr 480 |
. . . . . . . 8
β’ ((π β§ π β π« π) β π:π« πβΆ(0[,]+β)) |
17 | | simpr 484 |
. . . . . . . 8
β’ ((π β§ π β π« π) β π β π« π) |
18 | 16, 17 | ffvelcdmd 7088 |
. . . . . . 7
β’ ((π β§ π β π« π) β (πβπ) β (0[,]+β)) |
19 | 14, 18 | sselid 3981 |
. . . . . 6
β’ ((π β§ π β π« π) β (πβπ) β
β*) |
20 | | xaddrid 13225 |
. . . . . 6
β’ ((πβπ) β β* β ((πβπ) +π 0) = (πβπ)) |
21 | 19, 20 | syl 17 |
. . . . 5
β’ ((π β§ π β π« π) β ((πβπ) +π 0) = (πβπ)) |
22 | 13, 21 | eqtrd 2771 |
. . . 4
β’ ((π β§ π β π« π) β ((πβ(π β© π)) +π (πβ(π β π))) = (πβπ)) |
23 | 22 | ralrimiva 3145 |
. . 3
β’ (π β βπ β π« π((πβ(π β© π)) +π (πβ(π β π))) = (πβπ)) |
24 | 1, 23 | jca 511 |
. 2
β’ (π β (π β π β§ βπ β π« π((πβ(π β© π)) +π (πβ(π β π))) = (πβπ))) |
25 | | carsgval.1 |
. . 3
β’ (π β π β π) |
26 | 25, 15 | elcarsg 33599 |
. 2
β’ (π β (π β (toCaraSigaβπ) β (π β π β§ βπ β π« π((πβ(π β© π)) +π (πβ(π β π))) = (πβπ)))) |
27 | 24, 26 | mpbird 256 |
1
β’ (π β π β (toCaraSigaβπ)) |