---

Step * 2 1 2 2 of Lemma wilson-theorem


1. n : {i:ℤ| 1 < i} 
2. (n - 1)! ≡ (-1) mod n
3. p : ℕ
4. prime(p)
5. (p * p) ≤ n
6. p | n
7. (2 ≤ p) ∧ p < n
8. p | (-1)
⊢ False
BY
{ ((InstLemma `divides_product` [⌜p⌝;⌜-1⌝;⌜-1⌝]⋅ THENA (Auto THEN OrLeft THEN Auto)) THEN Reduce (-1)) }

1
1. n : {i:ℤ| 1 < i} 
2. (n - 1)! ≡ (-1) mod n
3. p : ℕ
4. prime(p)
5. (p * p) ≤ n
6. p | n
7. (2 ≤ p) ∧ p < n
8. p | (-1)
9. p | 1
⊢ False

---

Latex:

---

Latex:

1.  n  :  \{i:\mBbbZ{}|  1  <  i\} 
2.  (n  -  1)!  \mequiv{}  (-1)  mod  n
3.  p  :  \mBbbN{}
4.  prime(p)
5.  (p  *  p)  \mleq{}  n
6.  p  |  n
7.  (2  \mleq{}  p)  \mwedge{}  p  <  n
8.  p  |  (-1)
\mvdash{}  False


By

---

Latex:
((InstLemma  `divides\_product`  [\mkleeneopen{}p\mkleeneclose{};\mkleeneopen{}-1\mkleeneclose{};\mkleeneopen{}-1\mkleeneclose{}]\mcdot{}  THENA  (Auto  THEN  OrLeft  THEN  Auto))  THEN  Reduce  (-1))

---

Home Index