Metamath Proof Explorer


Theorem lemul2

Description: Multiplication of both sides of 'less than or equal to' by a positive number. (Contributed by NM, 16-Mar-2005)

Ref Expression
Assertion lemul2 ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ โˆง ( ๐ถ โˆˆ โ„ โˆง 0 < ๐ถ ) ) โ†’ ( ๐ด โ‰ค ๐ต โ†” ( ๐ถ ยท ๐ด ) โ‰ค ( ๐ถ ยท ๐ต ) ) )

Proof

Step Hyp Ref Expression
1 lemul1 โŠข ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ โˆง ( ๐ถ โˆˆ โ„ โˆง 0 < ๐ถ ) ) โ†’ ( ๐ด โ‰ค ๐ต โ†” ( ๐ด ยท ๐ถ ) โ‰ค ( ๐ต ยท ๐ถ ) ) )
2 recn โŠข ( ๐ด โˆˆ โ„ โ†’ ๐ด โˆˆ โ„‚ )
3 recn โŠข ( ๐ถ โˆˆ โ„ โ†’ ๐ถ โˆˆ โ„‚ )
4 mulcom โŠข ( ( ๐ด โˆˆ โ„‚ โˆง ๐ถ โˆˆ โ„‚ ) โ†’ ( ๐ด ยท ๐ถ ) = ( ๐ถ ยท ๐ด ) )
5 2 3 4 syl2an โŠข ( ( ๐ด โˆˆ โ„ โˆง ๐ถ โˆˆ โ„ ) โ†’ ( ๐ด ยท ๐ถ ) = ( ๐ถ ยท ๐ด ) )
6 5 3adant2 โŠข ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ โˆง ๐ถ โˆˆ โ„ ) โ†’ ( ๐ด ยท ๐ถ ) = ( ๐ถ ยท ๐ด ) )
7 recn โŠข ( ๐ต โˆˆ โ„ โ†’ ๐ต โˆˆ โ„‚ )
8 mulcom โŠข ( ( ๐ต โˆˆ โ„‚ โˆง ๐ถ โˆˆ โ„‚ ) โ†’ ( ๐ต ยท ๐ถ ) = ( ๐ถ ยท ๐ต ) )
9 7 3 8 syl2an โŠข ( ( ๐ต โˆˆ โ„ โˆง ๐ถ โˆˆ โ„ ) โ†’ ( ๐ต ยท ๐ถ ) = ( ๐ถ ยท ๐ต ) )
10 9 3adant1 โŠข ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ โˆง ๐ถ โˆˆ โ„ ) โ†’ ( ๐ต ยท ๐ถ ) = ( ๐ถ ยท ๐ต ) )
11 6 10 breq12d โŠข ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ โˆง ๐ถ โˆˆ โ„ ) โ†’ ( ( ๐ด ยท ๐ถ ) โ‰ค ( ๐ต ยท ๐ถ ) โ†” ( ๐ถ ยท ๐ด ) โ‰ค ( ๐ถ ยท ๐ต ) ) )
12 11 3adant3r โŠข ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ โˆง ( ๐ถ โˆˆ โ„ โˆง 0 < ๐ถ ) ) โ†’ ( ( ๐ด ยท ๐ถ ) โ‰ค ( ๐ต ยท ๐ถ ) โ†” ( ๐ถ ยท ๐ด ) โ‰ค ( ๐ถ ยท ๐ต ) ) )
13 1 12 bitrd โŠข ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ โˆง ( ๐ถ โˆˆ โ„ โˆง 0 < ๐ถ ) ) โ†’ ( ๐ด โ‰ค ๐ต โ†” ( ๐ถ ยท ๐ด ) โ‰ค ( ๐ถ ยท ๐ต ) ) )