Metamath Proof Explorer


Theorem diveq1

Description: Equality in terms of unit ratio. (Contributed by Stefan O'Rear, 27-Aug-2015)

Ref Expression
Assertion diveq1 ( ( ๐ด โˆˆ โ„‚ โˆง ๐ต โˆˆ โ„‚ โˆง ๐ต โ‰  0 ) โ†’ ( ( ๐ด / ๐ต ) = 1 โ†” ๐ด = ๐ต ) )

Proof

Step Hyp Ref Expression
1 ax-1cn โŠข 1 โˆˆ โ„‚
2 divmul2 โŠข ( ( ๐ด โˆˆ โ„‚ โˆง 1 โˆˆ โ„‚ โˆง ( ๐ต โˆˆ โ„‚ โˆง ๐ต โ‰  0 ) ) โ†’ ( ( ๐ด / ๐ต ) = 1 โ†” ๐ด = ( ๐ต ยท 1 ) ) )
3 1 2 mp3an2 โŠข ( ( ๐ด โˆˆ โ„‚ โˆง ( ๐ต โˆˆ โ„‚ โˆง ๐ต โ‰  0 ) ) โ†’ ( ( ๐ด / ๐ต ) = 1 โ†” ๐ด = ( ๐ต ยท 1 ) ) )
4 3 3impb โŠข ( ( ๐ด โˆˆ โ„‚ โˆง ๐ต โˆˆ โ„‚ โˆง ๐ต โ‰  0 ) โ†’ ( ( ๐ด / ๐ต ) = 1 โ†” ๐ด = ( ๐ต ยท 1 ) ) )
5 simp2 โŠข ( ( ๐ด โˆˆ โ„‚ โˆง ๐ต โˆˆ โ„‚ โˆง ๐ต โ‰  0 ) โ†’ ๐ต โˆˆ โ„‚ )
6 5 mulridd โŠข ( ( ๐ด โˆˆ โ„‚ โˆง ๐ต โˆˆ โ„‚ โˆง ๐ต โ‰  0 ) โ†’ ( ๐ต ยท 1 ) = ๐ต )
7 6 eqeq2d โŠข ( ( ๐ด โˆˆ โ„‚ โˆง ๐ต โˆˆ โ„‚ โˆง ๐ต โ‰  0 ) โ†’ ( ๐ด = ( ๐ต ยท 1 ) โ†” ๐ด = ๐ต ) )
8 4 7 bitrd โŠข ( ( ๐ด โˆˆ โ„‚ โˆง ๐ต โˆˆ โ„‚ โˆง ๐ต โ‰  0 ) โ†’ ( ( ๐ด / ๐ต ) = 1 โ†” ๐ด = ๐ต ) )