Metamath Proof Explorer


Theorem 2lgsoddprmlem1

Description: Lemma 1 for 2lgsoddprm . (Contributed by AV, 19-Jul-2021)

Ref Expression
Assertion 2lgsoddprmlem1 ( ( ๐ด โˆˆ โ„ค โˆง ๐ต โˆˆ โ„ค โˆง ๐‘ = ( ( 8 ยท ๐ด ) + ๐ต ) ) โ†’ ( ( ( ๐‘ โ†‘ 2 ) โˆ’ 1 ) / 8 ) = ( ( ( 8 ยท ( ๐ด โ†‘ 2 ) ) + ( 2 ยท ( ๐ด ยท ๐ต ) ) ) + ( ( ( ๐ต โ†‘ 2 ) โˆ’ 1 ) / 8 ) ) )

Proof

Step Hyp Ref Expression
1 oveq1 โŠข ( ๐‘ = ( ( 8 ยท ๐ด ) + ๐ต ) โ†’ ( ๐‘ โ†‘ 2 ) = ( ( ( 8 ยท ๐ด ) + ๐ต ) โ†‘ 2 ) )
2 1 3ad2ant3 โŠข ( ( ๐ด โˆˆ โ„ค โˆง ๐ต โˆˆ โ„ค โˆง ๐‘ = ( ( 8 ยท ๐ด ) + ๐ต ) ) โ†’ ( ๐‘ โ†‘ 2 ) = ( ( ( 8 ยท ๐ด ) + ๐ต ) โ†‘ 2 ) )
3 2 oveq1d โŠข ( ( ๐ด โˆˆ โ„ค โˆง ๐ต โˆˆ โ„ค โˆง ๐‘ = ( ( 8 ยท ๐ด ) + ๐ต ) ) โ†’ ( ( ๐‘ โ†‘ 2 ) โˆ’ 1 ) = ( ( ( ( 8 ยท ๐ด ) + ๐ต ) โ†‘ 2 ) โˆ’ 1 ) )
4 3 oveq1d โŠข ( ( ๐ด โˆˆ โ„ค โˆง ๐ต โˆˆ โ„ค โˆง ๐‘ = ( ( 8 ยท ๐ด ) + ๐ต ) ) โ†’ ( ( ( ๐‘ โ†‘ 2 ) โˆ’ 1 ) / 8 ) = ( ( ( ( ( 8 ยท ๐ด ) + ๐ต ) โ†‘ 2 ) โˆ’ 1 ) / 8 ) )
5 zcn โŠข ( ๐ด โˆˆ โ„ค โ†’ ๐ด โˆˆ โ„‚ )
6 5 adantr โŠข ( ( ๐ด โˆˆ โ„ค โˆง ๐ต โˆˆ โ„ค ) โ†’ ๐ด โˆˆ โ„‚ )
7 zcn โŠข ( ๐ต โˆˆ โ„ค โ†’ ๐ต โˆˆ โ„‚ )
8 7 adantl โŠข ( ( ๐ด โˆˆ โ„ค โˆง ๐ต โˆˆ โ„ค ) โ†’ ๐ต โˆˆ โ„‚ )
9 1cnd โŠข ( ( ๐ด โˆˆ โ„ค โˆง ๐ต โˆˆ โ„ค ) โ†’ 1 โˆˆ โ„‚ )
10 8cn โŠข 8 โˆˆ โ„‚
11 8re โŠข 8 โˆˆ โ„
12 8pos โŠข 0 < 8
13 11 12 gt0ne0ii โŠข 8 โ‰  0
14 10 13 pm3.2i โŠข ( 8 โˆˆ โ„‚ โˆง 8 โ‰  0 )
15 14 a1i โŠข ( ( ๐ด โˆˆ โ„ค โˆง ๐ต โˆˆ โ„ค ) โ†’ ( 8 โˆˆ โ„‚ โˆง 8 โ‰  0 ) )
16 mulsubdivbinom2 โŠข ( ( ( ๐ด โˆˆ โ„‚ โˆง ๐ต โˆˆ โ„‚ โˆง 1 โˆˆ โ„‚ ) โˆง ( 8 โˆˆ โ„‚ โˆง 8 โ‰  0 ) ) โ†’ ( ( ( ( ( 8 ยท ๐ด ) + ๐ต ) โ†‘ 2 ) โˆ’ 1 ) / 8 ) = ( ( ( 8 ยท ( ๐ด โ†‘ 2 ) ) + ( 2 ยท ( ๐ด ยท ๐ต ) ) ) + ( ( ( ๐ต โ†‘ 2 ) โˆ’ 1 ) / 8 ) ) )
17 6 8 9 15 16 syl31anc โŠข ( ( ๐ด โˆˆ โ„ค โˆง ๐ต โˆˆ โ„ค ) โ†’ ( ( ( ( ( 8 ยท ๐ด ) + ๐ต ) โ†‘ 2 ) โˆ’ 1 ) / 8 ) = ( ( ( 8 ยท ( ๐ด โ†‘ 2 ) ) + ( 2 ยท ( ๐ด ยท ๐ต ) ) ) + ( ( ( ๐ต โ†‘ 2 ) โˆ’ 1 ) / 8 ) ) )
18 17 3adant3 โŠข ( ( ๐ด โˆˆ โ„ค โˆง ๐ต โˆˆ โ„ค โˆง ๐‘ = ( ( 8 ยท ๐ด ) + ๐ต ) ) โ†’ ( ( ( ( ( 8 ยท ๐ด ) + ๐ต ) โ†‘ 2 ) โˆ’ 1 ) / 8 ) = ( ( ( 8 ยท ( ๐ด โ†‘ 2 ) ) + ( 2 ยท ( ๐ด ยท ๐ต ) ) ) + ( ( ( ๐ต โ†‘ 2 ) โˆ’ 1 ) / 8 ) ) )
19 4 18 eqtrd โŠข ( ( ๐ด โˆˆ โ„ค โˆง ๐ต โˆˆ โ„ค โˆง ๐‘ = ( ( 8 ยท ๐ด ) + ๐ต ) ) โ†’ ( ( ( ๐‘ โ†‘ 2 ) โˆ’ 1 ) / 8 ) = ( ( ( 8 ยท ( ๐ด โ†‘ 2 ) ) + ( 2 ยท ( ๐ด ยท ๐ต ) ) ) + ( ( ( ๐ต โ†‘ 2 ) โˆ’ 1 ) / 8 ) ) )