Metamath Proof Explorer


Theorem cnfldcj

Description: The conjugation operation of the field of complex numbers. (Contributed by Mario Carneiro, 6-Oct-2015) (Revised by Thierry Arnoux, 17-Dec-2017) (Revised by Thierry Arnoux, 17-Dec-2017) Revise df-cnfld . (Revised by GG, 31-Mar-2025)

Ref Expression
Assertion cnfldcj โˆ— = ( *๐‘Ÿ โ€˜ โ„‚fld )

Proof

Step Hyp Ref Expression
1 cjf โŠข โˆ— : โ„‚ โŸถ โ„‚
2 cnex โŠข โ„‚ โˆˆ V
3 fex2 โŠข ( ( โˆ— : โ„‚ โŸถ โ„‚ โˆง โ„‚ โˆˆ V โˆง โ„‚ โˆˆ V ) โ†’ โˆ— โˆˆ V )
4 1 2 2 3 mp3an โŠข โˆ— โˆˆ V
5 cnfldstr โŠข โ„‚fld Struct โŸจ 1 , 1 3 โŸฉ
6 starvid โŠข *๐‘Ÿ = Slot ( *๐‘Ÿ โ€˜ ndx )
7 ssun2 โŠข { โŸจ ( *๐‘Ÿ โ€˜ ndx ) , โˆ— โŸฉ } โІ ( { โŸจ ( Base โ€˜ ndx ) , โ„‚ โŸฉ , โŸจ ( +g โ€˜ ndx ) , ( ๐‘ข โˆˆ โ„‚ , ๐‘ฃ โˆˆ โ„‚ โ†ฆ ( ๐‘ข + ๐‘ฃ ) ) โŸฉ , โŸจ ( .r โ€˜ ndx ) , ( ๐‘ข โˆˆ โ„‚ , ๐‘ฃ โˆˆ โ„‚ โ†ฆ ( ๐‘ข ยท ๐‘ฃ ) ) โŸฉ } โˆช { โŸจ ( *๐‘Ÿ โ€˜ ndx ) , โˆ— โŸฉ } )
8 ssun1 โŠข ( { โŸจ ( Base โ€˜ ndx ) , โ„‚ โŸฉ , โŸจ ( +g โ€˜ ndx ) , ( ๐‘ข โˆˆ โ„‚ , ๐‘ฃ โˆˆ โ„‚ โ†ฆ ( ๐‘ข + ๐‘ฃ ) ) โŸฉ , โŸจ ( .r โ€˜ ndx ) , ( ๐‘ข โˆˆ โ„‚ , ๐‘ฃ โˆˆ โ„‚ โ†ฆ ( ๐‘ข ยท ๐‘ฃ ) ) โŸฉ } โˆช { โŸจ ( *๐‘Ÿ โ€˜ ndx ) , โˆ— โŸฉ } ) โІ ( ( { โŸจ ( Base โ€˜ ndx ) , โ„‚ โŸฉ , โŸจ ( +g โ€˜ ndx ) , ( ๐‘ข โˆˆ โ„‚ , ๐‘ฃ โˆˆ โ„‚ โ†ฆ ( ๐‘ข + ๐‘ฃ ) ) โŸฉ , โŸจ ( .r โ€˜ ndx ) , ( ๐‘ข โˆˆ โ„‚ , ๐‘ฃ โˆˆ โ„‚ โ†ฆ ( ๐‘ข ยท ๐‘ฃ ) ) โŸฉ } โˆช { โŸจ ( *๐‘Ÿ โ€˜ ndx ) , โˆ— โŸฉ } ) โˆช ( { โŸจ ( TopSet โ€˜ ndx ) , ( MetOpen โ€˜ ( abs โˆ˜ โˆ’ ) ) โŸฉ , โŸจ ( le โ€˜ ndx ) , โ‰ค โŸฉ , โŸจ ( dist โ€˜ ndx ) , ( abs โˆ˜ โˆ’ ) โŸฉ } โˆช { โŸจ ( UnifSet โ€˜ ndx ) , ( metUnif โ€˜ ( abs โˆ˜ โˆ’ ) ) โŸฉ } ) )
9 df-cnfld โŠข โ„‚fld = ( ( { โŸจ ( Base โ€˜ ndx ) , โ„‚ โŸฉ , โŸจ ( +g โ€˜ ndx ) , ( ๐‘ข โˆˆ โ„‚ , ๐‘ฃ โˆˆ โ„‚ โ†ฆ ( ๐‘ข + ๐‘ฃ ) ) โŸฉ , โŸจ ( .r โ€˜ ndx ) , ( ๐‘ข โˆˆ โ„‚ , ๐‘ฃ โˆˆ โ„‚ โ†ฆ ( ๐‘ข ยท ๐‘ฃ ) ) โŸฉ } โˆช { โŸจ ( *๐‘Ÿ โ€˜ ndx ) , โˆ— โŸฉ } ) โˆช ( { โŸจ ( TopSet โ€˜ ndx ) , ( MetOpen โ€˜ ( abs โˆ˜ โˆ’ ) ) โŸฉ , โŸจ ( le โ€˜ ndx ) , โ‰ค โŸฉ , โŸจ ( dist โ€˜ ndx ) , ( abs โˆ˜ โˆ’ ) โŸฉ } โˆช { โŸจ ( UnifSet โ€˜ ndx ) , ( metUnif โ€˜ ( abs โˆ˜ โˆ’ ) ) โŸฉ } ) )
10 8 9 sseqtrri โŠข ( { โŸจ ( Base โ€˜ ndx ) , โ„‚ โŸฉ , โŸจ ( +g โ€˜ ndx ) , ( ๐‘ข โˆˆ โ„‚ , ๐‘ฃ โˆˆ โ„‚ โ†ฆ ( ๐‘ข + ๐‘ฃ ) ) โŸฉ , โŸจ ( .r โ€˜ ndx ) , ( ๐‘ข โˆˆ โ„‚ , ๐‘ฃ โˆˆ โ„‚ โ†ฆ ( ๐‘ข ยท ๐‘ฃ ) ) โŸฉ } โˆช { โŸจ ( *๐‘Ÿ โ€˜ ndx ) , โˆ— โŸฉ } ) โІ โ„‚fld
11 7 10 sstri โŠข { โŸจ ( *๐‘Ÿ โ€˜ ndx ) , โˆ— โŸฉ } โІ โ„‚fld
12 5 6 11 strfv โŠข ( โˆ— โˆˆ V โ†’ โˆ— = ( *๐‘Ÿ โ€˜ โ„‚fld ) )
13 4 12 ax-mp โŠข โˆ— = ( *๐‘Ÿ โ€˜ โ„‚fld )