Metamath Proof Explorer


Theorem xdivval

Description: Value of division: the (unique) element x such that ( B x. x ) = A . This is meaningful only when B is nonzero. (Contributed by Thierry Arnoux, 17-Dec-2016)

Ref Expression
Assertion xdivval ( ( ๐ด โˆˆ โ„* โˆง ๐ต โˆˆ โ„ โˆง ๐ต โ‰  0 ) โ†’ ( ๐ด /๐‘’ ๐ต ) = ( โ„ฉ ๐‘ฅ โˆˆ โ„* ( ๐ต ยทe ๐‘ฅ ) = ๐ด ) )

Proof

Step Hyp Ref Expression
1 eldifsn โŠข ( ๐ต โˆˆ ( โ„ โˆ– { 0 } ) โ†” ( ๐ต โˆˆ โ„ โˆง ๐ต โ‰  0 ) )
2 simpl โŠข ( ( ๐‘ฆ = ๐ด โˆง ๐‘ฅ โˆˆ โ„* ) โ†’ ๐‘ฆ = ๐ด )
3 2 eqeq2d โŠข ( ( ๐‘ฆ = ๐ด โˆง ๐‘ฅ โˆˆ โ„* ) โ†’ ( ( ๐‘ง ยทe ๐‘ฅ ) = ๐‘ฆ โ†” ( ๐‘ง ยทe ๐‘ฅ ) = ๐ด ) )
4 3 riotabidva โŠข ( ๐‘ฆ = ๐ด โ†’ ( โ„ฉ ๐‘ฅ โˆˆ โ„* ( ๐‘ง ยทe ๐‘ฅ ) = ๐‘ฆ ) = ( โ„ฉ ๐‘ฅ โˆˆ โ„* ( ๐‘ง ยทe ๐‘ฅ ) = ๐ด ) )
5 simpl โŠข ( ( ๐‘ง = ๐ต โˆง ๐‘ฅ โˆˆ โ„* ) โ†’ ๐‘ง = ๐ต )
6 5 oveq1d โŠข ( ( ๐‘ง = ๐ต โˆง ๐‘ฅ โˆˆ โ„* ) โ†’ ( ๐‘ง ยทe ๐‘ฅ ) = ( ๐ต ยทe ๐‘ฅ ) )
7 6 eqeq1d โŠข ( ( ๐‘ง = ๐ต โˆง ๐‘ฅ โˆˆ โ„* ) โ†’ ( ( ๐‘ง ยทe ๐‘ฅ ) = ๐ด โ†” ( ๐ต ยทe ๐‘ฅ ) = ๐ด ) )
8 7 riotabidva โŠข ( ๐‘ง = ๐ต โ†’ ( โ„ฉ ๐‘ฅ โˆˆ โ„* ( ๐‘ง ยทe ๐‘ฅ ) = ๐ด ) = ( โ„ฉ ๐‘ฅ โˆˆ โ„* ( ๐ต ยทe ๐‘ฅ ) = ๐ด ) )
9 df-xdiv โŠข /๐‘’ = ( ๐‘ฆ โˆˆ โ„* , ๐‘ง โˆˆ ( โ„ โˆ– { 0 } ) โ†ฆ ( โ„ฉ ๐‘ฅ โˆˆ โ„* ( ๐‘ง ยทe ๐‘ฅ ) = ๐‘ฆ ) )
10 riotaex โŠข ( โ„ฉ ๐‘ฅ โˆˆ โ„* ( ๐ต ยทe ๐‘ฅ ) = ๐ด ) โˆˆ V
11 4 8 9 10 ovmpo โŠข ( ( ๐ด โˆˆ โ„* โˆง ๐ต โˆˆ ( โ„ โˆ– { 0 } ) ) โ†’ ( ๐ด /๐‘’ ๐ต ) = ( โ„ฉ ๐‘ฅ โˆˆ โ„* ( ๐ต ยทe ๐‘ฅ ) = ๐ด ) )
12 1 11 sylan2br โŠข ( ( ๐ด โˆˆ โ„* โˆง ( ๐ต โˆˆ โ„ โˆง ๐ต โ‰  0 ) ) โ†’ ( ๐ด /๐‘’ ๐ต ) = ( โ„ฉ ๐‘ฅ โˆˆ โ„* ( ๐ต ยทe ๐‘ฅ ) = ๐ด ) )
13 12 3impb โŠข ( ( ๐ด โˆˆ โ„* โˆง ๐ต โˆˆ โ„ โˆง ๐ต โ‰  0 ) โ†’ ( ๐ด /๐‘’ ๐ต ) = ( โ„ฉ ๐‘ฅ โˆˆ โ„* ( ๐ต ยทe ๐‘ฅ ) = ๐ด ) )