∀[n:ℕ]. (1 ↑ n = 1 ∈ ℚ)
{ InductionOnNat }
.....basecase..... 
1. n : ℤ
⊢ 1 ↑ 0 = 1 ∈ ℚ
.....upcase..... 
1. n : ℤ
2. 0 < n
3. 1 ↑ n - 1 = 1 ∈ ℚ
⊢ 1 ↑ n = 1 ∈ ℚ