Metamath Proof Explorer


Theorem 0dgr

Description: A constant function has degree 0. (Contributed by Mario Carneiro, 24-Jul-2014)

Ref Expression
Assertion 0dgr ( ๐ด โˆˆ โ„‚ โ†’ ( deg โ€˜ ( โ„‚ ร— { ๐ด } ) ) = 0 )

Proof

Step Hyp Ref Expression
1 ssid โŠข โ„‚ โŠ† โ„‚
2 plyconst โŠข ( ( โ„‚ โŠ† โ„‚ โˆง ๐ด โˆˆ โ„‚ ) โ†’ ( โ„‚ ร— { ๐ด } ) โˆˆ ( Poly โ€˜ โ„‚ ) )
3 1 2 mpan โŠข ( ๐ด โˆˆ โ„‚ โ†’ ( โ„‚ ร— { ๐ด } ) โˆˆ ( Poly โ€˜ โ„‚ ) )
4 0nn0 โŠข 0 โˆˆ โ„•0
5 4 a1i โŠข ( ๐ด โˆˆ โ„‚ โ†’ 0 โˆˆ โ„•0 )
6 simpl โŠข ( ( ๐ด โˆˆ โ„‚ โˆง ๐‘˜ โˆˆ ( 0 ... 0 ) ) โ†’ ๐ด โˆˆ โ„‚ )
7 fconstmpt โŠข ( โ„‚ ร— { ๐ด } ) = ( ๐‘ง โˆˆ โ„‚ โ†ฆ ๐ด )
8 0z โŠข 0 โˆˆ โ„ค
9 exp0 โŠข ( ๐‘ง โˆˆ โ„‚ โ†’ ( ๐‘ง โ†‘ 0 ) = 1 )
10 9 oveq2d โŠข ( ๐‘ง โˆˆ โ„‚ โ†’ ( ๐ด ยท ( ๐‘ง โ†‘ 0 ) ) = ( ๐ด ยท 1 ) )
11 mulrid โŠข ( ๐ด โˆˆ โ„‚ โ†’ ( ๐ด ยท 1 ) = ๐ด )
12 10 11 sylan9eqr โŠข ( ( ๐ด โˆˆ โ„‚ โˆง ๐‘ง โˆˆ โ„‚ ) โ†’ ( ๐ด ยท ( ๐‘ง โ†‘ 0 ) ) = ๐ด )
13 simpl โŠข ( ( ๐ด โˆˆ โ„‚ โˆง ๐‘ง โˆˆ โ„‚ ) โ†’ ๐ด โˆˆ โ„‚ )
14 12 13 eqeltrd โŠข ( ( ๐ด โˆˆ โ„‚ โˆง ๐‘ง โˆˆ โ„‚ ) โ†’ ( ๐ด ยท ( ๐‘ง โ†‘ 0 ) ) โˆˆ โ„‚ )
15 oveq2 โŠข ( ๐‘˜ = 0 โ†’ ( ๐‘ง โ†‘ ๐‘˜ ) = ( ๐‘ง โ†‘ 0 ) )
16 15 oveq2d โŠข ( ๐‘˜ = 0 โ†’ ( ๐ด ยท ( ๐‘ง โ†‘ ๐‘˜ ) ) = ( ๐ด ยท ( ๐‘ง โ†‘ 0 ) ) )
17 16 fsum1 โŠข ( ( 0 โˆˆ โ„ค โˆง ( ๐ด ยท ( ๐‘ง โ†‘ 0 ) ) โˆˆ โ„‚ ) โ†’ ฮฃ ๐‘˜ โˆˆ ( 0 ... 0 ) ( ๐ด ยท ( ๐‘ง โ†‘ ๐‘˜ ) ) = ( ๐ด ยท ( ๐‘ง โ†‘ 0 ) ) )
18 8 14 17 sylancr โŠข ( ( ๐ด โˆˆ โ„‚ โˆง ๐‘ง โˆˆ โ„‚ ) โ†’ ฮฃ ๐‘˜ โˆˆ ( 0 ... 0 ) ( ๐ด ยท ( ๐‘ง โ†‘ ๐‘˜ ) ) = ( ๐ด ยท ( ๐‘ง โ†‘ 0 ) ) )
19 18 12 eqtrd โŠข ( ( ๐ด โˆˆ โ„‚ โˆง ๐‘ง โˆˆ โ„‚ ) โ†’ ฮฃ ๐‘˜ โˆˆ ( 0 ... 0 ) ( ๐ด ยท ( ๐‘ง โ†‘ ๐‘˜ ) ) = ๐ด )
20 19 mpteq2dva โŠข ( ๐ด โˆˆ โ„‚ โ†’ ( ๐‘ง โˆˆ โ„‚ โ†ฆ ฮฃ ๐‘˜ โˆˆ ( 0 ... 0 ) ( ๐ด ยท ( ๐‘ง โ†‘ ๐‘˜ ) ) ) = ( ๐‘ง โˆˆ โ„‚ โ†ฆ ๐ด ) )
21 7 20 eqtr4id โŠข ( ๐ด โˆˆ โ„‚ โ†’ ( โ„‚ ร— { ๐ด } ) = ( ๐‘ง โˆˆ โ„‚ โ†ฆ ฮฃ ๐‘˜ โˆˆ ( 0 ... 0 ) ( ๐ด ยท ( ๐‘ง โ†‘ ๐‘˜ ) ) ) )
22 3 5 6 21 dgrle โŠข ( ๐ด โˆˆ โ„‚ โ†’ ( deg โ€˜ ( โ„‚ ร— { ๐ด } ) ) โ‰ค 0 )
23 dgrcl โŠข ( ( โ„‚ ร— { ๐ด } ) โˆˆ ( Poly โ€˜ โ„‚ ) โ†’ ( deg โ€˜ ( โ„‚ ร— { ๐ด } ) ) โˆˆ โ„•0 )
24 nn0le0eq0 โŠข ( ( deg โ€˜ ( โ„‚ ร— { ๐ด } ) ) โˆˆ โ„•0 โ†’ ( ( deg โ€˜ ( โ„‚ ร— { ๐ด } ) ) โ‰ค 0 โ†” ( deg โ€˜ ( โ„‚ ร— { ๐ด } ) ) = 0 ) )
25 3 23 24 3syl โŠข ( ๐ด โˆˆ โ„‚ โ†’ ( ( deg โ€˜ ( โ„‚ ร— { ๐ด } ) ) โ‰ค 0 โ†” ( deg โ€˜ ( โ„‚ ร— { ๐ด } ) ) = 0 ) )
26 22 25 mpbid โŠข ( ๐ด โˆˆ โ„‚ โ†’ ( deg โ€˜ ( โ„‚ ร— { ๐ด } ) ) = 0 )