Metamath Proof Explorer


Theorem numclwwlk3lem1

Description: Lemma 2 for numclwwlk3 . (Contributed by Alexander van der Vekens, 26-Aug-2018) (Proof shortened by AV, 23-Jan-2022)

Ref Expression
Assertion numclwwlk3lem1 ( ( ๐พ โˆˆ โ„‚ โˆง ๐‘Œ โˆˆ โ„‚ โˆง ๐‘ โˆˆ ( โ„คโ‰ฅ โ€˜ 2 ) ) โ†’ ( ( ( ๐พ โ†‘ ( ๐‘ โˆ’ 2 ) ) โˆ’ ๐‘Œ ) + ( ๐พ ยท ๐‘Œ ) ) = ( ( ( ๐พ โˆ’ 1 ) ยท ๐‘Œ ) + ( ๐พ โ†‘ ( ๐‘ โˆ’ 2 ) ) ) )

Proof

Step Hyp Ref Expression
1 uznn0sub โŠข ( ๐‘ โˆˆ ( โ„คโ‰ฅ โ€˜ 2 ) โ†’ ( ๐‘ โˆ’ 2 ) โˆˆ โ„•0 )
2 expcl โŠข ( ( ๐พ โˆˆ โ„‚ โˆง ( ๐‘ โˆ’ 2 ) โˆˆ โ„•0 ) โ†’ ( ๐พ โ†‘ ( ๐‘ โˆ’ 2 ) ) โˆˆ โ„‚ )
3 1 2 sylan2 โŠข ( ( ๐พ โˆˆ โ„‚ โˆง ๐‘ โˆˆ ( โ„คโ‰ฅ โ€˜ 2 ) ) โ†’ ( ๐พ โ†‘ ( ๐‘ โˆ’ 2 ) ) โˆˆ โ„‚ )
4 3 3adant2 โŠข ( ( ๐พ โˆˆ โ„‚ โˆง ๐‘Œ โˆˆ โ„‚ โˆง ๐‘ โˆˆ ( โ„คโ‰ฅ โ€˜ 2 ) ) โ†’ ( ๐พ โ†‘ ( ๐‘ โˆ’ 2 ) ) โˆˆ โ„‚ )
5 simp2 โŠข ( ( ๐พ โˆˆ โ„‚ โˆง ๐‘Œ โˆˆ โ„‚ โˆง ๐‘ โˆˆ ( โ„คโ‰ฅ โ€˜ 2 ) ) โ†’ ๐‘Œ โˆˆ โ„‚ )
6 mulcl โŠข ( ( ๐พ โˆˆ โ„‚ โˆง ๐‘Œ โˆˆ โ„‚ ) โ†’ ( ๐พ ยท ๐‘Œ ) โˆˆ โ„‚ )
7 6 3adant3 โŠข ( ( ๐พ โˆˆ โ„‚ โˆง ๐‘Œ โˆˆ โ„‚ โˆง ๐‘ โˆˆ ( โ„คโ‰ฅ โ€˜ 2 ) ) โ†’ ( ๐พ ยท ๐‘Œ ) โˆˆ โ„‚ )
8 4 5 7 subadd23d โŠข ( ( ๐พ โˆˆ โ„‚ โˆง ๐‘Œ โˆˆ โ„‚ โˆง ๐‘ โˆˆ ( โ„คโ‰ฅ โ€˜ 2 ) ) โ†’ ( ( ( ๐พ โ†‘ ( ๐‘ โˆ’ 2 ) ) โˆ’ ๐‘Œ ) + ( ๐พ ยท ๐‘Œ ) ) = ( ( ๐พ โ†‘ ( ๐‘ โˆ’ 2 ) ) + ( ( ๐พ ยท ๐‘Œ ) โˆ’ ๐‘Œ ) ) )
9 7 5 subcld โŠข ( ( ๐พ โˆˆ โ„‚ โˆง ๐‘Œ โˆˆ โ„‚ โˆง ๐‘ โˆˆ ( โ„คโ‰ฅ โ€˜ 2 ) ) โ†’ ( ( ๐พ ยท ๐‘Œ ) โˆ’ ๐‘Œ ) โˆˆ โ„‚ )
10 4 9 addcomd โŠข ( ( ๐พ โˆˆ โ„‚ โˆง ๐‘Œ โˆˆ โ„‚ โˆง ๐‘ โˆˆ ( โ„คโ‰ฅ โ€˜ 2 ) ) โ†’ ( ( ๐พ โ†‘ ( ๐‘ โˆ’ 2 ) ) + ( ( ๐พ ยท ๐‘Œ ) โˆ’ ๐‘Œ ) ) = ( ( ( ๐พ ยท ๐‘Œ ) โˆ’ ๐‘Œ ) + ( ๐พ โ†‘ ( ๐‘ โˆ’ 2 ) ) ) )
11 simp1 โŠข ( ( ๐พ โˆˆ โ„‚ โˆง ๐‘Œ โˆˆ โ„‚ โˆง ๐‘ โˆˆ ( โ„คโ‰ฅ โ€˜ 2 ) ) โ†’ ๐พ โˆˆ โ„‚ )
12 11 5 mulsubfacd โŠข ( ( ๐พ โˆˆ โ„‚ โˆง ๐‘Œ โˆˆ โ„‚ โˆง ๐‘ โˆˆ ( โ„คโ‰ฅ โ€˜ 2 ) ) โ†’ ( ( ๐พ ยท ๐‘Œ ) โˆ’ ๐‘Œ ) = ( ( ๐พ โˆ’ 1 ) ยท ๐‘Œ ) )
13 12 oveq1d โŠข ( ( ๐พ โˆˆ โ„‚ โˆง ๐‘Œ โˆˆ โ„‚ โˆง ๐‘ โˆˆ ( โ„คโ‰ฅ โ€˜ 2 ) ) โ†’ ( ( ( ๐พ ยท ๐‘Œ ) โˆ’ ๐‘Œ ) + ( ๐พ โ†‘ ( ๐‘ โˆ’ 2 ) ) ) = ( ( ( ๐พ โˆ’ 1 ) ยท ๐‘Œ ) + ( ๐พ โ†‘ ( ๐‘ โˆ’ 2 ) ) ) )
14 8 10 13 3eqtrd โŠข ( ( ๐พ โˆˆ โ„‚ โˆง ๐‘Œ โˆˆ โ„‚ โˆง ๐‘ โˆˆ ( โ„คโ‰ฅ โ€˜ 2 ) ) โ†’ ( ( ( ๐พ โ†‘ ( ๐‘ โˆ’ 2 ) ) โˆ’ ๐‘Œ ) + ( ๐พ ยท ๐‘Œ ) ) = ( ( ( ๐พ โˆ’ 1 ) ยท ๐‘Œ ) + ( ๐พ โ†‘ ( ๐‘ โˆ’ 2 ) ) ) )