Metamath Proof Explorer


Theorem etransclem6

Description: A change of bound variable, often used in proofs for etransc . (Contributed by Glauco Siliprandi, 5-Apr-2020)

Ref Expression
Assertion etransclem6 ( ๐‘ฅ โˆˆ โ„ โ†ฆ ( ( ๐‘ฅ โ†‘ ( ๐‘ƒ โˆ’ 1 ) ) ยท โˆ ๐‘— โˆˆ ( 1 ... ๐‘€ ) ( ( ๐‘ฅ โˆ’ ๐‘— ) โ†‘ ๐‘ƒ ) ) ) = ( ๐‘ฆ โˆˆ โ„ โ†ฆ ( ( ๐‘ฆ โ†‘ ( ๐‘ƒ โˆ’ 1 ) ) ยท โˆ ๐‘˜ โˆˆ ( 1 ... ๐‘€ ) ( ( ๐‘ฆ โˆ’ ๐‘˜ ) โ†‘ ๐‘ƒ ) ) )

Proof

Step Hyp Ref Expression
1 oveq1 โŠข ( ๐‘ฅ = ๐‘ฆ โ†’ ( ๐‘ฅ โ†‘ ( ๐‘ƒ โˆ’ 1 ) ) = ( ๐‘ฆ โ†‘ ( ๐‘ƒ โˆ’ 1 ) ) )
2 oveq2 โŠข ( ๐‘— = ๐‘˜ โ†’ ( ๐‘ฅ โˆ’ ๐‘— ) = ( ๐‘ฅ โˆ’ ๐‘˜ ) )
3 2 oveq1d โŠข ( ๐‘— = ๐‘˜ โ†’ ( ( ๐‘ฅ โˆ’ ๐‘— ) โ†‘ ๐‘ƒ ) = ( ( ๐‘ฅ โˆ’ ๐‘˜ ) โ†‘ ๐‘ƒ ) )
4 3 cbvprodv โŠข โˆ ๐‘— โˆˆ ( 1 ... ๐‘€ ) ( ( ๐‘ฅ โˆ’ ๐‘— ) โ†‘ ๐‘ƒ ) = โˆ ๐‘˜ โˆˆ ( 1 ... ๐‘€ ) ( ( ๐‘ฅ โˆ’ ๐‘˜ ) โ†‘ ๐‘ƒ )
5 oveq1 โŠข ( ๐‘ฅ = ๐‘ฆ โ†’ ( ๐‘ฅ โˆ’ ๐‘˜ ) = ( ๐‘ฆ โˆ’ ๐‘˜ ) )
6 5 oveq1d โŠข ( ๐‘ฅ = ๐‘ฆ โ†’ ( ( ๐‘ฅ โˆ’ ๐‘˜ ) โ†‘ ๐‘ƒ ) = ( ( ๐‘ฆ โˆ’ ๐‘˜ ) โ†‘ ๐‘ƒ ) )
7 6 prodeq2ad โŠข ( ๐‘ฅ = ๐‘ฆ โ†’ โˆ ๐‘˜ โˆˆ ( 1 ... ๐‘€ ) ( ( ๐‘ฅ โˆ’ ๐‘˜ ) โ†‘ ๐‘ƒ ) = โˆ ๐‘˜ โˆˆ ( 1 ... ๐‘€ ) ( ( ๐‘ฆ โˆ’ ๐‘˜ ) โ†‘ ๐‘ƒ ) )
8 4 7 eqtrid โŠข ( ๐‘ฅ = ๐‘ฆ โ†’ โˆ ๐‘— โˆˆ ( 1 ... ๐‘€ ) ( ( ๐‘ฅ โˆ’ ๐‘— ) โ†‘ ๐‘ƒ ) = โˆ ๐‘˜ โˆˆ ( 1 ... ๐‘€ ) ( ( ๐‘ฆ โˆ’ ๐‘˜ ) โ†‘ ๐‘ƒ ) )
9 1 8 oveq12d โŠข ( ๐‘ฅ = ๐‘ฆ โ†’ ( ( ๐‘ฅ โ†‘ ( ๐‘ƒ โˆ’ 1 ) ) ยท โˆ ๐‘— โˆˆ ( 1 ... ๐‘€ ) ( ( ๐‘ฅ โˆ’ ๐‘— ) โ†‘ ๐‘ƒ ) ) = ( ( ๐‘ฆ โ†‘ ( ๐‘ƒ โˆ’ 1 ) ) ยท โˆ ๐‘˜ โˆˆ ( 1 ... ๐‘€ ) ( ( ๐‘ฆ โˆ’ ๐‘˜ ) โ†‘ ๐‘ƒ ) ) )
10 9 cbvmptv โŠข ( ๐‘ฅ โˆˆ โ„ โ†ฆ ( ( ๐‘ฅ โ†‘ ( ๐‘ƒ โˆ’ 1 ) ) ยท โˆ ๐‘— โˆˆ ( 1 ... ๐‘€ ) ( ( ๐‘ฅ โˆ’ ๐‘— ) โ†‘ ๐‘ƒ ) ) ) = ( ๐‘ฆ โˆˆ โ„ โ†ฆ ( ( ๐‘ฆ โ†‘ ( ๐‘ƒ โˆ’ 1 ) ) ยท โˆ ๐‘˜ โˆˆ ( 1 ... ๐‘€ ) ( ( ๐‘ฆ โˆ’ ๐‘˜ ) โ†‘ ๐‘ƒ ) ) )