ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  2sqlem4 GIF version

Theorem 2sqlem4 14761
Description: Lemma for 2sqlem5 14762. (Contributed by Mario Carneiro, 20-Jun-2015.)
Hypotheses
Ref Expression
2sq.1 ๐‘† = ran (๐‘ค โˆˆ โ„ค[i] โ†ฆ ((absโ€˜๐‘ค)โ†‘2))
2sqlem5.1 (๐œ‘ โ†’ ๐‘ โˆˆ โ„•)
2sqlem5.2 (๐œ‘ โ†’ ๐‘ƒ โˆˆ โ„™)
2sqlem4.3 (๐œ‘ โ†’ ๐ด โˆˆ โ„ค)
2sqlem4.4 (๐œ‘ โ†’ ๐ต โˆˆ โ„ค)
2sqlem4.5 (๐œ‘ โ†’ ๐ถ โˆˆ โ„ค)
2sqlem4.6 (๐œ‘ โ†’ ๐ท โˆˆ โ„ค)
2sqlem4.7 (๐œ‘ โ†’ (๐‘ ยท ๐‘ƒ) = ((๐ดโ†‘2) + (๐ตโ†‘2)))
2sqlem4.8 (๐œ‘ โ†’ ๐‘ƒ = ((๐ถโ†‘2) + (๐ทโ†‘2)))
Assertion
Ref Expression
2sqlem4 (๐œ‘ โ†’ ๐‘ โˆˆ ๐‘†)

Proof of Theorem 2sqlem4
StepHypRef Expression
1 2sq.1 . . 3 ๐‘† = ran (๐‘ค โˆˆ โ„ค[i] โ†ฆ ((absโ€˜๐‘ค)โ†‘2))
2 2sqlem5.1 . . . 4 (๐œ‘ โ†’ ๐‘ โˆˆ โ„•)
32adantr 276 . . 3 ((๐œ‘ โˆง ๐‘ƒ โˆฅ ((๐ถ ยท ๐ต) + (๐ด ยท ๐ท))) โ†’ ๐‘ โˆˆ โ„•)
4 2sqlem5.2 . . . 4 (๐œ‘ โ†’ ๐‘ƒ โˆˆ โ„™)
54adantr 276 . . 3 ((๐œ‘ โˆง ๐‘ƒ โˆฅ ((๐ถ ยท ๐ต) + (๐ด ยท ๐ท))) โ†’ ๐‘ƒ โˆˆ โ„™)
6 2sqlem4.3 . . . 4 (๐œ‘ โ†’ ๐ด โˆˆ โ„ค)
76adantr 276 . . 3 ((๐œ‘ โˆง ๐‘ƒ โˆฅ ((๐ถ ยท ๐ต) + (๐ด ยท ๐ท))) โ†’ ๐ด โˆˆ โ„ค)
8 2sqlem4.4 . . . 4 (๐œ‘ โ†’ ๐ต โˆˆ โ„ค)
98adantr 276 . . 3 ((๐œ‘ โˆง ๐‘ƒ โˆฅ ((๐ถ ยท ๐ต) + (๐ด ยท ๐ท))) โ†’ ๐ต โˆˆ โ„ค)
10 2sqlem4.5 . . . 4 (๐œ‘ โ†’ ๐ถ โˆˆ โ„ค)
1110adantr 276 . . 3 ((๐œ‘ โˆง ๐‘ƒ โˆฅ ((๐ถ ยท ๐ต) + (๐ด ยท ๐ท))) โ†’ ๐ถ โˆˆ โ„ค)
12 2sqlem4.6 . . . 4 (๐œ‘ โ†’ ๐ท โˆˆ โ„ค)
1312adantr 276 . . 3 ((๐œ‘ โˆง ๐‘ƒ โˆฅ ((๐ถ ยท ๐ต) + (๐ด ยท ๐ท))) โ†’ ๐ท โˆˆ โ„ค)
14 2sqlem4.7 . . . 4 (๐œ‘ โ†’ (๐‘ ยท ๐‘ƒ) = ((๐ดโ†‘2) + (๐ตโ†‘2)))
1514adantr 276 . . 3 ((๐œ‘ โˆง ๐‘ƒ โˆฅ ((๐ถ ยท ๐ต) + (๐ด ยท ๐ท))) โ†’ (๐‘ ยท ๐‘ƒ) = ((๐ดโ†‘2) + (๐ตโ†‘2)))
16 2sqlem4.8 . . . 4 (๐œ‘ โ†’ ๐‘ƒ = ((๐ถโ†‘2) + (๐ทโ†‘2)))
1716adantr 276 . . 3 ((๐œ‘ โˆง ๐‘ƒ โˆฅ ((๐ถ ยท ๐ต) + (๐ด ยท ๐ท))) โ†’ ๐‘ƒ = ((๐ถโ†‘2) + (๐ทโ†‘2)))
18 simpr 110 . . 3 ((๐œ‘ โˆง ๐‘ƒ โˆฅ ((๐ถ ยท ๐ต) + (๐ด ยท ๐ท))) โ†’ ๐‘ƒ โˆฅ ((๐ถ ยท ๐ต) + (๐ด ยท ๐ท)))
191, 3, 5, 7, 9, 11, 13, 15, 17, 182sqlem3 14760 . 2 ((๐œ‘ โˆง ๐‘ƒ โˆฅ ((๐ถ ยท ๐ต) + (๐ด ยท ๐ท))) โ†’ ๐‘ โˆˆ ๐‘†)
202adantr 276 . . 3 ((๐œ‘ โˆง ๐‘ƒ โˆฅ ((๐ถ ยท ๐ต) โˆ’ (๐ด ยท ๐ท))) โ†’ ๐‘ โˆˆ โ„•)
214adantr 276 . . 3 ((๐œ‘ โˆง ๐‘ƒ โˆฅ ((๐ถ ยท ๐ต) โˆ’ (๐ด ยท ๐ท))) โ†’ ๐‘ƒ โˆˆ โ„™)
226znegcld 9391 . . . 4 (๐œ‘ โ†’ -๐ด โˆˆ โ„ค)
2322adantr 276 . . 3 ((๐œ‘ โˆง ๐‘ƒ โˆฅ ((๐ถ ยท ๐ต) โˆ’ (๐ด ยท ๐ท))) โ†’ -๐ด โˆˆ โ„ค)
248adantr 276 . . 3 ((๐œ‘ โˆง ๐‘ƒ โˆฅ ((๐ถ ยท ๐ต) โˆ’ (๐ด ยท ๐ท))) โ†’ ๐ต โˆˆ โ„ค)
2510adantr 276 . . 3 ((๐œ‘ โˆง ๐‘ƒ โˆฅ ((๐ถ ยท ๐ต) โˆ’ (๐ด ยท ๐ท))) โ†’ ๐ถ โˆˆ โ„ค)
2612adantr 276 . . 3 ((๐œ‘ โˆง ๐‘ƒ โˆฅ ((๐ถ ยท ๐ต) โˆ’ (๐ด ยท ๐ท))) โ†’ ๐ท โˆˆ โ„ค)
276zcnd 9390 . . . . . . 7 (๐œ‘ โ†’ ๐ด โˆˆ โ„‚)
28 sqneg 10593 . . . . . . 7 (๐ด โˆˆ โ„‚ โ†’ (-๐ดโ†‘2) = (๐ดโ†‘2))
2927, 28syl 14 . . . . . 6 (๐œ‘ โ†’ (-๐ดโ†‘2) = (๐ดโ†‘2))
3029oveq1d 5903 . . . . 5 (๐œ‘ โ†’ ((-๐ดโ†‘2) + (๐ตโ†‘2)) = ((๐ดโ†‘2) + (๐ตโ†‘2)))
3114, 30eqtr4d 2223 . . . 4 (๐œ‘ โ†’ (๐‘ ยท ๐‘ƒ) = ((-๐ดโ†‘2) + (๐ตโ†‘2)))
3231adantr 276 . . 3 ((๐œ‘ โˆง ๐‘ƒ โˆฅ ((๐ถ ยท ๐ต) โˆ’ (๐ด ยท ๐ท))) โ†’ (๐‘ ยท ๐‘ƒ) = ((-๐ดโ†‘2) + (๐ตโ†‘2)))
3316adantr 276 . . 3 ((๐œ‘ โˆง ๐‘ƒ โˆฅ ((๐ถ ยท ๐ต) โˆ’ (๐ด ยท ๐ท))) โ†’ ๐‘ƒ = ((๐ถโ†‘2) + (๐ทโ†‘2)))
3412zcnd 9390 . . . . . . . 8 (๐œ‘ โ†’ ๐ท โˆˆ โ„‚)
3527, 34mulneg1d 8382 . . . . . . 7 (๐œ‘ โ†’ (-๐ด ยท ๐ท) = -(๐ด ยท ๐ท))
3635oveq2d 5904 . . . . . 6 (๐œ‘ โ†’ ((๐ถ ยท ๐ต) + (-๐ด ยท ๐ท)) = ((๐ถ ยท ๐ต) + -(๐ด ยท ๐ท)))
3710, 8zmulcld 9395 . . . . . . . 8 (๐œ‘ โ†’ (๐ถ ยท ๐ต) โˆˆ โ„ค)
3837zcnd 9390 . . . . . . 7 (๐œ‘ โ†’ (๐ถ ยท ๐ต) โˆˆ โ„‚)
396, 12zmulcld 9395 . . . . . . . 8 (๐œ‘ โ†’ (๐ด ยท ๐ท) โˆˆ โ„ค)
4039zcnd 9390 . . . . . . 7 (๐œ‘ โ†’ (๐ด ยท ๐ท) โˆˆ โ„‚)
4138, 40negsubd 8288 . . . . . 6 (๐œ‘ โ†’ ((๐ถ ยท ๐ต) + -(๐ด ยท ๐ท)) = ((๐ถ ยท ๐ต) โˆ’ (๐ด ยท ๐ท)))
4236, 41eqtrd 2220 . . . . 5 (๐œ‘ โ†’ ((๐ถ ยท ๐ต) + (-๐ด ยท ๐ท)) = ((๐ถ ยท ๐ต) โˆ’ (๐ด ยท ๐ท)))
4342breq2d 4027 . . . 4 (๐œ‘ โ†’ (๐‘ƒ โˆฅ ((๐ถ ยท ๐ต) + (-๐ด ยท ๐ท)) โ†” ๐‘ƒ โˆฅ ((๐ถ ยท ๐ต) โˆ’ (๐ด ยท ๐ท))))
4443biimpar 297 . . 3 ((๐œ‘ โˆง ๐‘ƒ โˆฅ ((๐ถ ยท ๐ต) โˆ’ (๐ด ยท ๐ท))) โ†’ ๐‘ƒ โˆฅ ((๐ถ ยท ๐ต) + (-๐ด ยท ๐ท)))
451, 20, 21, 23, 24, 25, 26, 32, 33, 442sqlem3 14760 . 2 ((๐œ‘ โˆง ๐‘ƒ โˆฅ ((๐ถ ยท ๐ต) โˆ’ (๐ด ยท ๐ท))) โ†’ ๐‘ โˆˆ ๐‘†)
46 prmz 12125 . . . . . 6 (๐‘ƒ โˆˆ โ„™ โ†’ ๐‘ƒ โˆˆ โ„ค)
474, 46syl 14 . . . . 5 (๐œ‘ โ†’ ๐‘ƒ โˆˆ โ„ค)
48 zsqcl 10605 . . . . . . . 8 (๐ถ โˆˆ โ„ค โ†’ (๐ถโ†‘2) โˆˆ โ„ค)
4910, 48syl 14 . . . . . . 7 (๐œ‘ โ†’ (๐ถโ†‘2) โˆˆ โ„ค)
502nnzd 9388 . . . . . . 7 (๐œ‘ โ†’ ๐‘ โˆˆ โ„ค)
5149, 50zmulcld 9395 . . . . . 6 (๐œ‘ โ†’ ((๐ถโ†‘2) ยท ๐‘) โˆˆ โ„ค)
52 zsqcl 10605 . . . . . . 7 (๐ด โˆˆ โ„ค โ†’ (๐ดโ†‘2) โˆˆ โ„ค)
536, 52syl 14 . . . . . 6 (๐œ‘ โ†’ (๐ดโ†‘2) โˆˆ โ„ค)
5451, 53zsubcld 9394 . . . . 5 (๐œ‘ โ†’ (((๐ถโ†‘2) ยท ๐‘) โˆ’ (๐ดโ†‘2)) โˆˆ โ„ค)
55 dvdsmul1 11834 . . . . 5 ((๐‘ƒ โˆˆ โ„ค โˆง (((๐ถโ†‘2) ยท ๐‘) โˆ’ (๐ดโ†‘2)) โˆˆ โ„ค) โ†’ ๐‘ƒ โˆฅ (๐‘ƒ ยท (((๐ถโ†‘2) ยท ๐‘) โˆ’ (๐ดโ†‘2))))
5647, 54, 55syl2anc 411 . . . 4 (๐œ‘ โ†’ ๐‘ƒ โˆฅ (๐‘ƒ ยท (((๐ถโ†‘2) ยท ๐‘) โˆ’ (๐ดโ†‘2))))
5710, 6zmulcld 9395 . . . . . . . . 9 (๐œ‘ โ†’ (๐ถ ยท ๐ด) โˆˆ โ„ค)
5857zcnd 9390 . . . . . . . 8 (๐œ‘ โ†’ (๐ถ ยท ๐ด) โˆˆ โ„‚)
5958sqcld 10666 . . . . . . 7 (๐œ‘ โ†’ ((๐ถ ยท ๐ด)โ†‘2) โˆˆ โ„‚)
6038sqcld 10666 . . . . . . 7 (๐œ‘ โ†’ ((๐ถ ยท ๐ต)โ†‘2) โˆˆ โ„‚)
6140sqcld 10666 . . . . . . 7 (๐œ‘ โ†’ ((๐ด ยท ๐ท)โ†‘2) โˆˆ โ„‚)
6259, 60, 61pnpcand 8319 . . . . . 6 (๐œ‘ โ†’ ((((๐ถ ยท ๐ด)โ†‘2) + ((๐ถ ยท ๐ต)โ†‘2)) โˆ’ (((๐ถ ยท ๐ด)โ†‘2) + ((๐ด ยท ๐ท)โ†‘2))) = (((๐ถ ยท ๐ต)โ†‘2) โˆ’ ((๐ด ยท ๐ท)โ†‘2)))
6310zcnd 9390 . . . . . . . . . . . 12 (๐œ‘ โ†’ ๐ถ โˆˆ โ„‚)
6463, 27sqmuld 10680 . . . . . . . . . . 11 (๐œ‘ โ†’ ((๐ถ ยท ๐ด)โ†‘2) = ((๐ถโ†‘2) ยท (๐ดโ†‘2)))
658zcnd 9390 . . . . . . . . . . . 12 (๐œ‘ โ†’ ๐ต โˆˆ โ„‚)
6663, 65sqmuld 10680 . . . . . . . . . . 11 (๐œ‘ โ†’ ((๐ถ ยท ๐ต)โ†‘2) = ((๐ถโ†‘2) ยท (๐ตโ†‘2)))
6764, 66oveq12d 5906 . . . . . . . . . 10 (๐œ‘ โ†’ (((๐ถ ยท ๐ด)โ†‘2) + ((๐ถ ยท ๐ต)โ†‘2)) = (((๐ถโ†‘2) ยท (๐ดโ†‘2)) + ((๐ถโ†‘2) ยท (๐ตโ†‘2))))
6863sqcld 10666 . . . . . . . . . . 11 (๐œ‘ โ†’ (๐ถโ†‘2) โˆˆ โ„‚)
6953zcnd 9390 . . . . . . . . . . 11 (๐œ‘ โ†’ (๐ดโ†‘2) โˆˆ โ„‚)
7065sqcld 10666 . . . . . . . . . . 11 (๐œ‘ โ†’ (๐ตโ†‘2) โˆˆ โ„‚)
7168, 69, 70adddid 7996 . . . . . . . . . 10 (๐œ‘ โ†’ ((๐ถโ†‘2) ยท ((๐ดโ†‘2) + (๐ตโ†‘2))) = (((๐ถโ†‘2) ยท (๐ดโ†‘2)) + ((๐ถโ†‘2) ยท (๐ตโ†‘2))))
7267, 71eqtr4d 2223 . . . . . . . . 9 (๐œ‘ โ†’ (((๐ถ ยท ๐ด)โ†‘2) + ((๐ถ ยท ๐ต)โ†‘2)) = ((๐ถโ†‘2) ยท ((๐ดโ†‘2) + (๐ตโ†‘2))))
732nncnd 8947 . . . . . . . . . . . . 13 (๐œ‘ โ†’ ๐‘ โˆˆ โ„‚)
7447zcnd 9390 . . . . . . . . . . . . 13 (๐œ‘ โ†’ ๐‘ƒ โˆˆ โ„‚)
7573, 74mulcomd 7993 . . . . . . . . . . . 12 (๐œ‘ โ†’ (๐‘ ยท ๐‘ƒ) = (๐‘ƒ ยท ๐‘))
7614, 75eqtr3d 2222 . . . . . . . . . . 11 (๐œ‘ โ†’ ((๐ดโ†‘2) + (๐ตโ†‘2)) = (๐‘ƒ ยท ๐‘))
7776oveq2d 5904 . . . . . . . . . 10 (๐œ‘ โ†’ ((๐ถโ†‘2) ยท ((๐ดโ†‘2) + (๐ตโ†‘2))) = ((๐ถโ†‘2) ยท (๐‘ƒ ยท ๐‘)))
7868, 74, 73mul12d 8123 . . . . . . . . . 10 (๐œ‘ โ†’ ((๐ถโ†‘2) ยท (๐‘ƒ ยท ๐‘)) = (๐‘ƒ ยท ((๐ถโ†‘2) ยท ๐‘)))
7977, 78eqtrd 2220 . . . . . . . . 9 (๐œ‘ โ†’ ((๐ถโ†‘2) ยท ((๐ดโ†‘2) + (๐ตโ†‘2))) = (๐‘ƒ ยท ((๐ถโ†‘2) ยท ๐‘)))
8072, 79eqtrd 2220 . . . . . . . 8 (๐œ‘ โ†’ (((๐ถ ยท ๐ด)โ†‘2) + ((๐ถ ยท ๐ต)โ†‘2)) = (๐‘ƒ ยท ((๐ถโ†‘2) ยท ๐‘)))
8127, 34sqmuld 10680 . . . . . . . . . . . 12 (๐œ‘ โ†’ ((๐ด ยท ๐ท)โ†‘2) = ((๐ดโ†‘2) ยท (๐ทโ†‘2)))
8234sqcld 10666 . . . . . . . . . . . . 13 (๐œ‘ โ†’ (๐ทโ†‘2) โˆˆ โ„‚)
8369, 82mulcomd 7993 . . . . . . . . . . . 12 (๐œ‘ โ†’ ((๐ดโ†‘2) ยท (๐ทโ†‘2)) = ((๐ทโ†‘2) ยท (๐ดโ†‘2)))
8481, 83eqtrd 2220 . . . . . . . . . . 11 (๐œ‘ โ†’ ((๐ด ยท ๐ท)โ†‘2) = ((๐ทโ†‘2) ยท (๐ดโ†‘2)))
8564, 84oveq12d 5906 . . . . . . . . . 10 (๐œ‘ โ†’ (((๐ถ ยท ๐ด)โ†‘2) + ((๐ด ยท ๐ท)โ†‘2)) = (((๐ถโ†‘2) ยท (๐ดโ†‘2)) + ((๐ทโ†‘2) ยท (๐ดโ†‘2))))
8649zcnd 9390 . . . . . . . . . . 11 (๐œ‘ โ†’ (๐ถโ†‘2) โˆˆ โ„‚)
8786, 82, 69adddird 7997 . . . . . . . . . 10 (๐œ‘ โ†’ (((๐ถโ†‘2) + (๐ทโ†‘2)) ยท (๐ดโ†‘2)) = (((๐ถโ†‘2) ยท (๐ดโ†‘2)) + ((๐ทโ†‘2) ยท (๐ดโ†‘2))))
8885, 87eqtr4d 2223 . . . . . . . . 9 (๐œ‘ โ†’ (((๐ถ ยท ๐ด)โ†‘2) + ((๐ด ยท ๐ท)โ†‘2)) = (((๐ถโ†‘2) + (๐ทโ†‘2)) ยท (๐ดโ†‘2)))
8916oveq1d 5903 . . . . . . . . 9 (๐œ‘ โ†’ (๐‘ƒ ยท (๐ดโ†‘2)) = (((๐ถโ†‘2) + (๐ทโ†‘2)) ยท (๐ดโ†‘2)))
9088, 89eqtr4d 2223 . . . . . . . 8 (๐œ‘ โ†’ (((๐ถ ยท ๐ด)โ†‘2) + ((๐ด ยท ๐ท)โ†‘2)) = (๐‘ƒ ยท (๐ดโ†‘2)))
9180, 90oveq12d 5906 . . . . . . 7 (๐œ‘ โ†’ ((((๐ถ ยท ๐ด)โ†‘2) + ((๐ถ ยท ๐ต)โ†‘2)) โˆ’ (((๐ถ ยท ๐ด)โ†‘2) + ((๐ด ยท ๐ท)โ†‘2))) = ((๐‘ƒ ยท ((๐ถโ†‘2) ยท ๐‘)) โˆ’ (๐‘ƒ ยท (๐ดโ†‘2))))
9251zcnd 9390 . . . . . . . 8 (๐œ‘ โ†’ ((๐ถโ†‘2) ยท ๐‘) โˆˆ โ„‚)
9374, 92, 69subdid 8385 . . . . . . 7 (๐œ‘ โ†’ (๐‘ƒ ยท (((๐ถโ†‘2) ยท ๐‘) โˆ’ (๐ดโ†‘2))) = ((๐‘ƒ ยท ((๐ถโ†‘2) ยท ๐‘)) โˆ’ (๐‘ƒ ยท (๐ดโ†‘2))))
9491, 93eqtr4d 2223 . . . . . 6 (๐œ‘ โ†’ ((((๐ถ ยท ๐ด)โ†‘2) + ((๐ถ ยท ๐ต)โ†‘2)) โˆ’ (((๐ถ ยท ๐ด)โ†‘2) + ((๐ด ยท ๐ท)โ†‘2))) = (๐‘ƒ ยท (((๐ถโ†‘2) ยท ๐‘) โˆ’ (๐ดโ†‘2))))
9562, 94eqtr3d 2222 . . . . 5 (๐œ‘ โ†’ (((๐ถ ยท ๐ต)โ†‘2) โˆ’ ((๐ด ยท ๐ท)โ†‘2)) = (๐‘ƒ ยท (((๐ถโ†‘2) ยท ๐‘) โˆ’ (๐ดโ†‘2))))
96 subsq 10641 . . . . . 6 (((๐ถ ยท ๐ต) โˆˆ โ„‚ โˆง (๐ด ยท ๐ท) โˆˆ โ„‚) โ†’ (((๐ถ ยท ๐ต)โ†‘2) โˆ’ ((๐ด ยท ๐ท)โ†‘2)) = (((๐ถ ยท ๐ต) + (๐ด ยท ๐ท)) ยท ((๐ถ ยท ๐ต) โˆ’ (๐ด ยท ๐ท))))
9738, 40, 96syl2anc 411 . . . . 5 (๐œ‘ โ†’ (((๐ถ ยท ๐ต)โ†‘2) โˆ’ ((๐ด ยท ๐ท)โ†‘2)) = (((๐ถ ยท ๐ต) + (๐ด ยท ๐ท)) ยท ((๐ถ ยท ๐ต) โˆ’ (๐ด ยท ๐ท))))
9895, 97eqtr3d 2222 . . . 4 (๐œ‘ โ†’ (๐‘ƒ ยท (((๐ถโ†‘2) ยท ๐‘) โˆ’ (๐ดโ†‘2))) = (((๐ถ ยท ๐ต) + (๐ด ยท ๐ท)) ยท ((๐ถ ยท ๐ต) โˆ’ (๐ด ยท ๐ท))))
9956, 98breqtrd 4041 . . 3 (๐œ‘ โ†’ ๐‘ƒ โˆฅ (((๐ถ ยท ๐ต) + (๐ด ยท ๐ท)) ยท ((๐ถ ยท ๐ต) โˆ’ (๐ด ยท ๐ท))))
10037, 39zaddcld 9393 . . . 4 (๐œ‘ โ†’ ((๐ถ ยท ๐ต) + (๐ด ยท ๐ท)) โˆˆ โ„ค)
10137, 39zsubcld 9394 . . . 4 (๐œ‘ โ†’ ((๐ถ ยท ๐ต) โˆ’ (๐ด ยท ๐ท)) โˆˆ โ„ค)
102 euclemma 12160 . . . 4 ((๐‘ƒ โˆˆ โ„™ โˆง ((๐ถ ยท ๐ต) + (๐ด ยท ๐ท)) โˆˆ โ„ค โˆง ((๐ถ ยท ๐ต) โˆ’ (๐ด ยท ๐ท)) โˆˆ โ„ค) โ†’ (๐‘ƒ โˆฅ (((๐ถ ยท ๐ต) + (๐ด ยท ๐ท)) ยท ((๐ถ ยท ๐ต) โˆ’ (๐ด ยท ๐ท))) โ†” (๐‘ƒ โˆฅ ((๐ถ ยท ๐ต) + (๐ด ยท ๐ท)) โˆจ ๐‘ƒ โˆฅ ((๐ถ ยท ๐ต) โˆ’ (๐ด ยท ๐ท)))))
1034, 100, 101, 102syl3anc 1248 . . 3 (๐œ‘ โ†’ (๐‘ƒ โˆฅ (((๐ถ ยท ๐ต) + (๐ด ยท ๐ท)) ยท ((๐ถ ยท ๐ต) โˆ’ (๐ด ยท ๐ท))) โ†” (๐‘ƒ โˆฅ ((๐ถ ยท ๐ต) + (๐ด ยท ๐ท)) โˆจ ๐‘ƒ โˆฅ ((๐ถ ยท ๐ต) โˆ’ (๐ด ยท ๐ท)))))
10499, 103mpbid 147 . 2 (๐œ‘ โ†’ (๐‘ƒ โˆฅ ((๐ถ ยท ๐ต) + (๐ด ยท ๐ท)) โˆจ ๐‘ƒ โˆฅ ((๐ถ ยท ๐ต) โˆ’ (๐ด ยท ๐ท))))
10519, 45, 104mpjaodan 799 1 (๐œ‘ โ†’ ๐‘ โˆˆ ๐‘†)
Colors of variables: wff set class
Syntax hints:   โ†’ wi 4   โˆง wa 104   โ†” wb 105   โˆจ wo 709   = wceq 1363   โˆˆ wcel 2158   class class class wbr 4015   โ†ฆ cmpt 4076  ran crn 4639  โ€˜cfv 5228  (class class class)co 5888  โ„‚cc 7823   + caddc 7828   ยท cmul 7830   โˆ’ cmin 8142  -cneg 8143  โ„•cn 8933  2c2 8984  โ„คcz 9267  โ†‘cexp 10533  abscabs 11020   โˆฅ cdvds 11808  โ„™cprime 12121  โ„ค[i]cgz 12381
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 615  ax-in2 616  ax-io 710  ax-5 1457  ax-7 1458  ax-gen 1459  ax-ie1 1503  ax-ie2 1504  ax-8 1514  ax-10 1515  ax-11 1516  ax-i12 1517  ax-bndl 1519  ax-4 1520  ax-17 1536  ax-i9 1540  ax-ial 1544  ax-i5r 1545  ax-13 2160  ax-14 2161  ax-ext 2169  ax-coll 4130  ax-sep 4133  ax-nul 4141  ax-pow 4186  ax-pr 4221  ax-un 4445  ax-setind 4548  ax-iinf 4599  ax-cnex 7916  ax-resscn 7917  ax-1cn 7918  ax-1re 7919  ax-icn 7920  ax-addcl 7921  ax-addrcl 7922  ax-mulcl 7923  ax-mulrcl 7924  ax-addcom 7925  ax-mulcom 7926  ax-addass 7927  ax-mulass 7928  ax-distr 7929  ax-i2m1 7930  ax-0lt1 7931  ax-1rid 7932  ax-0id 7933  ax-rnegex 7934  ax-precex 7935  ax-cnre 7936  ax-pre-ltirr 7937  ax-pre-ltwlin 7938  ax-pre-lttrn 7939  ax-pre-apti 7940  ax-pre-ltadd 7941  ax-pre-mulgt0 7942  ax-pre-mulext 7943  ax-arch 7944  ax-caucvg 7945
This theorem depends on definitions:  df-bi 117  df-dc 836  df-3or 980  df-3an 981  df-tru 1366  df-fal 1369  df-nf 1471  df-sb 1773  df-eu 2039  df-mo 2040  df-clab 2174  df-cleq 2180  df-clel 2183  df-nfc 2318  df-ne 2358  df-nel 2453  df-ral 2470  df-rex 2471  df-reu 2472  df-rmo 2473  df-rab 2474  df-v 2751  df-sbc 2975  df-csb 3070  df-dif 3143  df-un 3145  df-in 3147  df-ss 3154  df-nul 3435  df-if 3547  df-pw 3589  df-sn 3610  df-pr 3611  df-op 3613  df-uni 3822  df-int 3857  df-iun 3900  df-br 4016  df-opab 4077  df-mpt 4078  df-tr 4114  df-id 4305  df-po 4308  df-iso 4309  df-iord 4378  df-on 4380  df-ilim 4381  df-suc 4383  df-iom 4602  df-xp 4644  df-rel 4645  df-cnv 4646  df-co 4647  df-dm 4648  df-rn 4649  df-res 4650  df-ima 4651  df-iota 5190  df-fun 5230  df-fn 5231  df-f 5232  df-f1 5233  df-fo 5234  df-f1o 5235  df-fv 5236  df-riota 5844  df-ov 5891  df-oprab 5892  df-mpo 5893  df-1st 6155  df-2nd 6156  df-recs 6320  df-frec 6406  df-1o 6431  df-2o 6432  df-er 6549  df-en 6755  df-sup 6997  df-pnf 8008  df-mnf 8009  df-xr 8010  df-ltxr 8011  df-le 8012  df-sub 8144  df-neg 8145  df-reap 8546  df-ap 8553  df-div 8644  df-inn 8934  df-2 8992  df-3 8993  df-4 8994  df-n0 9191  df-z 9268  df-uz 9543  df-q 9634  df-rp 9668  df-fz 10023  df-fzo 10157  df-fl 10284  df-mod 10337  df-seqfrec 10460  df-exp 10534  df-cj 10865  df-re 10866  df-im 10867  df-rsqrt 11021  df-abs 11022  df-dvds 11809  df-gcd 11958  df-prm 12122  df-gz 12382
This theorem is referenced by:  2sqlem5  14762
  Copyright terms: Public domain W3C validator