---

Step * 2 of Lemma coprime-exp1

.....upcase..... 
1. a : ℤ@i
2. b : ℤ@i
3. CoPrime(a,b)@i
4. n : ℤ@i
5. [%2] : 0 < n@i
6. CoPrime(a,b^n - 1)@i
⊢ CoPrime(a,b^n)
BY
{ (Unfold `exp` 0 THEN (RWO "primrec-unroll" 0 THENA Auto) THEN AutoBoolCase ⌜(n =z 0)⌝⋅ THEN Fold `exp` 0) }

1
1. a : ℤ@i
2. b : ℤ@i
3. CoPrime(a,b)@i
4. n : ℤ@i
5. n ≠ 0
6. [%2] : 0 < n@i
7. CoPrime(a,b^n - 1)@i
⊢ CoPrime(a,b * b^n - 1)

---

Latex:

---

Latex:
.....upcase..... 
1.  a  :  \mBbbZ{}@i
2.  b  :  \mBbbZ{}@i
3.  CoPrime(a,b)@i
4.  n  :  \mBbbZ{}@i
5.  [\%2]  :  0  <  n@i
6.  CoPrime(a,b\^{}n  -  1)@i
\mvdash{}  CoPrime(a,b\^{}n)


By

---

Latex:
(Unfold  `exp`  0
  THEN  (RWO  "primrec-unroll"  0  THENA  Auto)
  THEN  AutoBoolCase  \mkleeneopen{}(n  =\msubz{}  0)\mkleeneclose{}\mcdot{}
  THEN  Fold  `exp`  0)

---

Home Index