Metamath Proof Explorer


Theorem funpartfv

Description: The function value of the functional part is identical to the original functional value. (Contributed by Scott Fenton, 17-Apr-2014) (Revised by Mario Carneiro, 19-Apr-2014)

Ref Expression
Assertion funpartfv ⊒π–₯π—Žπ—‡π–―π–Ίπ—‹π—F⁑A=F⁑A

Proof

Step Hyp Ref Expression
1 df-funpart ⊒π–₯π—Žπ—‡π–―π–Ίπ—‹π—F=Fβ†Ύdom⁑𝖨𝗆𝖺𝗀𝖾Fβˆ˜π–²π—‚π—‡π—€π—…π–Ύπ—π—ˆπ—‡βˆ©VΓ—π–²π—‚π—‡π—€π—…π–Ύπ—π—ˆπ—‡π—Œ
2 1 fveq1i ⊒π–₯π—Žπ—‡π–―π–Ίπ—‹π—F⁑A=Fβ†Ύdom⁑𝖨𝗆𝖺𝗀𝖾Fβˆ˜π–²π—‚π—‡π—€π—…π–Ύπ—π—ˆπ—‡βˆ©VΓ—π–²π—‚π—‡π—€π—…π–Ύπ—π—ˆπ—‡π—Œβ‘A
3 fvres ⊒A∈dom⁑𝖨𝗆𝖺𝗀𝖾Fβˆ˜π–²π—‚π—‡π—€π—…π–Ύπ—π—ˆπ—‡βˆ©VΓ—π–²π—‚π—‡π—€π—…π–Ύπ—π—ˆπ—‡π—Œβ†’Fβ†Ύdom⁑𝖨𝗆𝖺𝗀𝖾Fβˆ˜π–²π—‚π—‡π—€π—…π–Ύπ—π—ˆπ—‡βˆ©VΓ—π–²π—‚π—‡π—€π—…π–Ύπ—π—ˆπ—‡π—Œβ‘A=F⁑A
4 nfvres ⊒¬A∈dom⁑𝖨𝗆𝖺𝗀𝖾Fβˆ˜π–²π—‚π—‡π—€π—…π–Ύπ—π—ˆπ—‡βˆ©VΓ—π–²π—‚π—‡π—€π—…π–Ύπ—π—ˆπ—‡π—Œβ†’Fβ†Ύdom⁑𝖨𝗆𝖺𝗀𝖾Fβˆ˜π–²π—‚π—‡π—€π—…π–Ύπ—π—ˆπ—‡βˆ©VΓ—π–²π—‚π—‡π—€π—…π–Ύπ—π—ˆπ—‡π—Œβ‘A=βˆ…
5 funpartlem ⊒A∈dom⁑𝖨𝗆𝖺𝗀𝖾Fβˆ˜π–²π—‚π—‡π—€π—…π–Ύπ—π—ˆπ—‡βˆ©VΓ—π–²π—‚π—‡π—€π—…π–Ύπ—π—ˆπ—‡π—Œβ†”βˆƒxFA=x
6 eusn βŠ’βˆƒ!xx∈FAβ†”βˆƒxFA=x
7 5 6 bitr4i ⊒A∈dom⁑𝖨𝗆𝖺𝗀𝖾Fβˆ˜π–²π—‚π—‡π—€π—…π–Ύπ—π—ˆπ—‡βˆ©VΓ—π–²π—‚π—‡π—€π—…π–Ύπ—π—ˆπ—‡π—Œβ†”βˆƒ!xx∈FA
8 elimasng ⊒A∈V∧x∈Vβ†’x∈FA↔Ax∈F
9 8 elvd ⊒A∈Vβ†’x∈FA↔Ax∈F
10 df-br ⊒AFx↔Ax∈F
11 9 10 bitr4di ⊒A∈Vβ†’x∈FA↔AFx
12 11 eubidv ⊒A∈Vβ†’βˆƒ!xx∈FAβ†”βˆƒ!xAFx
13 7 12 bitrid ⊒A∈Vβ†’A∈dom⁑𝖨𝗆𝖺𝗀𝖾Fβˆ˜π–²π—‚π—‡π—€π—…π–Ύπ—π—ˆπ—‡βˆ©VΓ—π–²π—‚π—‡π—€π—…π–Ύπ—π—ˆπ—‡π—Œβ†”βˆƒ!xAFx
14 13 notbid ⊒A∈Vβ†’Β¬A∈dom⁑𝖨𝗆𝖺𝗀𝖾Fβˆ˜π–²π—‚π—‡π—€π—…π–Ύπ—π—ˆπ—‡βˆ©VΓ—π–²π—‚π—‡π—€π—…π–Ύπ—π—ˆπ—‡π—Œβ†”Β¬βˆƒ!xAFx
15 tz6.12-2 βŠ’Β¬βˆƒ!xAFxβ†’F⁑A=βˆ…
16 14 15 syl6bi ⊒A∈Vβ†’Β¬A∈dom⁑𝖨𝗆𝖺𝗀𝖾Fβˆ˜π–²π—‚π—‡π—€π—…π–Ύπ—π—ˆπ—‡βˆ©VΓ—π–²π—‚π—‡π—€π—…π–Ύπ—π—ˆπ—‡π—Œβ†’F⁑A=βˆ…
17 fvprc ⊒¬A∈Vβ†’F⁑A=βˆ…
18 17 a1d ⊒¬A∈Vβ†’Β¬A∈dom⁑𝖨𝗆𝖺𝗀𝖾Fβˆ˜π–²π—‚π—‡π—€π—…π–Ύπ—π—ˆπ—‡βˆ©VΓ—π–²π—‚π—‡π—€π—…π–Ύπ—π—ˆπ—‡π—Œβ†’F⁑A=βˆ…
19 16 18 pm2.61i ⊒¬A∈dom⁑𝖨𝗆𝖺𝗀𝖾Fβˆ˜π–²π—‚π—‡π—€π—…π–Ύπ—π—ˆπ—‡βˆ©VΓ—π–²π—‚π—‡π—€π—…π–Ύπ—π—ˆπ—‡π—Œβ†’F⁑A=βˆ…
20 4 19 eqtr4d ⊒¬A∈dom⁑𝖨𝗆𝖺𝗀𝖾Fβˆ˜π–²π—‚π—‡π—€π—…π–Ύπ—π—ˆπ—‡βˆ©VΓ—π–²π—‚π—‡π—€π—…π–Ύπ—π—ˆπ—‡π—Œβ†’Fβ†Ύdom⁑𝖨𝗆𝖺𝗀𝖾Fβˆ˜π–²π—‚π—‡π—€π—…π–Ύπ—π—ˆπ—‡βˆ©VΓ—π–²π—‚π—‡π—€π—…π–Ύπ—π—ˆπ—‡π—Œβ‘A=F⁑A
21 3 20 pm2.61i ⊒Fβ†Ύdom⁑𝖨𝗆𝖺𝗀𝖾Fβˆ˜π–²π—‚π—‡π—€π—…π–Ύπ—π—ˆπ—‡βˆ©VΓ—π–²π—‚π—‡π—€π—…π–Ύπ—π—ˆπ—‡π—Œβ‘A=F⁑A
22 2 21 eqtri ⊒π–₯π—Žπ—‡π–―π–Ίπ—‹π—F⁑A=F⁑A