Metamath Proof Explorer


Theorem rediv

Description: Real part of a division. Related to remul2 . (Contributed by David A. Wheeler, 10-Jun-2015)

Ref Expression
Assertion rediv ( ( ๐ด โˆˆ โ„‚ โˆง ๐ต โˆˆ โ„ โˆง ๐ต โ‰  0 ) โ†’ ( โ„œ โ€˜ ( ๐ด / ๐ต ) ) = ( ( โ„œ โ€˜ ๐ด ) / ๐ต ) )

Proof

Step Hyp Ref Expression
1 ancom โŠข ( ( ( ๐ต โˆˆ โ„ โˆง ๐ต โ‰  0 ) โˆง ๐ด โˆˆ โ„‚ ) โ†” ( ๐ด โˆˆ โ„‚ โˆง ( ๐ต โˆˆ โ„ โˆง ๐ต โ‰  0 ) ) )
2 3anass โŠข ( ( ๐ด โˆˆ โ„‚ โˆง ๐ต โˆˆ โ„ โˆง ๐ต โ‰  0 ) โ†” ( ๐ด โˆˆ โ„‚ โˆง ( ๐ต โˆˆ โ„ โˆง ๐ต โ‰  0 ) ) )
3 1 2 bitr4i โŠข ( ( ( ๐ต โˆˆ โ„ โˆง ๐ต โ‰  0 ) โˆง ๐ด โˆˆ โ„‚ ) โ†” ( ๐ด โˆˆ โ„‚ โˆง ๐ต โˆˆ โ„ โˆง ๐ต โ‰  0 ) )
4 rereccl โŠข ( ( ๐ต โˆˆ โ„ โˆง ๐ต โ‰  0 ) โ†’ ( 1 / ๐ต ) โˆˆ โ„ )
5 4 anim1i โŠข ( ( ( ๐ต โˆˆ โ„ โˆง ๐ต โ‰  0 ) โˆง ๐ด โˆˆ โ„‚ ) โ†’ ( ( 1 / ๐ต ) โˆˆ โ„ โˆง ๐ด โˆˆ โ„‚ ) )
6 3 5 sylbir โŠข ( ( ๐ด โˆˆ โ„‚ โˆง ๐ต โˆˆ โ„ โˆง ๐ต โ‰  0 ) โ†’ ( ( 1 / ๐ต ) โˆˆ โ„ โˆง ๐ด โˆˆ โ„‚ ) )
7 remul2 โŠข ( ( ( 1 / ๐ต ) โˆˆ โ„ โˆง ๐ด โˆˆ โ„‚ ) โ†’ ( โ„œ โ€˜ ( ( 1 / ๐ต ) ยท ๐ด ) ) = ( ( 1 / ๐ต ) ยท ( โ„œ โ€˜ ๐ด ) ) )
8 6 7 syl โŠข ( ( ๐ด โˆˆ โ„‚ โˆง ๐ต โˆˆ โ„ โˆง ๐ต โ‰  0 ) โ†’ ( โ„œ โ€˜ ( ( 1 / ๐ต ) ยท ๐ด ) ) = ( ( 1 / ๐ต ) ยท ( โ„œ โ€˜ ๐ด ) ) )
9 recn โŠข ( ๐ต โˆˆ โ„ โ†’ ๐ต โˆˆ โ„‚ )
10 divrec2 โŠข ( ( ๐ด โˆˆ โ„‚ โˆง ๐ต โˆˆ โ„‚ โˆง ๐ต โ‰  0 ) โ†’ ( ๐ด / ๐ต ) = ( ( 1 / ๐ต ) ยท ๐ด ) )
11 10 fveq2d โŠข ( ( ๐ด โˆˆ โ„‚ โˆง ๐ต โˆˆ โ„‚ โˆง ๐ต โ‰  0 ) โ†’ ( โ„œ โ€˜ ( ๐ด / ๐ต ) ) = ( โ„œ โ€˜ ( ( 1 / ๐ต ) ยท ๐ด ) ) )
12 9 11 syl3an2 โŠข ( ( ๐ด โˆˆ โ„‚ โˆง ๐ต โˆˆ โ„ โˆง ๐ต โ‰  0 ) โ†’ ( โ„œ โ€˜ ( ๐ด / ๐ต ) ) = ( โ„œ โ€˜ ( ( 1 / ๐ต ) ยท ๐ด ) ) )
13 recl โŠข ( ๐ด โˆˆ โ„‚ โ†’ ( โ„œ โ€˜ ๐ด ) โˆˆ โ„ )
14 13 recnd โŠข ( ๐ด โˆˆ โ„‚ โ†’ ( โ„œ โ€˜ ๐ด ) โˆˆ โ„‚ )
15 14 3ad2ant1 โŠข ( ( ๐ด โˆˆ โ„‚ โˆง ๐ต โˆˆ โ„ โˆง ๐ต โ‰  0 ) โ†’ ( โ„œ โ€˜ ๐ด ) โˆˆ โ„‚ )
16 9 3ad2ant2 โŠข ( ( ๐ด โˆˆ โ„‚ โˆง ๐ต โˆˆ โ„ โˆง ๐ต โ‰  0 ) โ†’ ๐ต โˆˆ โ„‚ )
17 simp3 โŠข ( ( ๐ด โˆˆ โ„‚ โˆง ๐ต โˆˆ โ„ โˆง ๐ต โ‰  0 ) โ†’ ๐ต โ‰  0 )
18 15 16 17 divrec2d โŠข ( ( ๐ด โˆˆ โ„‚ โˆง ๐ต โˆˆ โ„ โˆง ๐ต โ‰  0 ) โ†’ ( ( โ„œ โ€˜ ๐ด ) / ๐ต ) = ( ( 1 / ๐ต ) ยท ( โ„œ โ€˜ ๐ด ) ) )
19 8 12 18 3eqtr4d โŠข ( ( ๐ด โˆˆ โ„‚ โˆง ๐ต โˆˆ โ„ โˆง ๐ต โ‰  0 ) โ†’ ( โ„œ โ€˜ ( ๐ด / ๐ต ) ) = ( ( โ„œ โ€˜ ๐ด ) / ๐ต ) )