Metamath Proof Explorer


Theorem ledivmul

Description: 'Less than or equal to' relationship between division and multiplication. (Contributed by NM, 9-Dec-2005)

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

Proof

Step Hyp Ref Expression
1 remulcl โŠข ( ( ๐ถ โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โ†’ ( ๐ถ ยท ๐ต ) โˆˆ โ„ )
2 1 ancoms โŠข ( ( ๐ต โˆˆ โ„ โˆง ๐ถ โˆˆ โ„ ) โ†’ ( ๐ถ ยท ๐ต ) โˆˆ โ„ )
3 2 adantrr โŠข ( ( ๐ต โˆˆ โ„ โˆง ( ๐ถ โˆˆ โ„ โˆง 0 < ๐ถ ) ) โ†’ ( ๐ถ ยท ๐ต ) โˆˆ โ„ )
4 3 3adant1 โŠข ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ โˆง ( ๐ถ โˆˆ โ„ โˆง 0 < ๐ถ ) ) โ†’ ( ๐ถ ยท ๐ต ) โˆˆ โ„ )
5 lediv1 โŠข ( ( ๐ด โˆˆ โ„ โˆง ( ๐ถ ยท ๐ต ) โˆˆ โ„ โˆง ( ๐ถ โˆˆ โ„ โˆง 0 < ๐ถ ) ) โ†’ ( ๐ด โ‰ค ( ๐ถ ยท ๐ต ) โ†” ( ๐ด / ๐ถ ) โ‰ค ( ( ๐ถ ยท ๐ต ) / ๐ถ ) ) )
6 4 5 syld3an2 โŠข ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ โˆง ( ๐ถ โˆˆ โ„ โˆง 0 < ๐ถ ) ) โ†’ ( ๐ด โ‰ค ( ๐ถ ยท ๐ต ) โ†” ( ๐ด / ๐ถ ) โ‰ค ( ( ๐ถ ยท ๐ต ) / ๐ถ ) ) )
7 recn โŠข ( ๐ต โˆˆ โ„ โ†’ ๐ต โˆˆ โ„‚ )
8 7 adantr โŠข ( ( ๐ต โˆˆ โ„ โˆง ( ๐ถ โˆˆ โ„ โˆง 0 < ๐ถ ) ) โ†’ ๐ต โˆˆ โ„‚ )
9 recn โŠข ( ๐ถ โˆˆ โ„ โ†’ ๐ถ โˆˆ โ„‚ )
10 9 ad2antrl โŠข ( ( ๐ต โˆˆ โ„ โˆง ( ๐ถ โˆˆ โ„ โˆง 0 < ๐ถ ) ) โ†’ ๐ถ โˆˆ โ„‚ )
11 gt0ne0 โŠข ( ( ๐ถ โˆˆ โ„ โˆง 0 < ๐ถ ) โ†’ ๐ถ โ‰  0 )
12 11 adantl โŠข ( ( ๐ต โˆˆ โ„ โˆง ( ๐ถ โˆˆ โ„ โˆง 0 < ๐ถ ) ) โ†’ ๐ถ โ‰  0 )
13 8 10 12 divcan3d โŠข ( ( ๐ต โˆˆ โ„ โˆง ( ๐ถ โˆˆ โ„ โˆง 0 < ๐ถ ) ) โ†’ ( ( ๐ถ ยท ๐ต ) / ๐ถ ) = ๐ต )
14 13 3adant1 โŠข ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ โˆง ( ๐ถ โˆˆ โ„ โˆง 0 < ๐ถ ) ) โ†’ ( ( ๐ถ ยท ๐ต ) / ๐ถ ) = ๐ต )
15 14 breq2d โŠข ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ โˆง ( ๐ถ โˆˆ โ„ โˆง 0 < ๐ถ ) ) โ†’ ( ( ๐ด / ๐ถ ) โ‰ค ( ( ๐ถ ยท ๐ต ) / ๐ถ ) โ†” ( ๐ด / ๐ถ ) โ‰ค ๐ต ) )
16 6 15 bitr2d โŠข ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ โˆง ( ๐ถ โˆˆ โ„ โˆง 0 < ๐ถ ) ) โ†’ ( ( ๐ด / ๐ถ ) โ‰ค ๐ต โ†” ๐ด โ‰ค ( ๐ถ ยท ๐ต ) ) )