Metamath Proof Explorer


Theorem sqoddm1div8

Description: A squared odd number minus 1 divided by 8 is the odd number multiplied with its successor divided by 2. (Contributed by AV, 19-Jul-2021)

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

Proof

Step Hyp Ref Expression
1 oveq1 โŠข ( ๐‘€ = ( ( 2 ยท ๐‘ ) + 1 ) โ†’ ( ๐‘€ โ†‘ 2 ) = ( ( ( 2 ยท ๐‘ ) + 1 ) โ†‘ 2 ) )
2 2z โŠข 2 โˆˆ โ„ค
3 2 a1i โŠข ( ๐‘ โˆˆ โ„ค โ†’ 2 โˆˆ โ„ค )
4 id โŠข ( ๐‘ โˆˆ โ„ค โ†’ ๐‘ โˆˆ โ„ค )
5 3 4 zmulcld โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( 2 ยท ๐‘ ) โˆˆ โ„ค )
6 5 zcnd โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( 2 ยท ๐‘ ) โˆˆ โ„‚ )
7 binom21 โŠข ( ( 2 ยท ๐‘ ) โˆˆ โ„‚ โ†’ ( ( ( 2 ยท ๐‘ ) + 1 ) โ†‘ 2 ) = ( ( ( ( 2 ยท ๐‘ ) โ†‘ 2 ) + ( 2 ยท ( 2 ยท ๐‘ ) ) ) + 1 ) )
8 6 7 syl โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ( ( 2 ยท ๐‘ ) + 1 ) โ†‘ 2 ) = ( ( ( ( 2 ยท ๐‘ ) โ†‘ 2 ) + ( 2 ยท ( 2 ยท ๐‘ ) ) ) + 1 ) )
9 1 8 sylan9eqr โŠข ( ( ๐‘ โˆˆ โ„ค โˆง ๐‘€ = ( ( 2 ยท ๐‘ ) + 1 ) ) โ†’ ( ๐‘€ โ†‘ 2 ) = ( ( ( ( 2 ยท ๐‘ ) โ†‘ 2 ) + ( 2 ยท ( 2 ยท ๐‘ ) ) ) + 1 ) )
10 9 oveq1d โŠข ( ( ๐‘ โˆˆ โ„ค โˆง ๐‘€ = ( ( 2 ยท ๐‘ ) + 1 ) ) โ†’ ( ( ๐‘€ โ†‘ 2 ) โˆ’ 1 ) = ( ( ( ( ( 2 ยท ๐‘ ) โ†‘ 2 ) + ( 2 ยท ( 2 ยท ๐‘ ) ) ) + 1 ) โˆ’ 1 ) )
11 2cnd โŠข ( ๐‘ โˆˆ โ„ค โ†’ 2 โˆˆ โ„‚ )
12 zcn โŠข ( ๐‘ โˆˆ โ„ค โ†’ ๐‘ โˆˆ โ„‚ )
13 11 12 sqmuld โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ( 2 ยท ๐‘ ) โ†‘ 2 ) = ( ( 2 โ†‘ 2 ) ยท ( ๐‘ โ†‘ 2 ) ) )
14 sq2 โŠข ( 2 โ†‘ 2 ) = 4
15 14 a1i โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( 2 โ†‘ 2 ) = 4 )
16 15 oveq1d โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ( 2 โ†‘ 2 ) ยท ( ๐‘ โ†‘ 2 ) ) = ( 4 ยท ( ๐‘ โ†‘ 2 ) ) )
17 13 16 eqtrd โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ( 2 ยท ๐‘ ) โ†‘ 2 ) = ( 4 ยท ( ๐‘ โ†‘ 2 ) ) )
18 mulass โŠข ( ( 2 โˆˆ โ„‚ โˆง 2 โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„‚ ) โ†’ ( ( 2 ยท 2 ) ยท ๐‘ ) = ( 2 ยท ( 2 ยท ๐‘ ) ) )
19 18 eqcomd โŠข ( ( 2 โˆˆ โ„‚ โˆง 2 โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„‚ ) โ†’ ( 2 ยท ( 2 ยท ๐‘ ) ) = ( ( 2 ยท 2 ) ยท ๐‘ ) )
20 11 11 12 19 syl3anc โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( 2 ยท ( 2 ยท ๐‘ ) ) = ( ( 2 ยท 2 ) ยท ๐‘ ) )
21 2t2e4 โŠข ( 2 ยท 2 ) = 4
22 21 a1i โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( 2 ยท 2 ) = 4 )
23 22 oveq1d โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ( 2 ยท 2 ) ยท ๐‘ ) = ( 4 ยท ๐‘ ) )
24 20 23 eqtrd โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( 2 ยท ( 2 ยท ๐‘ ) ) = ( 4 ยท ๐‘ ) )
25 17 24 oveq12d โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ( ( 2 ยท ๐‘ ) โ†‘ 2 ) + ( 2 ยท ( 2 ยท ๐‘ ) ) ) = ( ( 4 ยท ( ๐‘ โ†‘ 2 ) ) + ( 4 ยท ๐‘ ) ) )
26 25 oveq1d โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ( ( ( 2 ยท ๐‘ ) โ†‘ 2 ) + ( 2 ยท ( 2 ยท ๐‘ ) ) ) + 1 ) = ( ( ( 4 ยท ( ๐‘ โ†‘ 2 ) ) + ( 4 ยท ๐‘ ) ) + 1 ) )
27 26 oveq1d โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ( ( ( ( 2 ยท ๐‘ ) โ†‘ 2 ) + ( 2 ยท ( 2 ยท ๐‘ ) ) ) + 1 ) โˆ’ 1 ) = ( ( ( ( 4 ยท ( ๐‘ โ†‘ 2 ) ) + ( 4 ยท ๐‘ ) ) + 1 ) โˆ’ 1 ) )
28 4z โŠข 4 โˆˆ โ„ค
29 28 a1i โŠข ( ๐‘ โˆˆ โ„ค โ†’ 4 โˆˆ โ„ค )
30 zsqcl โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ๐‘ โ†‘ 2 ) โˆˆ โ„ค )
31 29 30 zmulcld โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( 4 ยท ( ๐‘ โ†‘ 2 ) ) โˆˆ โ„ค )
32 31 zcnd โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( 4 ยท ( ๐‘ โ†‘ 2 ) ) โˆˆ โ„‚ )
33 29 4 zmulcld โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( 4 ยท ๐‘ ) โˆˆ โ„ค )
34 33 zcnd โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( 4 ยท ๐‘ ) โˆˆ โ„‚ )
35 32 34 addcld โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ( 4 ยท ( ๐‘ โ†‘ 2 ) ) + ( 4 ยท ๐‘ ) ) โˆˆ โ„‚ )
36 pncan1 โŠข ( ( ( 4 ยท ( ๐‘ โ†‘ 2 ) ) + ( 4 ยท ๐‘ ) ) โˆˆ โ„‚ โ†’ ( ( ( ( 4 ยท ( ๐‘ โ†‘ 2 ) ) + ( 4 ยท ๐‘ ) ) + 1 ) โˆ’ 1 ) = ( ( 4 ยท ( ๐‘ โ†‘ 2 ) ) + ( 4 ยท ๐‘ ) ) )
37 35 36 syl โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ( ( ( 4 ยท ( ๐‘ โ†‘ 2 ) ) + ( 4 ยท ๐‘ ) ) + 1 ) โˆ’ 1 ) = ( ( 4 ยท ( ๐‘ โ†‘ 2 ) ) + ( 4 ยท ๐‘ ) ) )
38 27 37 eqtrd โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ( ( ( ( 2 ยท ๐‘ ) โ†‘ 2 ) + ( 2 ยท ( 2 ยท ๐‘ ) ) ) + 1 ) โˆ’ 1 ) = ( ( 4 ยท ( ๐‘ โ†‘ 2 ) ) + ( 4 ยท ๐‘ ) ) )
39 38 adantr โŠข ( ( ๐‘ โˆˆ โ„ค โˆง ๐‘€ = ( ( 2 ยท ๐‘ ) + 1 ) ) โ†’ ( ( ( ( ( 2 ยท ๐‘ ) โ†‘ 2 ) + ( 2 ยท ( 2 ยท ๐‘ ) ) ) + 1 ) โˆ’ 1 ) = ( ( 4 ยท ( ๐‘ โ†‘ 2 ) ) + ( 4 ยท ๐‘ ) ) )
40 10 39 eqtrd โŠข ( ( ๐‘ โˆˆ โ„ค โˆง ๐‘€ = ( ( 2 ยท ๐‘ ) + 1 ) ) โ†’ ( ( ๐‘€ โ†‘ 2 ) โˆ’ 1 ) = ( ( 4 ยท ( ๐‘ โ†‘ 2 ) ) + ( 4 ยท ๐‘ ) ) )
41 40 oveq1d โŠข ( ( ๐‘ โˆˆ โ„ค โˆง ๐‘€ = ( ( 2 ยท ๐‘ ) + 1 ) ) โ†’ ( ( ( ๐‘€ โ†‘ 2 ) โˆ’ 1 ) / 8 ) = ( ( ( 4 ยท ( ๐‘ โ†‘ 2 ) ) + ( 4 ยท ๐‘ ) ) / 8 ) )
42 4cn โŠข 4 โˆˆ โ„‚
43 42 a1i โŠข ( ๐‘ โˆˆ โ„ค โ†’ 4 โˆˆ โ„‚ )
44 30 zcnd โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ๐‘ โ†‘ 2 ) โˆˆ โ„‚ )
45 43 44 12 adddid โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( 4 ยท ( ( ๐‘ โ†‘ 2 ) + ๐‘ ) ) = ( ( 4 ยท ( ๐‘ โ†‘ 2 ) ) + ( 4 ยท ๐‘ ) ) )
46 45 eqcomd โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ( 4 ยท ( ๐‘ โ†‘ 2 ) ) + ( 4 ยท ๐‘ ) ) = ( 4 ยท ( ( ๐‘ โ†‘ 2 ) + ๐‘ ) ) )
47 46 oveq1d โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ( ( 4 ยท ( ๐‘ โ†‘ 2 ) ) + ( 4 ยท ๐‘ ) ) / 8 ) = ( ( 4 ยท ( ( ๐‘ โ†‘ 2 ) + ๐‘ ) ) / 8 ) )
48 47 adantr โŠข ( ( ๐‘ โˆˆ โ„ค โˆง ๐‘€ = ( ( 2 ยท ๐‘ ) + 1 ) ) โ†’ ( ( ( 4 ยท ( ๐‘ โ†‘ 2 ) ) + ( 4 ยท ๐‘ ) ) / 8 ) = ( ( 4 ยท ( ( ๐‘ โ†‘ 2 ) + ๐‘ ) ) / 8 ) )
49 4t2e8 โŠข ( 4 ยท 2 ) = 8
50 49 a1i โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( 4 ยท 2 ) = 8 )
51 50 eqcomd โŠข ( ๐‘ โˆˆ โ„ค โ†’ 8 = ( 4 ยท 2 ) )
52 51 oveq2d โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ( 4 ยท ( ( ๐‘ โ†‘ 2 ) + ๐‘ ) ) / 8 ) = ( ( 4 ยท ( ( ๐‘ โ†‘ 2 ) + ๐‘ ) ) / ( 4 ยท 2 ) ) )
53 30 4 zaddcld โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ( ๐‘ โ†‘ 2 ) + ๐‘ ) โˆˆ โ„ค )
54 53 zcnd โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ( ๐‘ โ†‘ 2 ) + ๐‘ ) โˆˆ โ„‚ )
55 2cnne0 โŠข ( 2 โˆˆ โ„‚ โˆง 2 โ‰  0 )
56 55 a1i โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( 2 โˆˆ โ„‚ โˆง 2 โ‰  0 ) )
57 4ne0 โŠข 4 โ‰  0
58 42 57 pm3.2i โŠข ( 4 โˆˆ โ„‚ โˆง 4 โ‰  0 )
59 58 a1i โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( 4 โˆˆ โ„‚ โˆง 4 โ‰  0 ) )
60 divcan5 โŠข ( ( ( ( ๐‘ โ†‘ 2 ) + ๐‘ ) โˆˆ โ„‚ โˆง ( 2 โˆˆ โ„‚ โˆง 2 โ‰  0 ) โˆง ( 4 โˆˆ โ„‚ โˆง 4 โ‰  0 ) ) โ†’ ( ( 4 ยท ( ( ๐‘ โ†‘ 2 ) + ๐‘ ) ) / ( 4 ยท 2 ) ) = ( ( ( ๐‘ โ†‘ 2 ) + ๐‘ ) / 2 ) )
61 54 56 59 60 syl3anc โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ( 4 ยท ( ( ๐‘ โ†‘ 2 ) + ๐‘ ) ) / ( 4 ยท 2 ) ) = ( ( ( ๐‘ โ†‘ 2 ) + ๐‘ ) / 2 ) )
62 12 sqvald โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ๐‘ โ†‘ 2 ) = ( ๐‘ ยท ๐‘ ) )
63 62 oveq1d โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ( ๐‘ โ†‘ 2 ) + ๐‘ ) = ( ( ๐‘ ยท ๐‘ ) + ๐‘ ) )
64 12 mulridd โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ๐‘ ยท 1 ) = ๐‘ )
65 64 eqcomd โŠข ( ๐‘ โˆˆ โ„ค โ†’ ๐‘ = ( ๐‘ ยท 1 ) )
66 65 oveq2d โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ( ๐‘ ยท ๐‘ ) + ๐‘ ) = ( ( ๐‘ ยท ๐‘ ) + ( ๐‘ ยท 1 ) ) )
67 1cnd โŠข ( ๐‘ โˆˆ โ„ค โ†’ 1 โˆˆ โ„‚ )
68 adddi โŠข ( ( ๐‘ โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„‚ โˆง 1 โˆˆ โ„‚ ) โ†’ ( ๐‘ ยท ( ๐‘ + 1 ) ) = ( ( ๐‘ ยท ๐‘ ) + ( ๐‘ ยท 1 ) ) )
69 68 eqcomd โŠข ( ( ๐‘ โˆˆ โ„‚ โˆง ๐‘ โˆˆ โ„‚ โˆง 1 โˆˆ โ„‚ ) โ†’ ( ( ๐‘ ยท ๐‘ ) + ( ๐‘ ยท 1 ) ) = ( ๐‘ ยท ( ๐‘ + 1 ) ) )
70 12 12 67 69 syl3anc โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ( ๐‘ ยท ๐‘ ) + ( ๐‘ ยท 1 ) ) = ( ๐‘ ยท ( ๐‘ + 1 ) ) )
71 63 66 70 3eqtrd โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ( ๐‘ โ†‘ 2 ) + ๐‘ ) = ( ๐‘ ยท ( ๐‘ + 1 ) ) )
72 71 oveq1d โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ( ( ๐‘ โ†‘ 2 ) + ๐‘ ) / 2 ) = ( ( ๐‘ ยท ( ๐‘ + 1 ) ) / 2 ) )
73 52 61 72 3eqtrd โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ( 4 ยท ( ( ๐‘ โ†‘ 2 ) + ๐‘ ) ) / 8 ) = ( ( ๐‘ ยท ( ๐‘ + 1 ) ) / 2 ) )
74 73 adantr โŠข ( ( ๐‘ โˆˆ โ„ค โˆง ๐‘€ = ( ( 2 ยท ๐‘ ) + 1 ) ) โ†’ ( ( 4 ยท ( ( ๐‘ โ†‘ 2 ) + ๐‘ ) ) / 8 ) = ( ( ๐‘ ยท ( ๐‘ + 1 ) ) / 2 ) )
75 41 48 74 3eqtrd โŠข ( ( ๐‘ โˆˆ โ„ค โˆง ๐‘€ = ( ( 2 ยท ๐‘ ) + 1 ) ) โ†’ ( ( ( ๐‘€ โ†‘ 2 ) โˆ’ 1 ) / 8 ) = ( ( ๐‘ ยท ( ๐‘ + 1 ) ) / 2 ) )