---

Step * 1 1 of Lemma exp-rem-property


1. m : ℕ+
2. n : ℕ
3. ∀n:ℕn. ∀[i:ℕ]. (exp-rem(i;n;m) ~ i^n rem m)
4. ¬(n = 0 ∈ ℤ)
5. ¬(n = 1 ∈ ℤ)
6. ∀[i:ℕ]. (exp-rem(i;n ÷ 2;m) ~ i^(n ÷ 2) rem m)
7. i : ℕ
8. 0 ≤ ((n ÷ 2) * 2)
9. i^((n rem 2) + ((n ÷ 2) * 2)) = (i^(n rem 2) * i^((n ÷ 2) * 2)) ∈ ℤ
⊢ i^n = (i^(n rem 2) * i^(n ÷ 2) * i^(n ÷ 2)) ∈ ℤ
BY
{ (NthHypEq (-1) THEN EqCD THEN Auto) }

1
.....subterm..... T:t
2:n
1. m : ℕ+
2. n : ℕ
3. ∀n:ℕn. ∀[i:ℕ]. (exp-rem(i;n;m) ~ i^n rem m)
4. ¬(n = 0 ∈ ℤ)
5. ¬(n = 1 ∈ ℤ)
6. ∀[i:ℕ]. (exp-rem(i;n ÷ 2;m) ~ i^(n ÷ 2) rem m)
7. i : ℕ
8. 0 ≤ ((n ÷ 2) * 2)
9. i^((n rem 2) + ((n ÷ 2) * 2)) = (i^(n rem 2) * i^((n ÷ 2) * 2)) ∈ ℤ
⊢ i^n = i^((n rem 2) + ((n ÷ 2) * 2)) ∈ ℤ

2
.....subterm..... T:t
3:n
1. m : ℕ+
2. n : ℕ
3. ∀n:ℕn. ∀[i:ℕ]. (exp-rem(i;n;m) ~ i^n rem m)
4. ¬(n = 0 ∈ ℤ)
5. ¬(n = 1 ∈ ℤ)
6. ∀[i:ℕ]. (exp-rem(i;n ÷ 2;m) ~ i^(n ÷ 2) rem m)
7. i : ℕ
8. 0 ≤ ((n ÷ 2) * 2)
9. i^((n rem 2) + ((n ÷ 2) * 2)) = (i^(n rem 2) * i^((n ÷ 2) * 2)) ∈ ℤ
⊢ (i^(n rem 2) * i^(n ÷ 2) * i^(n ÷ 2)) = (i^(n rem 2) * i^((n ÷ 2) * 2)) ∈ ℤ

---

Latex:

---

Latex:

1.  m  :  \mBbbN{}\msupplus{}
2.  n  :  \mBbbN{}
3.  \mforall{}n:\mBbbN{}n.  \mforall{}[i:\mBbbN{}].  (exp-rem(i;n;m)  \msim{}  i\^{}n  rem  m)
4.  \mneg{}(n  =  0)
5.  \mneg{}(n  =  1)
6.  \mforall{}[i:\mBbbN{}].  (exp-rem(i;n  \mdiv{}  2;m)  \msim{}  i\^{}(n  \mdiv{}  2)  rem  m)
7.  i  :  \mBbbN{}
8.  0  \mleq{}  ((n  \mdiv{}  2)  *  2)
9.  i\^{}((n  rem  2)  +  ((n  \mdiv{}  2)  *  2))  =  (i\^{}(n  rem  2)  *  i\^{}((n  \mdiv{}  2)  *  2))
\mvdash{}  i\^{}n  =  (i\^{}(n  rem  2)  *  i\^{}(n  \mdiv{}  2)  *  i\^{}(n  \mdiv{}  2))


By

---

Latex:
(NthHypEq  (-1)  THEN  EqCD  THEN  Auto)

---

Home Index