Metamath Proof Explorer


Theorem quotcl2

Description: Closure of the quotient function. (Contributed by Mario Carneiro, 26-Jul-2014)

Ref Expression
Assertion quotcl2 ( ( ๐น โˆˆ ( Poly โ€˜ ๐‘† ) โˆง ๐บ โˆˆ ( Poly โ€˜ ๐‘† ) โˆง ๐บ โ‰  0๐‘ ) โ†’ ( ๐น quot ๐บ ) โˆˆ ( Poly โ€˜ โ„‚ ) )

Proof

Step Hyp Ref Expression
1 addcl โŠข ( ( ๐‘ฅ โˆˆ โ„‚ โˆง ๐‘ฆ โˆˆ โ„‚ ) โ†’ ( ๐‘ฅ + ๐‘ฆ ) โˆˆ โ„‚ )
2 1 adantl โŠข ( ( ( ๐น โˆˆ ( Poly โ€˜ ๐‘† ) โˆง ๐บ โˆˆ ( Poly โ€˜ ๐‘† ) โˆง ๐บ โ‰  0๐‘ ) โˆง ( ๐‘ฅ โˆˆ โ„‚ โˆง ๐‘ฆ โˆˆ โ„‚ ) ) โ†’ ( ๐‘ฅ + ๐‘ฆ ) โˆˆ โ„‚ )
3 mulcl โŠข ( ( ๐‘ฅ โˆˆ โ„‚ โˆง ๐‘ฆ โˆˆ โ„‚ ) โ†’ ( ๐‘ฅ ยท ๐‘ฆ ) โˆˆ โ„‚ )
4 3 adantl โŠข ( ( ( ๐น โˆˆ ( Poly โ€˜ ๐‘† ) โˆง ๐บ โˆˆ ( Poly โ€˜ ๐‘† ) โˆง ๐บ โ‰  0๐‘ ) โˆง ( ๐‘ฅ โˆˆ โ„‚ โˆง ๐‘ฆ โˆˆ โ„‚ ) ) โ†’ ( ๐‘ฅ ยท ๐‘ฆ ) โˆˆ โ„‚ )
5 reccl โŠข ( ( ๐‘ฅ โˆˆ โ„‚ โˆง ๐‘ฅ โ‰  0 ) โ†’ ( 1 / ๐‘ฅ ) โˆˆ โ„‚ )
6 5 adantl โŠข ( ( ( ๐น โˆˆ ( Poly โ€˜ ๐‘† ) โˆง ๐บ โˆˆ ( Poly โ€˜ ๐‘† ) โˆง ๐บ โ‰  0๐‘ ) โˆง ( ๐‘ฅ โˆˆ โ„‚ โˆง ๐‘ฅ โ‰  0 ) ) โ†’ ( 1 / ๐‘ฅ ) โˆˆ โ„‚ )
7 neg1cn โŠข - 1 โˆˆ โ„‚
8 7 a1i โŠข ( ( ๐น โˆˆ ( Poly โ€˜ ๐‘† ) โˆง ๐บ โˆˆ ( Poly โ€˜ ๐‘† ) โˆง ๐บ โ‰  0๐‘ ) โ†’ - 1 โˆˆ โ„‚ )
9 plyssc โŠข ( Poly โ€˜ ๐‘† ) โІ ( Poly โ€˜ โ„‚ )
10 simp1 โŠข ( ( ๐น โˆˆ ( Poly โ€˜ ๐‘† ) โˆง ๐บ โˆˆ ( Poly โ€˜ ๐‘† ) โˆง ๐บ โ‰  0๐‘ ) โ†’ ๐น โˆˆ ( Poly โ€˜ ๐‘† ) )
11 9 10 sselid โŠข ( ( ๐น โˆˆ ( Poly โ€˜ ๐‘† ) โˆง ๐บ โˆˆ ( Poly โ€˜ ๐‘† ) โˆง ๐บ โ‰  0๐‘ ) โ†’ ๐น โˆˆ ( Poly โ€˜ โ„‚ ) )
12 simp2 โŠข ( ( ๐น โˆˆ ( Poly โ€˜ ๐‘† ) โˆง ๐บ โˆˆ ( Poly โ€˜ ๐‘† ) โˆง ๐บ โ‰  0๐‘ ) โ†’ ๐บ โˆˆ ( Poly โ€˜ ๐‘† ) )
13 9 12 sselid โŠข ( ( ๐น โˆˆ ( Poly โ€˜ ๐‘† ) โˆง ๐บ โˆˆ ( Poly โ€˜ ๐‘† ) โˆง ๐บ โ‰  0๐‘ ) โ†’ ๐บ โˆˆ ( Poly โ€˜ โ„‚ ) )
14 simp3 โŠข ( ( ๐น โˆˆ ( Poly โ€˜ ๐‘† ) โˆง ๐บ โˆˆ ( Poly โ€˜ ๐‘† ) โˆง ๐บ โ‰  0๐‘ ) โ†’ ๐บ โ‰  0๐‘ )
15 2 4 6 8 11 13 14 quotcl โŠข ( ( ๐น โˆˆ ( Poly โ€˜ ๐‘† ) โˆง ๐บ โˆˆ ( Poly โ€˜ ๐‘† ) โˆง ๐บ โ‰  0๐‘ ) โ†’ ( ๐น quot ๐บ ) โˆˆ ( Poly โ€˜ โ„‚ ) )