∀[n:ℕ]. (1^n = 1 ∈ ℤ)
{ (InductionOnNat THEN Auto THEN Reduce 0 THEN Auto) }
.....upcase..... 
1. n : ℤ
2. 0 < n
3. 1^n - 1 = 1 ∈ ℤ
⊢ 1^n = 1 ∈ ℤ