Step * 1 1 1 1 1 2 of Lemma prime-sum-of-two-squares


1. Prime
2. : ℤ
3. (2 |a|) ≤ p
4. : ℤ
5. (2 |b|) ≤ p
6. ((|a| |a|) (|b| |b|)) ≡ mod p
7. ¬((|a| ≡ mod p) ∧ (|b| ≡ mod p))
8. ¬(p 2 ∈ ℤ)
⊢ ∃a,b:ℤ(p ((a a) (b b)) ∈ ℤ)
BY
((FLemma `Prime-isOdd` [-1] THENA Auto) THEN (RWO "assert-isOdd" (-1) THENA Auto) THEN -1) }

1
1. Prime
2. : ℤ
3. (2 |a|) ≤ p
4. : ℤ
5. (2 |b|) ≤ p
6. ((|a| |a|) (|b| |b|)) ≡ mod p
7. ¬((|a| ≡ mod p) ∧ (|b| ≡ mod p))
8. ¬(p 2 ∈ ℤ)
9. : ℤ
10. ((2 k) 1) ∈ ℤ
⊢ ∃a,b:ℤ(p ((a a) (b b)) ∈ ℤ)


Latex:


Latex:

1.  p  :  Prime
2.  a  :  \mBbbZ{}
3.  (2  *  |a|)  \mleq{}  p
4.  b  :  \mBbbZ{}
5.  (2  *  |b|)  \mleq{}  p
6.  ((|a|  *  |a|)  +  (|b|  *  |b|))  \mequiv{}  0  mod  p
7.  \mneg{}((|a|  \mequiv{}  0  mod  p)  \mwedge{}  (|b|  \mequiv{}  0  mod  p))
8.  \mneg{}(p  =  2)
\mvdash{}  \mexists{}a,b:\mBbbZ{}.  (p  =  ((a  *  a)  +  (b  *  b)))


By


Latex:
((FLemma  `Prime-isOdd`  [-1]  THENA  Auto)  THEN  (RWO  "assert-isOdd"  (-1)  THENA  Auto)  THEN  D  -1)




Home Index