Users' Mathboxes Mathbox for Stefan O'Rear < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  pellex Structured version   Visualization version   GIF version

Theorem pellex 42038
Description: Every Pell equation has a nontrivial solution. Theorem 62 in [vandenDries] p. 43. (Contributed by Stefan O'Rear, 19-Oct-2014.)
Assertion
Ref Expression
pellex ((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โ†’ โˆƒ๐‘ฅ โˆˆ โ„• โˆƒ๐‘ฆ โˆˆ โ„• ((๐‘ฅโ†‘2) โˆ’ (๐ท ยท (๐‘ฆโ†‘2))) = 1)
Distinct variable group:   ๐‘ฅ,๐ท,๐‘ฆ

Proof of Theorem pellex
Dummy variables ๐‘Ž ๐‘ ๐‘ ๐‘‘ ๐‘’ ๐‘“ ๐‘” are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 fzfi 13944 . . . . . . . 8 (0...((absโ€˜๐‘Ž) โˆ’ 1)) โˆˆ Fin
2 xpfi 9323 . . . . . . . 8 (((0...((absโ€˜๐‘Ž) โˆ’ 1)) โˆˆ Fin โˆง (0...((absโ€˜๐‘Ž) โˆ’ 1)) โˆˆ Fin) โ†’ ((0...((absโ€˜๐‘Ž) โˆ’ 1)) ร— (0...((absโ€˜๐‘Ž) โˆ’ 1))) โˆˆ Fin)
31, 1, 2mp2an 689 . . . . . . 7 ((0...((absโ€˜๐‘Ž) โˆ’ 1)) ร— (0...((absโ€˜๐‘Ž) โˆ’ 1))) โˆˆ Fin
4 isfinite 9653 . . . . . . 7 (((0...((absโ€˜๐‘Ž) โˆ’ 1)) ร— (0...((absโ€˜๐‘Ž) โˆ’ 1))) โˆˆ Fin โ†” ((0...((absโ€˜๐‘Ž) โˆ’ 1)) ร— (0...((absโ€˜๐‘Ž) โˆ’ 1))) โ‰บ ฯ‰)
53, 4mpbi 229 . . . . . 6 ((0...((absโ€˜๐‘Ž) โˆ’ 1)) ร— (0...((absโ€˜๐‘Ž) โˆ’ 1))) โ‰บ ฯ‰
6 nnenom 13952 . . . . . . 7 โ„• โ‰ˆ ฯ‰
76ensymi 9006 . . . . . 6 ฯ‰ โ‰ˆ โ„•
8 sdomentr 9117 . . . . . 6 ((((0...((absโ€˜๐‘Ž) โˆ’ 1)) ร— (0...((absโ€˜๐‘Ž) โˆ’ 1))) โ‰บ ฯ‰ โˆง ฯ‰ โ‰ˆ โ„•) โ†’ ((0...((absโ€˜๐‘Ž) โˆ’ 1)) ร— (0...((absโ€˜๐‘Ž) โˆ’ 1))) โ‰บ โ„•)
95, 7, 8mp2an 689 . . . . 5 ((0...((absโ€˜๐‘Ž) โˆ’ 1)) ร— (0...((absโ€˜๐‘Ž) โˆ’ 1))) โ‰บ โ„•
10 ensym 9005 . . . . . 6 ({โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)} โ‰ˆ โ„• โ†’ โ„• โ‰ˆ {โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)})
1110ad2antll 726 . . . . 5 ((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง (๐‘Ž โ‰  0 โˆง {โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)} โ‰ˆ โ„•)) โ†’ โ„• โ‰ˆ {โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)})
12 sdomentr 9117 . . . . 5 ((((0...((absโ€˜๐‘Ž) โˆ’ 1)) ร— (0...((absโ€˜๐‘Ž) โˆ’ 1))) โ‰บ โ„• โˆง โ„• โ‰ˆ {โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)}) โ†’ ((0...((absโ€˜๐‘Ž) โˆ’ 1)) ร— (0...((absโ€˜๐‘Ž) โˆ’ 1))) โ‰บ {โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)})
139, 11, 12sylancr 586 . . . 4 ((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง (๐‘Ž โ‰  0 โˆง {โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)} โ‰ˆ โ„•)) โ†’ ((0...((absโ€˜๐‘Ž) โˆ’ 1)) ร— (0...((absโ€˜๐‘Ž) โˆ’ 1))) โ‰บ {โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)})
14 opabssxp 5768 . . . . . . . 8 {โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)} โІ (โ„• ร— โ„•)
1514sseli 3978 . . . . . . 7 (๐‘‘ โˆˆ {โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)} โ†’ ๐‘‘ โˆˆ (โ„• ร— โ„•))
16 simprrl 778 . . . . . . . . . . . 12 (((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ โˆˆ (V ร— V) โˆง ((1st โ€˜๐‘‘) โˆˆ โ„• โˆง (2nd โ€˜๐‘‘) โˆˆ โ„•))) โ†’ (1st โ€˜๐‘‘) โˆˆ โ„•)
1716nnzd 12592 . . . . . . . . . . 11 (((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ โˆˆ (V ร— V) โˆง ((1st โ€˜๐‘‘) โˆˆ โ„• โˆง (2nd โ€˜๐‘‘) โˆˆ โ„•))) โ†’ (1st โ€˜๐‘‘) โˆˆ โ„ค)
18 simpllr 773 . . . . . . . . . . . 12 (((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ โˆˆ (V ร— V) โˆง ((1st โ€˜๐‘‘) โˆˆ โ„• โˆง (2nd โ€˜๐‘‘) โˆˆ โ„•))) โ†’ ๐‘Ž โˆˆ โ„ค)
19 simplr 766 . . . . . . . . . . . 12 (((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ โˆˆ (V ร— V) โˆง ((1st โ€˜๐‘‘) โˆˆ โ„• โˆง (2nd โ€˜๐‘‘) โˆˆ โ„•))) โ†’ ๐‘Ž โ‰  0)
20 nnabscl 15279 . . . . . . . . . . . 12 ((๐‘Ž โˆˆ โ„ค โˆง ๐‘Ž โ‰  0) โ†’ (absโ€˜๐‘Ž) โˆˆ โ„•)
2118, 19, 20syl2anc 583 . . . . . . . . . . 11 (((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ โˆˆ (V ร— V) โˆง ((1st โ€˜๐‘‘) โˆˆ โ„• โˆง (2nd โ€˜๐‘‘) โˆˆ โ„•))) โ†’ (absโ€˜๐‘Ž) โˆˆ โ„•)
22 zmodfz 13865 . . . . . . . . . . 11 (((1st โ€˜๐‘‘) โˆˆ โ„ค โˆง (absโ€˜๐‘Ž) โˆˆ โ„•) โ†’ ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) โˆˆ (0...((absโ€˜๐‘Ž) โˆ’ 1)))
2317, 21, 22syl2anc 583 . . . . . . . . . 10 (((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ โˆˆ (V ร— V) โˆง ((1st โ€˜๐‘‘) โˆˆ โ„• โˆง (2nd โ€˜๐‘‘) โˆˆ โ„•))) โ†’ ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) โˆˆ (0...((absโ€˜๐‘Ž) โˆ’ 1)))
24 simprrr 779 . . . . . . . . . . . 12 (((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ โˆˆ (V ร— V) โˆง ((1st โ€˜๐‘‘) โˆˆ โ„• โˆง (2nd โ€˜๐‘‘) โˆˆ โ„•))) โ†’ (2nd โ€˜๐‘‘) โˆˆ โ„•)
2524nnzd 12592 . . . . . . . . . . 11 (((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ โˆˆ (V ร— V) โˆง ((1st โ€˜๐‘‘) โˆˆ โ„• โˆง (2nd โ€˜๐‘‘) โˆˆ โ„•))) โ†’ (2nd โ€˜๐‘‘) โˆˆ โ„ค)
26 zmodfz 13865 . . . . . . . . . . 11 (((2nd โ€˜๐‘‘) โˆˆ โ„ค โˆง (absโ€˜๐‘Ž) โˆˆ โ„•) โ†’ ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) โˆˆ (0...((absโ€˜๐‘Ž) โˆ’ 1)))
2725, 21, 26syl2anc 583 . . . . . . . . . 10 (((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ โˆˆ (V ร— V) โˆง ((1st โ€˜๐‘‘) โˆˆ โ„• โˆง (2nd โ€˜๐‘‘) โˆˆ โ„•))) โ†’ ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) โˆˆ (0...((absโ€˜๐‘Ž) โˆ’ 1)))
2823, 27jca 511 . . . . . . . . 9 (((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ โˆˆ (V ร— V) โˆง ((1st โ€˜๐‘‘) โˆˆ โ„• โˆง (2nd โ€˜๐‘‘) โˆˆ โ„•))) โ†’ (((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) โˆˆ (0...((absโ€˜๐‘Ž) โˆ’ 1)) โˆง ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) โˆˆ (0...((absโ€˜๐‘Ž) โˆ’ 1))))
2928ex 412 . . . . . . . 8 ((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โ†’ ((๐‘‘ โˆˆ (V ร— V) โˆง ((1st โ€˜๐‘‘) โˆˆ โ„• โˆง (2nd โ€˜๐‘‘) โˆˆ โ„•)) โ†’ (((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) โˆˆ (0...((absโ€˜๐‘Ž) โˆ’ 1)) โˆง ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) โˆˆ (0...((absโ€˜๐‘Ž) โˆ’ 1)))))
30 elxp7 8014 . . . . . . . 8 (๐‘‘ โˆˆ (โ„• ร— โ„•) โ†” (๐‘‘ โˆˆ (V ร— V) โˆง ((1st โ€˜๐‘‘) โˆˆ โ„• โˆง (2nd โ€˜๐‘‘) โˆˆ โ„•)))
31 opelxp 5712 . . . . . . . 8 (โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ โˆˆ ((0...((absโ€˜๐‘Ž) โˆ’ 1)) ร— (0...((absโ€˜๐‘Ž) โˆ’ 1))) โ†” (((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) โˆˆ (0...((absโ€˜๐‘Ž) โˆ’ 1)) โˆง ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) โˆˆ (0...((absโ€˜๐‘Ž) โˆ’ 1))))
3229, 30, 313imtr4g 296 . . . . . . 7 ((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โ†’ (๐‘‘ โˆˆ (โ„• ร— โ„•) โ†’ โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ โˆˆ ((0...((absโ€˜๐‘Ž) โˆ’ 1)) ร— (0...((absโ€˜๐‘Ž) โˆ’ 1)))))
3315, 32syl5 34 . . . . . 6 ((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โ†’ (๐‘‘ โˆˆ {โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)} โ†’ โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ โˆˆ ((0...((absโ€˜๐‘Ž) โˆ’ 1)) ร— (0...((absโ€˜๐‘Ž) โˆ’ 1)))))
3433imp 406 . . . . 5 (((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง ๐‘‘ โˆˆ {โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)}) โ†’ โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ โˆˆ ((0...((absโ€˜๐‘Ž) โˆ’ 1)) ร— (0...((absโ€˜๐‘Ž) โˆ’ 1))))
3534adantlrr 718 . . . 4 (((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง (๐‘Ž โ‰  0 โˆง {โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)} โ‰ˆ โ„•)) โˆง ๐‘‘ โˆˆ {โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)}) โ†’ โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ โˆˆ ((0...((absโ€˜๐‘Ž) โˆ’ 1)) ร— (0...((absโ€˜๐‘Ž) โˆ’ 1))))
36 fveq2 6891 . . . . . 6 (๐‘‘ = ๐‘’ โ†’ (1st โ€˜๐‘‘) = (1st โ€˜๐‘’))
3736oveq1d 7427 . . . . 5 (๐‘‘ = ๐‘’ โ†’ ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)))
38 fveq2 6891 . . . . . 6 (๐‘‘ = ๐‘’ โ†’ (2nd โ€˜๐‘‘) = (2nd โ€˜๐‘’))
3938oveq1d 7427 . . . . 5 (๐‘‘ = ๐‘’ โ†’ ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž)))
4037, 39opeq12d 4881 . . . 4 (๐‘‘ = ๐‘’ โ†’ โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ)
4113, 35, 40fphpd 42019 . . 3 ((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง (๐‘Ž โ‰  0 โˆง {โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)} โ‰ˆ โ„•)) โ†’ โˆƒ๐‘‘ โˆˆ {โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)}โˆƒ๐‘’ โˆˆ {โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)} (๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ))
42 eleq1w 2815 . . . . . . . . . . . 12 (๐‘ = ๐‘“ โ†’ (๐‘ โˆˆ โ„• โ†” ๐‘“ โˆˆ โ„•))
43 eleq1w 2815 . . . . . . . . . . . 12 (๐‘ = ๐‘” โ†’ (๐‘ โˆˆ โ„• โ†” ๐‘” โˆˆ โ„•))
4442, 43bi2anan9 636 . . . . . . . . . . 11 ((๐‘ = ๐‘“ โˆง ๐‘ = ๐‘”) โ†’ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โ†” (๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•)))
45 oveq1 7419 . . . . . . . . . . . . 13 (๐‘ = ๐‘“ โ†’ (๐‘โ†‘2) = (๐‘“โ†‘2))
46 oveq1 7419 . . . . . . . . . . . . . 14 (๐‘ = ๐‘” โ†’ (๐‘โ†‘2) = (๐‘”โ†‘2))
4746oveq2d 7428 . . . . . . . . . . . . 13 (๐‘ = ๐‘” โ†’ (๐ท ยท (๐‘โ†‘2)) = (๐ท ยท (๐‘”โ†‘2)))
4845, 47oveqan12d 7431 . . . . . . . . . . . 12 ((๐‘ = ๐‘“ โˆง ๐‘ = ๐‘”) โ†’ ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))))
4948eqeq1d 2733 . . . . . . . . . . 11 ((๐‘ = ๐‘“ โˆง ๐‘ = ๐‘”) โ†’ (((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž โ†” ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž))
5044, 49anbi12d 630 . . . . . . . . . 10 ((๐‘ = ๐‘“ โˆง ๐‘ = ๐‘”) โ†’ (((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž) โ†” ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)))
5150cbvopabv 5221 . . . . . . . . 9 {โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)} = {โŸจ๐‘“, ๐‘”โŸฉ โˆฃ ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)}
5251eleq2i 2824 . . . . . . . 8 (๐‘’ โˆˆ {โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)} โ†” ๐‘’ โˆˆ {โŸจ๐‘“, ๐‘”โŸฉ โˆฃ ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)})
5352biimpi 215 . . . . . . 7 (๐‘’ โˆˆ {โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)} โ†’ ๐‘’ โˆˆ {โŸจ๐‘“, ๐‘”โŸฉ โˆฃ ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)})
54 elopab 5527 . . . . . . . . 9 (๐‘‘ โˆˆ {โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)} โ†” โˆƒ๐‘โˆƒ๐‘(๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)))
55 elopab 5527 . . . . . . . . . . . 12 (๐‘’ โˆˆ {โŸจ๐‘“, ๐‘”โŸฉ โˆฃ ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)} โ†” โˆƒ๐‘“โˆƒ๐‘”(๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ โˆง ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)))
56 simp3ll 1243 . . . . . . . . . . . . . . . . 17 (((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง ๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)) โ†’ ๐‘ โˆˆ โ„•)
57563expb 1119 . . . . . . . . . . . . . . . 16 (((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž))) โ†’ ๐‘ โˆˆ โ„•)
58573ad2ant1 1132 . . . . . . . . . . . . . . 15 ((((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž))) โˆง (๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ โˆง ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)) โˆง (๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ)) โ†’ ๐‘ โˆˆ โ„•)
59 simp3lr 1244 . . . . . . . . . . . . . . . . 17 (((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง ๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)) โ†’ ๐‘ โˆˆ โ„•)
60593expb 1119 . . . . . . . . . . . . . . . 16 (((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž))) โ†’ ๐‘ โˆˆ โ„•)
61603ad2ant1 1132 . . . . . . . . . . . . . . 15 ((((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž))) โˆง (๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ โˆง ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)) โˆง (๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ)) โ†’ ๐‘ โˆˆ โ„•)
62 simp1lr 1236 . . . . . . . . . . . . . . . 16 (((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ โˆง ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)) โˆง (๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ)) โ†’ ๐‘Ž โˆˆ โ„ค)
63623adant1r 1176 . . . . . . . . . . . . . . 15 ((((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž))) โˆง (๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ โˆง ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)) โˆง (๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ)) โ†’ ๐‘Ž โˆˆ โ„ค)
64 simp-4l 780 . . . . . . . . . . . . . . . 16 (((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž))) โ†’ ๐ท โˆˆ โ„•)
65643ad2ant1 1132 . . . . . . . . . . . . . . 15 ((((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž))) โˆง (๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ โˆง ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)) โˆง (๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ)) โ†’ ๐ท โˆˆ โ„•)
66 simp-4r 781 . . . . . . . . . . . . . . . 16 (((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž))) โ†’ ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š)
67663ad2ant1 1132 . . . . . . . . . . . . . . 15 ((((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž))) โˆง (๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ โˆง ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)) โˆง (๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ)) โ†’ ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š)
68 simp2ll 1239 . . . . . . . . . . . . . . . 16 ((((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž))) โˆง ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž) โˆง (๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ)) โ†’ ๐‘“ โˆˆ โ„•)
69683adant2l 1177 . . . . . . . . . . . . . . 15 ((((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž))) โˆง (๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ โˆง ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)) โˆง (๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ)) โ†’ ๐‘“ โˆˆ โ„•)
70 simp2lr 1240 . . . . . . . . . . . . . . . 16 ((((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž))) โˆง ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž) โˆง (๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ)) โ†’ ๐‘” โˆˆ โ„•)
71703adant2l 1177 . . . . . . . . . . . . . . 15 ((((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž))) โˆง (๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ โˆง ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)) โˆง (๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ)) โ†’ ๐‘” โˆˆ โ„•)
72 simp2l 1198 . . . . . . . . . . . . . . . 16 ((((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž))) โˆง (๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ โˆง ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)) โˆง (๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ)) โ†’ ๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ)
73 simp1rl 1237 . . . . . . . . . . . . . . . 16 ((((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž))) โˆง (๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ โˆง ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)) โˆง (๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ)) โ†’ ๐‘‘ = โŸจ๐‘, ๐‘โŸฉ)
74 simp3l 1200 . . . . . . . . . . . . . . . 16 ((((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž))) โˆง (๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ โˆง ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)) โˆง (๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ)) โ†’ ๐‘‘ โ‰  ๐‘’)
75 simp3 1137 . . . . . . . . . . . . . . . . . 18 ((๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ โˆง ๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ๐‘‘ โ‰  ๐‘’) โ†’ ๐‘‘ โ‰  ๐‘’)
76 simp2 1136 . . . . . . . . . . . . . . . . . 18 ((๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ โˆง ๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ๐‘‘ โ‰  ๐‘’) โ†’ ๐‘‘ = โŸจ๐‘, ๐‘โŸฉ)
77 simp1 1135 . . . . . . . . . . . . . . . . . 18 ((๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ โˆง ๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ๐‘‘ โ‰  ๐‘’) โ†’ ๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ)
7875, 76, 773netr3d 3016 . . . . . . . . . . . . . . . . 17 ((๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ โˆง ๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ๐‘‘ โ‰  ๐‘’) โ†’ โŸจ๐‘, ๐‘โŸฉ โ‰  โŸจ๐‘“, ๐‘”โŸฉ)
79 vex 3477 . . . . . . . . . . . . . . . . . . 19 ๐‘ โˆˆ V
80 vex 3477 . . . . . . . . . . . . . . . . . . 19 ๐‘ โˆˆ V
8179, 80opth 5476 . . . . . . . . . . . . . . . . . 18 (โŸจ๐‘, ๐‘โŸฉ = โŸจ๐‘“, ๐‘”โŸฉ โ†” (๐‘ = ๐‘“ โˆง ๐‘ = ๐‘”))
8281necon3abii 2986 . . . . . . . . . . . . . . . . 17 (โŸจ๐‘, ๐‘โŸฉ โ‰  โŸจ๐‘“, ๐‘”โŸฉ โ†” ยฌ (๐‘ = ๐‘“ โˆง ๐‘ = ๐‘”))
8378, 82sylib 217 . . . . . . . . . . . . . . . 16 ((๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ โˆง ๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ๐‘‘ โ‰  ๐‘’) โ†’ ยฌ (๐‘ = ๐‘“ โˆง ๐‘ = ๐‘”))
8472, 73, 74, 83syl3anc 1370 . . . . . . . . . . . . . . 15 ((((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž))) โˆง (๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ โˆง ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)) โˆง (๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ)) โ†’ ยฌ (๐‘ = ๐‘“ โˆง ๐‘ = ๐‘”))
85 simp1lr 1236 . . . . . . . . . . . . . . 15 ((((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž))) โˆง (๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ โˆง ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)) โˆง (๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ)) โ†’ ๐‘Ž โ‰  0)
86 simp1rr 1238 . . . . . . . . . . . . . . . 16 (((๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)) โˆง (๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ โˆง ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)) โˆง (๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ)) โ†’ ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)
87863adant1l 1175 . . . . . . . . . . . . . . 15 ((((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž))) โˆง (๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ โˆง ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)) โˆง (๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ)) โ†’ ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)
88 simp2rr 1242 . . . . . . . . . . . . . . 15 ((((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž))) โˆง (๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ โˆง ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)) โˆง (๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ)) โ†’ ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)
89 simp3r 1201 . . . . . . . . . . . . . . . . 17 ((((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž))) โˆง (๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ โˆง ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)) โˆง (๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ)) โ†’ โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ)
90 simp3 1137 . . . . . . . . . . . . . . . . . . 19 ((๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ) โ†’ โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ)
91 ovex 7445 . . . . . . . . . . . . . . . . . . . 20 ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) โˆˆ V
92 ovex 7445 . . . . . . . . . . . . . . . . . . . 20 ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) โˆˆ V
9391, 92opth 5476 . . . . . . . . . . . . . . . . . . 19 (โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ โ†” (((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)) โˆง ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))))
9490, 93sylib 217 . . . . . . . . . . . . . . . . . 18 ((๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ) โ†’ (((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)) โˆง ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))))
95 simprl 768 . . . . . . . . . . . . . . . . . . . . . 22 (((๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ) โˆง (((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)) โˆง ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž)))) โ†’ ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)))
96 simpll 764 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ) โˆง (((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)) โˆง ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž)))) โ†’ ๐‘‘ = โŸจ๐‘, ๐‘โŸฉ)
9796fveq2d 6895 . . . . . . . . . . . . . . . . . . . . . . . 24 (((๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ) โˆง (((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)) โˆง ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž)))) โ†’ (1st โ€˜๐‘‘) = (1st โ€˜โŸจ๐‘, ๐‘โŸฉ))
9879, 80op1st 7987 . . . . . . . . . . . . . . . . . . . . . . . 24 (1st โ€˜โŸจ๐‘, ๐‘โŸฉ) = ๐‘
9997, 98eqtrdi 2787 . . . . . . . . . . . . . . . . . . . . . . 23 (((๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ) โˆง (((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)) โˆง ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž)))) โ†’ (1st โ€˜๐‘‘) = ๐‘)
10099oveq1d 7427 . . . . . . . . . . . . . . . . . . . . . 22 (((๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ) โˆง (((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)) โˆง ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž)))) โ†’ ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = (๐‘ mod (absโ€˜๐‘Ž)))
101 simplr 766 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ) โˆง (((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)) โˆง ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž)))) โ†’ ๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ)
102101fveq2d 6895 . . . . . . . . . . . . . . . . . . . . . . . 24 (((๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ) โˆง (((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)) โˆง ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž)))) โ†’ (1st โ€˜๐‘’) = (1st โ€˜โŸจ๐‘“, ๐‘”โŸฉ))
103 vex 3477 . . . . . . . . . . . . . . . . . . . . . . . . 25 ๐‘“ โˆˆ V
104 vex 3477 . . . . . . . . . . . . . . . . . . . . . . . . 25 ๐‘” โˆˆ V
105103, 104op1st 7987 . . . . . . . . . . . . . . . . . . . . . . . 24 (1st โ€˜โŸจ๐‘“, ๐‘”โŸฉ) = ๐‘“
106102, 105eqtrdi 2787 . . . . . . . . . . . . . . . . . . . . . . 23 (((๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ) โˆง (((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)) โˆง ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž)))) โ†’ (1st โ€˜๐‘’) = ๐‘“)
107106oveq1d 7427 . . . . . . . . . . . . . . . . . . . . . 22 (((๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ) โˆง (((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)) โˆง ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž)))) โ†’ ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)) = (๐‘“ mod (absโ€˜๐‘Ž)))
10895, 100, 1073eqtr3d 2779 . . . . . . . . . . . . . . . . . . . . 21 (((๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ) โˆง (((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)) โˆง ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž)))) โ†’ (๐‘ mod (absโ€˜๐‘Ž)) = (๐‘“ mod (absโ€˜๐‘Ž)))
109 simprr 770 . . . . . . . . . . . . . . . . . . . . . 22 (((๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ) โˆง (((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)) โˆง ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž)))) โ†’ ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž)))
11096fveq2d 6895 . . . . . . . . . . . . . . . . . . . . . . . 24 (((๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ) โˆง (((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)) โˆง ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž)))) โ†’ (2nd โ€˜๐‘‘) = (2nd โ€˜โŸจ๐‘, ๐‘โŸฉ))
11179, 80op2nd 7988 . . . . . . . . . . . . . . . . . . . . . . . 24 (2nd โ€˜โŸจ๐‘, ๐‘โŸฉ) = ๐‘
112110, 111eqtrdi 2787 . . . . . . . . . . . . . . . . . . . . . . 23 (((๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ) โˆง (((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)) โˆง ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž)))) โ†’ (2nd โ€˜๐‘‘) = ๐‘)
113112oveq1d 7427 . . . . . . . . . . . . . . . . . . . . . 22 (((๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ) โˆง (((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)) โˆง ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž)))) โ†’ ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = (๐‘ mod (absโ€˜๐‘Ž)))
114101fveq2d 6895 . . . . . . . . . . . . . . . . . . . . . . . 24 (((๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ) โˆง (((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)) โˆง ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž)))) โ†’ (2nd โ€˜๐‘’) = (2nd โ€˜โŸจ๐‘“, ๐‘”โŸฉ))
115103, 104op2nd 7988 . . . . . . . . . . . . . . . . . . . . . . . 24 (2nd โ€˜โŸจ๐‘“, ๐‘”โŸฉ) = ๐‘”
116114, 115eqtrdi 2787 . . . . . . . . . . . . . . . . . . . . . . 23 (((๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ) โˆง (((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)) โˆง ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž)))) โ†’ (2nd โ€˜๐‘’) = ๐‘”)
117116oveq1d 7427 . . . . . . . . . . . . . . . . . . . . . 22 (((๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ) โˆง (((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)) โˆง ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž)))) โ†’ ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž)) = (๐‘” mod (absโ€˜๐‘Ž)))
118109, 113, 1173eqtr3d 2779 . . . . . . . . . . . . . . . . . . . . 21 (((๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ) โˆง (((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)) โˆง ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž)))) โ†’ (๐‘ mod (absโ€˜๐‘Ž)) = (๐‘” mod (absโ€˜๐‘Ž)))
119108, 118jca 511 . . . . . . . . . . . . . . . . . . . 20 (((๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ) โˆง (((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)) โˆง ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž)))) โ†’ ((๐‘ mod (absโ€˜๐‘Ž)) = (๐‘“ mod (absโ€˜๐‘Ž)) โˆง (๐‘ mod (absโ€˜๐‘Ž)) = (๐‘” mod (absโ€˜๐‘Ž))))
120119ex 412 . . . . . . . . . . . . . . . . . . 19 ((๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ) โ†’ ((((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)) โˆง ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))) โ†’ ((๐‘ mod (absโ€˜๐‘Ž)) = (๐‘“ mod (absโ€˜๐‘Ž)) โˆง (๐‘ mod (absโ€˜๐‘Ž)) = (๐‘” mod (absโ€˜๐‘Ž)))))
1211203adant3 1131 . . . . . . . . . . . . . . . . . 18 ((๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ) โ†’ ((((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)) โˆง ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž)) = ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))) โ†’ ((๐‘ mod (absโ€˜๐‘Ž)) = (๐‘“ mod (absโ€˜๐‘Ž)) โˆง (๐‘ mod (absโ€˜๐‘Ž)) = (๐‘” mod (absโ€˜๐‘Ž)))))
12294, 121mpd 15 . . . . . . . . . . . . . . . . 17 ((๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ) โ†’ ((๐‘ mod (absโ€˜๐‘Ž)) = (๐‘“ mod (absโ€˜๐‘Ž)) โˆง (๐‘ mod (absโ€˜๐‘Ž)) = (๐‘” mod (absโ€˜๐‘Ž))))
12373, 72, 89, 122syl3anc 1370 . . . . . . . . . . . . . . . 16 ((((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž))) โˆง (๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ โˆง ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)) โˆง (๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ)) โ†’ ((๐‘ mod (absโ€˜๐‘Ž)) = (๐‘“ mod (absโ€˜๐‘Ž)) โˆง (๐‘ mod (absโ€˜๐‘Ž)) = (๐‘” mod (absโ€˜๐‘Ž))))
124123simpld 494 . . . . . . . . . . . . . . 15 ((((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž))) โˆง (๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ โˆง ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)) โˆง (๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ)) โ†’ (๐‘ mod (absโ€˜๐‘Ž)) = (๐‘“ mod (absโ€˜๐‘Ž)))
125123simprd 495 . . . . . . . . . . . . . . 15 ((((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž))) โˆง (๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ โˆง ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)) โˆง (๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ)) โ†’ (๐‘ mod (absโ€˜๐‘Ž)) = (๐‘” mod (absโ€˜๐‘Ž)))
12658, 61, 63, 65, 67, 69, 71, 84, 85, 87, 88, 124, 125pellexlem6 42037 . . . . . . . . . . . . . 14 ((((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž))) โˆง (๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ โˆง ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)) โˆง (๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ)) โ†’ โˆƒ๐‘ฅ โˆˆ โ„• โˆƒ๐‘ฆ โˆˆ โ„• ((๐‘ฅโ†‘2) โˆ’ (๐ท ยท (๐‘ฆโ†‘2))) = 1)
1271263exp 1118 . . . . . . . . . . . . 13 (((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž))) โ†’ ((๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ โˆง ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)) โ†’ ((๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ) โ†’ โˆƒ๐‘ฅ โˆˆ โ„• โˆƒ๐‘ฆ โˆˆ โ„• ((๐‘ฅโ†‘2) โˆ’ (๐ท ยท (๐‘ฆโ†‘2))) = 1)))
128127exlimdvv 1936 . . . . . . . . . . . 12 (((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž))) โ†’ (โˆƒ๐‘“โˆƒ๐‘”(๐‘’ = โŸจ๐‘“, ๐‘”โŸฉ โˆง ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)) โ†’ ((๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ) โ†’ โˆƒ๐‘ฅ โˆˆ โ„• โˆƒ๐‘ฆ โˆˆ โ„• ((๐‘ฅโ†‘2) โˆ’ (๐ท ยท (๐‘ฆโ†‘2))) = 1)))
12955, 128biimtrid 241 . . . . . . . . . . 11 (((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง (๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž))) โ†’ (๐‘’ โˆˆ {โŸจ๐‘“, ๐‘”โŸฉ โˆฃ ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)} โ†’ ((๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ) โ†’ โˆƒ๐‘ฅ โˆˆ โ„• โˆƒ๐‘ฆ โˆˆ โ„• ((๐‘ฅโ†‘2) โˆ’ (๐ท ยท (๐‘ฆโ†‘2))) = 1)))
130129ex 412 . . . . . . . . . 10 ((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โ†’ ((๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)) โ†’ (๐‘’ โˆˆ {โŸจ๐‘“, ๐‘”โŸฉ โˆฃ ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)} โ†’ ((๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ) โ†’ โˆƒ๐‘ฅ โˆˆ โ„• โˆƒ๐‘ฆ โˆˆ โ„• ((๐‘ฅโ†‘2) โˆ’ (๐ท ยท (๐‘ฆโ†‘2))) = 1))))
131130exlimdvv 1936 . . . . . . . . 9 ((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โ†’ (โˆƒ๐‘โˆƒ๐‘(๐‘‘ = โŸจ๐‘, ๐‘โŸฉ โˆง ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)) โ†’ (๐‘’ โˆˆ {โŸจ๐‘“, ๐‘”โŸฉ โˆฃ ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)} โ†’ ((๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ) โ†’ โˆƒ๐‘ฅ โˆˆ โ„• โˆƒ๐‘ฆ โˆˆ โ„• ((๐‘ฅโ†‘2) โˆ’ (๐ท ยท (๐‘ฆโ†‘2))) = 1))))
13254, 131biimtrid 241 . . . . . . . 8 ((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โ†’ (๐‘‘ โˆˆ {โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)} โ†’ (๐‘’ โˆˆ {โŸจ๐‘“, ๐‘”โŸฉ โˆฃ ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)} โ†’ ((๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ) โ†’ โˆƒ๐‘ฅ โˆˆ โ„• โˆƒ๐‘ฆ โˆˆ โ„• ((๐‘ฅโ†‘2) โˆ’ (๐ท ยท (๐‘ฆโ†‘2))) = 1))))
133132impd 410 . . . . . . 7 ((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โ†’ ((๐‘‘ โˆˆ {โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)} โˆง ๐‘’ โˆˆ {โŸจ๐‘“, ๐‘”โŸฉ โˆฃ ((๐‘“ โˆˆ โ„• โˆง ๐‘” โˆˆ โ„•) โˆง ((๐‘“โ†‘2) โˆ’ (๐ท ยท (๐‘”โ†‘2))) = ๐‘Ž)}) โ†’ ((๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ) โ†’ โˆƒ๐‘ฅ โˆˆ โ„• โˆƒ๐‘ฆ โˆˆ โ„• ((๐‘ฅโ†‘2) โˆ’ (๐ท ยท (๐‘ฆโ†‘2))) = 1)))
13453, 133sylan2i 605 . . . . . 6 ((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โ†’ ((๐‘‘ โˆˆ {โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)} โˆง ๐‘’ โˆˆ {โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)}) โ†’ ((๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ) โ†’ โˆƒ๐‘ฅ โˆˆ โ„• โˆƒ๐‘ฆ โˆˆ โ„• ((๐‘ฅโ†‘2) โˆ’ (๐ท ยท (๐‘ฆโ†‘2))) = 1)))
135134rexlimdvv 3209 . . . . 5 ((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โ†’ (โˆƒ๐‘‘ โˆˆ {โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)}โˆƒ๐‘’ โˆˆ {โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)} (๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ) โ†’ โˆƒ๐‘ฅ โˆˆ โ„• โˆƒ๐‘ฆ โˆˆ โ„• ((๐‘ฅโ†‘2) โˆ’ (๐ท ยท (๐‘ฆโ†‘2))) = 1))
136135imp 406 . . . 4 (((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง ๐‘Ž โ‰  0) โˆง โˆƒ๐‘‘ โˆˆ {โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)}โˆƒ๐‘’ โˆˆ {โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)} (๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ)) โ†’ โˆƒ๐‘ฅ โˆˆ โ„• โˆƒ๐‘ฆ โˆˆ โ„• ((๐‘ฅโ†‘2) โˆ’ (๐ท ยท (๐‘ฆโ†‘2))) = 1)
137136adantlrr 718 . . 3 (((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง (๐‘Ž โ‰  0 โˆง {โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)} โ‰ˆ โ„•)) โˆง โˆƒ๐‘‘ โˆˆ {โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)}โˆƒ๐‘’ โˆˆ {โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)} (๐‘‘ โ‰  ๐‘’ โˆง โŸจ((1st โ€˜๐‘‘) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘‘) mod (absโ€˜๐‘Ž))โŸฉ = โŸจ((1st โ€˜๐‘’) mod (absโ€˜๐‘Ž)), ((2nd โ€˜๐‘’) mod (absโ€˜๐‘Ž))โŸฉ)) โ†’ โˆƒ๐‘ฅ โˆˆ โ„• โˆƒ๐‘ฆ โˆˆ โ„• ((๐‘ฅโ†‘2) โˆ’ (๐ท ยท (๐‘ฆโ†‘2))) = 1)
13841, 137mpdan 684 . 2 ((((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โˆง ๐‘Ž โˆˆ โ„ค) โˆง (๐‘Ž โ‰  0 โˆง {โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)} โ‰ˆ โ„•)) โ†’ โˆƒ๐‘ฅ โˆˆ โ„• โˆƒ๐‘ฆ โˆˆ โ„• ((๐‘ฅโ†‘2) โˆ’ (๐ท ยท (๐‘ฆโ†‘2))) = 1)
139 pellexlem5 42036 . 2 ((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โ†’ โˆƒ๐‘Ž โˆˆ โ„ค (๐‘Ž โ‰  0 โˆง {โŸจ๐‘, ๐‘โŸฉ โˆฃ ((๐‘ โˆˆ โ„• โˆง ๐‘ โˆˆ โ„•) โˆง ((๐‘โ†‘2) โˆ’ (๐ท ยท (๐‘โ†‘2))) = ๐‘Ž)} โ‰ˆ โ„•))
140138, 139r19.29a 3161 1 ((๐ท โˆˆ โ„• โˆง ยฌ (โˆšโ€˜๐ท) โˆˆ โ„š) โ†’ โˆƒ๐‘ฅ โˆˆ โ„• โˆƒ๐‘ฆ โˆˆ โ„• ((๐‘ฅโ†‘2) โˆ’ (๐ท ยท (๐‘ฆโ†‘2))) = 1)
Colors of variables: wff setvar class
Syntax hints:  ยฌ wn 3   โ†’ wi 4   โˆง wa 395   โˆง w3a 1086   = wceq 1540  โˆƒwex 1780   โˆˆ wcel 2105   โ‰  wne 2939  โˆƒwrex 3069  Vcvv 3473  โŸจcop 4634   class class class wbr 5148  {copab 5210   ร— cxp 5674  โ€˜cfv 6543  (class class class)co 7412  ฯ‰com 7859  1st c1st 7977  2nd c2nd 7978   โ‰ˆ cen 8942   โ‰บ csdm 8944  Fincfn 8945  0cc0 11116  1c1 11117   ยท cmul 11121   โˆ’ cmin 11451  โ„•cn 12219  2c2 12274  โ„คcz 12565  โ„šcq 12939  ...cfz 13491   mod cmo 13841  โ†‘cexp 14034  โˆšcsqrt 15187  abscabs 15188
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1912  ax-6 1970  ax-7 2010  ax-8 2107  ax-9 2115  ax-10 2136  ax-11 2153  ax-12 2170  ax-ext 2702  ax-rep 5285  ax-sep 5299  ax-nul 5306  ax-pow 5363  ax-pr 5427  ax-un 7729  ax-inf2 9642  ax-cnex 11172  ax-resscn 11173  ax-1cn 11174  ax-icn 11175  ax-addcl 11176  ax-addrcl 11177  ax-mulcl 11178  ax-mulrcl 11179  ax-mulcom 11180  ax-addass 11181  ax-mulass 11182  ax-distr 11183  ax-i2m1 11184  ax-1ne0 11185  ax-1rid 11186  ax-rnegex 11187  ax-rrecex 11188  ax-cnre 11189  ax-pre-lttri 11190  ax-pre-lttrn 11191  ax-pre-ltadd 11192  ax-pre-mulgt0 11193  ax-pre-sup 11194
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 845  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1781  df-nf 1785  df-sb 2067  df-mo 2533  df-eu 2562  df-clab 2709  df-cleq 2723  df-clel 2809  df-nfc 2884  df-ne 2940  df-nel 3046  df-ral 3061  df-rex 3070  df-rmo 3375  df-reu 3376  df-rab 3432  df-v 3475  df-sbc 3778  df-csb 3894  df-dif 3951  df-un 3953  df-in 3955  df-ss 3965  df-pss 3967  df-nul 4323  df-if 4529  df-pw 4604  df-sn 4629  df-pr 4631  df-op 4635  df-uni 4909  df-int 4951  df-iun 4999  df-br 5149  df-opab 5211  df-mpt 5232  df-tr 5266  df-id 5574  df-eprel 5580  df-po 5588  df-so 5589  df-fr 5631  df-se 5632  df-we 5633  df-xp 5682  df-rel 5683  df-cnv 5684  df-co 5685  df-dm 5686  df-rn 5687  df-res 5688  df-ima 5689  df-pred 6300  df-ord 6367  df-on 6368  df-lim 6369  df-suc 6370  df-iota 6495  df-fun 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550  df-fv 6551  df-isom 6552  df-riota 7368  df-ov 7415  df-oprab 7416  df-mpo 7417  df-om 7860  df-1st 7979  df-2nd 7980  df-frecs 8272  df-wrecs 8303  df-recs 8377  df-rdg 8416  df-1o 8472  df-oadd 8476  df-omul 8477  df-er 8709  df-map 8828  df-en 8946  df-dom 8947  df-sdom 8948  df-fin 8949  df-sup 9443  df-inf 9444  df-oi 9511  df-card 9940  df-acn 9943  df-pnf 11257  df-mnf 11258  df-xr 11259  df-ltxr 11260  df-le 11261  df-sub 11453  df-neg 11454  df-div 11879  df-nn 12220  df-2 12282  df-3 12283  df-n0 12480  df-xnn0 12552  df-z 12566  df-uz 12830  df-q 12940  df-rp 12982  df-ico 13337  df-fz 13492  df-fl 13764  df-mod 13842  df-seq 13974  df-exp 14035  df-hash 14298  df-cj 15053  df-re 15054  df-im 15055  df-sqrt 15189  df-abs 15190  df-dvds 16205  df-gcd 16443  df-numer 16678  df-denom 16679
This theorem is referenced by:  pellqrex  42082
  Copyright terms: Public domain W3C validator