Metamath Proof Explorer


Theorem iccdili

Description: Membership in a dilated interval. (Contributed by Jeff Madsen, 2-Sep-2009)

Ref Expression
Hypotheses iccdili.1 โŠข ๐ด โˆˆ โ„
iccdili.2 โŠข ๐ต โˆˆ โ„
iccdili.3 โŠข ๐‘… โˆˆ โ„+
iccdili.4 โŠข ( ๐ด ยท ๐‘… ) = ๐ถ
iccdili.5 โŠข ( ๐ต ยท ๐‘… ) = ๐ท
Assertion iccdili ( ๐‘‹ โˆˆ ( ๐ด [,] ๐ต ) โ†’ ( ๐‘‹ ยท ๐‘… ) โˆˆ ( ๐ถ [,] ๐ท ) )

Proof

Step Hyp Ref Expression
1 iccdili.1 โŠข ๐ด โˆˆ โ„
2 iccdili.2 โŠข ๐ต โˆˆ โ„
3 iccdili.3 โŠข ๐‘… โˆˆ โ„+
4 iccdili.4 โŠข ( ๐ด ยท ๐‘… ) = ๐ถ
5 iccdili.5 โŠข ( ๐ต ยท ๐‘… ) = ๐ท
6 iccssre โŠข ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โ†’ ( ๐ด [,] ๐ต ) โІ โ„ )
7 1 2 6 mp2an โŠข ( ๐ด [,] ๐ต ) โІ โ„
8 7 sseli โŠข ( ๐‘‹ โˆˆ ( ๐ด [,] ๐ต ) โ†’ ๐‘‹ โˆˆ โ„ )
9 4 5 iccdil โŠข ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โˆง ( ๐‘‹ โˆˆ โ„ โˆง ๐‘… โˆˆ โ„+ ) ) โ†’ ( ๐‘‹ โˆˆ ( ๐ด [,] ๐ต ) โ†” ( ๐‘‹ ยท ๐‘… ) โˆˆ ( ๐ถ [,] ๐ท ) ) )
10 1 2 9 mpanl12 โŠข ( ( ๐‘‹ โˆˆ โ„ โˆง ๐‘… โˆˆ โ„+ ) โ†’ ( ๐‘‹ โˆˆ ( ๐ด [,] ๐ต ) โ†” ( ๐‘‹ ยท ๐‘… ) โˆˆ ( ๐ถ [,] ๐ท ) ) )
11 3 10 mpan2 โŠข ( ๐‘‹ โˆˆ โ„ โ†’ ( ๐‘‹ โˆˆ ( ๐ด [,] ๐ต ) โ†” ( ๐‘‹ ยท ๐‘… ) โˆˆ ( ๐ถ [,] ๐ท ) ) )
12 11 biimpd โŠข ( ๐‘‹ โˆˆ โ„ โ†’ ( ๐‘‹ โˆˆ ( ๐ด [,] ๐ต ) โ†’ ( ๐‘‹ ยท ๐‘… ) โˆˆ ( ๐ถ [,] ๐ท ) ) )
13 8 12 mpcom โŠข ( ๐‘‹ โˆˆ ( ๐ด [,] ๐ต ) โ†’ ( ๐‘‹ ยท ๐‘… ) โˆˆ ( ๐ถ [,] ๐ท ) )