---

Step * 2 of Lemma prime-factors


1. n : {2...}
2. factorit(n;2;[];[])
= factorit(n;2;[];[])
∈ {L:{p:ℕ| prime(p)}  List| reduce(λp,q. (p * q);1;L) = (n * reduce(λp,q. (p * q);1;[])) ∈ ℤ} 
⊢ {L:{p:ℕ| prime(p)}  List| reduce(λp,q. (p * q);1;L) = (n * reduce(λp,q. (p * q);1;[])) ∈ ℤ}  ⊆r {factors:{m:{2...}| pr\000Cime(m)}  List| 
                                                                                         n = Π(factors)  ∈ ℤ} 
BY
{ (Reduce 0 THEN D 0 THEN Auto) }

1
.....subterm..... T:t
1:n
1. n : {2...}
2. factorit(n;2;[];[])
= factorit(n;2;[];[])
∈ {L:{p:ℕ| prime(p)}  List| reduce(λp,q. (p * q);1;L) = (n * reduce(λp,q. (p * q);1;[])) ∈ ℤ} 
3. x : {L:{p:ℕ| prime(p)}  List| reduce(λp,q. (p * q);1;L) = (n * 1) ∈ ℤ} 
⊢ x ∈ {factors:{m:{2...}| prime(m)}  List| n = Π(factors)  ∈ ℤ} 

---

Latex:

---

Latex:

1.  n  :  \{2...\}
2.  factorit(n;2;[];[])  =  factorit(n;2;[];[])
\mvdash{}  \{L:\{p:\mBbbN{}|  prime(p)\}    List|  reduce(\mlambda{}p,q.  (p  *  q);1;L)  =  (n  *  reduce(\mlambda{}p,q.  (p  *  q);1;[]))\} 
        \msubseteq{}r  \{factors:\{m:\{2...\}|  prime(m)\}    List|  n  =  \mPi{}(factors)  \} 


By

---

Latex:
(Reduce  0  THEN  D  0  THEN  Auto)

---

Home Index