Step | Hyp | Ref
| Expression |
1 | | df-ov 7409 |
. 2
β’ (πRayπ΄) = (Rayββ¨π, π΄β©) |
2 | | eqid 2733 |
. . . . 5
β’ {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©} = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©} |
3 | | fveq2 6889 |
. . . . . . . . 9
β’ (π = π β (πΌβπ) = (πΌβπ)) |
4 | 3 | eleq2d 2820 |
. . . . . . . 8
β’ (π = π β (π β (πΌβπ) β π β (πΌβπ))) |
5 | 3 | eleq2d 2820 |
. . . . . . . 8
β’ (π = π β (π΄ β (πΌβπ) β π΄ β (πΌβπ))) |
6 | 4, 5 | 3anbi12d 1438 |
. . . . . . 7
β’ (π = π β ((π β (πΌβπ) β§ π΄ β (πΌβπ) β§ π β π΄) β (π β (πΌβπ) β§ π΄ β (πΌβπ) β§ π β π΄))) |
7 | | rabeq 3447 |
. . . . . . . . 9
β’
((πΌβπ)
= (πΌβπ) β
{π₯ β
(πΌβπ) β£
πOutsideOfβ¨π΄, π₯β©} = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©}) |
8 | 3, 7 | syl 17 |
. . . . . . . 8
β’ (π = π β {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©} = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©}) |
9 | 8 | eqeq2d 2744 |
. . . . . . 7
β’ (π = π β ({π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©} = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©} β {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©} = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©})) |
10 | 6, 9 | anbi12d 632 |
. . . . . 6
β’ (π = π β (((π β (πΌβπ) β§ π΄ β (πΌβπ) β§ π β π΄) β§ {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©} = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©}) β ((π β (πΌβπ) β§ π΄ β (πΌβπ) β§ π β π΄) β§ {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©} = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©}))) |
11 | 10 | rspcev 3613 |
. . . . 5
β’ ((π β β β§ ((π β (πΌβπ) β§ π΄ β (πΌβπ) β§ π β π΄) β§ {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©} = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©})) β βπ β β ((π β (πΌβπ) β§ π΄ β (πΌβπ) β§ π β π΄) β§ {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©} = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©})) |
12 | 2, 11 | mpanr2 703 |
. . . 4
β’ ((π β β β§ (π β (πΌβπ) β§ π΄ β (πΌβπ) β§ π β π΄)) β βπ β β ((π β (πΌβπ) β§ π΄ β (πΌβπ) β§ π β π΄) β§ {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©} = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©})) |
13 | | simpr1 1195 |
. . . . 5
β’ ((π β β β§ (π β (πΌβπ) β§ π΄ β (πΌβπ) β§ π β π΄)) β π β (πΌβπ)) |
14 | | simpr2 1196 |
. . . . 5
β’ ((π β β β§ (π β (πΌβπ) β§ π΄ β (πΌβπ) β§ π β π΄)) β π΄ β (πΌβπ)) |
15 | | fvex 6902 |
. . . . . . 7
β’
(πΌβπ)
β V |
16 | 15 | rabex 5332 |
. . . . . 6
β’ {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©} β V |
17 | | eleq1 2822 |
. . . . . . . . . 10
β’ (π = π β (π β (πΌβπ) β π β (πΌβπ))) |
18 | | neeq1 3004 |
. . . . . . . . . 10
β’ (π = π β (π β π β π β π)) |
19 | 17, 18 | 3anbi13d 1439 |
. . . . . . . . 9
β’ (π = π β ((π β (πΌβπ) β§ π β (πΌβπ) β§ π β π) β (π β (πΌβπ) β§ π β (πΌβπ) β§ π β π))) |
20 | | breq1 5151 |
. . . . . . . . . . 11
β’ (π = π β (πOutsideOfβ¨π, π₯β© β πOutsideOfβ¨π, π₯β©)) |
21 | 20 | rabbidv 3441 |
. . . . . . . . . 10
β’ (π = π β {π₯ β (πΌβπ) β£ πOutsideOfβ¨π, π₯β©} = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π, π₯β©}) |
22 | 21 | eqeq2d 2744 |
. . . . . . . . 9
β’ (π = π β (π = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π, π₯β©} β π = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π, π₯β©})) |
23 | 19, 22 | anbi12d 632 |
. . . . . . . 8
β’ (π = π β (((π β (πΌβπ) β§ π β (πΌβπ) β§ π β π) β§ π = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π, π₯β©}) β ((π β (πΌβπ) β§ π β (πΌβπ) β§ π β π) β§ π = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π, π₯β©}))) |
24 | 23 | rexbidv 3179 |
. . . . . . 7
β’ (π = π β (βπ β β ((π β (πΌβπ) β§ π β (πΌβπ) β§ π β π) β§ π = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π, π₯β©}) β βπ β β ((π β (πΌβπ) β§ π β (πΌβπ) β§ π β π) β§ π = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π, π₯β©}))) |
25 | | eleq1 2822 |
. . . . . . . . . 10
β’ (π = π΄ β (π β (πΌβπ) β π΄ β (πΌβπ))) |
26 | | neeq2 3005 |
. . . . . . . . . 10
β’ (π = π΄ β (π β π β π β π΄)) |
27 | 25, 26 | 3anbi23d 1440 |
. . . . . . . . 9
β’ (π = π΄ β ((π β (πΌβπ) β§ π β (πΌβπ) β§ π β π) β (π β (πΌβπ) β§ π΄ β (πΌβπ) β§ π β π΄))) |
28 | | opeq1 4873 |
. . . . . . . . . . . 12
β’ (π = π΄ β β¨π, π₯β© = β¨π΄, π₯β©) |
29 | 28 | breq2d 5160 |
. . . . . . . . . . 11
β’ (π = π΄ β (πOutsideOfβ¨π, π₯β© β πOutsideOfβ¨π΄, π₯β©)) |
30 | 29 | rabbidv 3441 |
. . . . . . . . . 10
β’ (π = π΄ β {π₯ β (πΌβπ) β£ πOutsideOfβ¨π, π₯β©} = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©}) |
31 | 30 | eqeq2d 2744 |
. . . . . . . . 9
β’ (π = π΄ β (π = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π, π₯β©} β π = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©})) |
32 | 27, 31 | anbi12d 632 |
. . . . . . . 8
β’ (π = π΄ β (((π β (πΌβπ) β§ π β (πΌβπ) β§ π β π) β§ π = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π, π₯β©}) β ((π β (πΌβπ) β§ π΄ β (πΌβπ) β§ π β π΄) β§ π = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©}))) |
33 | 32 | rexbidv 3179 |
. . . . . . 7
β’ (π = π΄ β (βπ β β ((π β (πΌβπ) β§ π β (πΌβπ) β§ π β π) β§ π = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π, π₯β©}) β βπ β β ((π β (πΌβπ) β§ π΄ β (πΌβπ) β§ π β π΄) β§ π = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©}))) |
34 | | eqeq1 2737 |
. . . . . . . . 9
β’ (π = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©} β (π = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©} β {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©} = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©})) |
35 | 34 | anbi2d 630 |
. . . . . . . 8
β’ (π = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©} β (((π β (πΌβπ) β§ π΄ β (πΌβπ) β§ π β π΄) β§ π = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©}) β ((π β (πΌβπ) β§ π΄ β (πΌβπ) β§ π β π΄) β§ {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©} = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©}))) |
36 | 35 | rexbidv 3179 |
. . . . . . 7
β’ (π = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©} β (βπ β β ((π β (πΌβπ) β§ π΄ β (πΌβπ) β§ π β π΄) β§ π = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©}) β βπ β β ((π β (πΌβπ) β§ π΄ β (πΌβπ) β§ π β π΄) β§ {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©} = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©}))) |
37 | 24, 33, 36 | eloprabg 7515 |
. . . . . 6
β’ ((π β (πΌβπ) β§ π΄ β (πΌβπ) β§ {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©} β V) β (β¨β¨π, π΄β©, {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©}β© β {β¨β¨π, πβ©, πβ© β£ βπ β β ((π β (πΌβπ) β§ π β (πΌβπ) β§ π β π) β§ π = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π, π₯β©})} β βπ β β ((π β (πΌβπ) β§ π΄ β (πΌβπ) β§ π β π΄) β§ {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©} = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©}))) |
38 | 16, 37 | mp3an3 1451 |
. . . . 5
β’ ((π β (πΌβπ) β§ π΄ β (πΌβπ)) β (β¨β¨π, π΄β©, {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©}β© β {β¨β¨π, πβ©, πβ© β£ βπ β β ((π β (πΌβπ) β§ π β (πΌβπ) β§ π β π) β§ π = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π, π₯β©})} β βπ β β ((π β (πΌβπ) β§ π΄ β (πΌβπ) β§ π β π΄) β§ {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©} = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©}))) |
39 | 13, 14, 38 | syl2anc 585 |
. . . 4
β’ ((π β β β§ (π β (πΌβπ) β§ π΄ β (πΌβπ) β§ π β π΄)) β (β¨β¨π, π΄β©, {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©}β© β {β¨β¨π, πβ©, πβ© β£ βπ β β ((π β (πΌβπ) β§ π β (πΌβπ) β§ π β π) β§ π = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π, π₯β©})} β βπ β β ((π β (πΌβπ) β§ π΄ β (πΌβπ) β§ π β π΄) β§ {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©} = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©}))) |
40 | 12, 39 | mpbird 257 |
. . 3
β’ ((π β β β§ (π β (πΌβπ) β§ π΄ β (πΌβπ) β§ π β π΄)) β β¨β¨π, π΄β©, {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©}β© β {β¨β¨π, πβ©, πβ© β£ βπ β β ((π β (πΌβπ) β§ π β (πΌβπ) β§ π β π) β§ π = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π, π₯β©})}) |
41 | | df-br 5149 |
. . . . 5
β’
(β¨π, π΄β©Ray{π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©} β β¨β¨π, π΄β©, {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©}β© β Ray) |
42 | | df-ray 35099 |
. . . . . 6
β’ Ray =
{β¨β¨π, πβ©, πβ© β£ βπ β β ((π β (πΌβπ) β§ π β (πΌβπ) β§ π β π) β§ π = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π, π₯β©})} |
43 | 42 | eleq2i 2826 |
. . . . 5
β’
(β¨β¨π,
π΄β©, {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©}β© β Ray β
β¨β¨π, π΄β©, {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©}β© β {β¨β¨π, πβ©, πβ© β£ βπ β β ((π β (πΌβπ) β§ π β (πΌβπ) β§ π β π) β§ π = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π, π₯β©})}) |
44 | 41, 43 | bitri 275 |
. . . 4
β’
(β¨π, π΄β©Ray{π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©} β β¨β¨π, π΄β©, {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©}β© β {β¨β¨π, πβ©, πβ© β£ βπ β β ((π β (πΌβπ) β§ π β (πΌβπ) β§ π β π) β§ π = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π, π₯β©})}) |
45 | | funray 35101 |
. . . . 5
β’ Fun
Ray |
46 | | funbrfv 6940 |
. . . . 5
β’ (Fun Ray
β (β¨π, π΄β©Ray{π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©} β (Rayββ¨π, π΄β©) = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©})) |
47 | 45, 46 | ax-mp 5 |
. . . 4
β’
(β¨π, π΄β©Ray{π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©} β (Rayββ¨π, π΄β©) = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©}) |
48 | 44, 47 | sylbir 234 |
. . 3
β’
(β¨β¨π,
π΄β©, {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©}β© β {β¨β¨π, πβ©, πβ© β£ βπ β β ((π β (πΌβπ) β§ π β (πΌβπ) β§ π β π) β§ π = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π, π₯β©})} β (Rayββ¨π, π΄β©) = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©}) |
49 | 40, 48 | syl 17 |
. 2
β’ ((π β β β§ (π β (πΌβπ) β§ π΄ β (πΌβπ) β§ π β π΄)) β (Rayββ¨π, π΄β©) = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©}) |
50 | 1, 49 | eqtrid 2785 |
1
β’ ((π β β β§ (π β (πΌβπ) β§ π΄ β (πΌβπ) β§ π β π΄)) β (πRayπ΄) = {π₯ β (πΌβπ) β£ πOutsideOfβ¨π΄, π₯β©}) |