---

Step * 1 1 of Lemma prime-sum-of-two-squares-if-one-mod-four


1. p : {p:{2...}| prime(p)} 
2. k : ℤ
3. p = (1 + (4 * k)) ∈ ℤ
4. n : ℕ
5. x:ℕ × y:ℕ × {z:ℕ| ((x * x) + (4 * y * z)) = p ∈ ℤ}  ~ ℕn
6. (n rem 2) = 1 ∈ ℤ
⊢ ∃a,b:ℤ. (p = ((a * a) + (b * b)) ∈ ℤ)
BY
{ (InstLemma `involution-has-fixpoint` [⌜n⌝;⌜x:ℕ × y:ℕ × {z:ℕ| ((x * x) + (4 * y * z)) = p ∈ ℤ} ⌝;⌜λ2t.let x,y,z = t in 
                                                                                                  <x, z, y>⌝]⋅
   THENA (Auto THEN (DProds THEN Reduce 0) THEN Auto)
   ) }

1
1. p : {p:{2...}| prime(p)} 
2. k : ℤ
3. p = (1 + (4 * k)) ∈ ℤ
4. n : ℕ
5. x:ℕ × y:ℕ × {z:ℕ| ((x * x) + (4 * y * z)) = p ∈ ℤ}  ~ ℕn
6. (n rem 2) = 1 ∈ ℤ
7. ∃x:x:ℕ × y:ℕ × {z:ℕ| ((x * x) + (4 * y * z)) = p ∈ ℤ} . (let x,y,z = x in <x, z, y> = x ∈ (x:ℕ × y:ℕ × {z:ℕ| ((x * x)\000C + (4 * y * z)) = p ∈ ℤ} ))
⊢ ∃a,b:ℤ. (p = ((a * a) + (b * b)) ∈ ℤ)

---

Latex:

---

Latex:

1.  p  :  \{p:\{2...\}|  prime(p)\} 
2.  k  :  \mBbbZ{}
3.  p  =  (1  +  (4  *  k))
4.  n  :  \mBbbN{}
5.  x:\mBbbN{}  \mtimes{}  y:\mBbbN{}  \mtimes{}  \{z:\mBbbN{}|  ((x  *  x)  +  (4  *  y  *  z))  =  p\}    \msim{}  \mBbbN{}n
6.  (n  rem  2)  =  1
\mvdash{}  \mexists{}a,b:\mBbbZ{}.  (p  =  ((a  *  a)  +  (b  *  b)))


By

---

Latex:
(InstLemma  `involution-has-fixpoint`  [\mkleeneopen{}n\mkleeneclose{};\mkleeneopen{}x:\mBbbN{}  \mtimes{}  y:\mBbbN{}  \mtimes{}  \{z:\mBbbN{}|  ((x  *  x)  +  (4  *  y  *  z))  =  p\}  \mkleeneclose{};
  \mkleeneopen{}\mlambda{}\msubtwo{}t.let  x,y,z  =  t  in 
    <x,  z,  y>\mkleeneclose{}]\mcdot{}
  THENA  (Auto  THEN  (DProds  THEN  Reduce  0)  THEN  Auto)
  )

---

Home Index