| m0 + 1 < # ar, n < # ar, n ≤ m0, ∀ n, ar. n < # ar ∧ n ≤ m0 ∧ m0 < # ar → (arr2list(ar, m0)[n] ↔ ar[n]) ⊦ n = m0 + 1, (arr2list(ar, m0) + ar[m0 + 1] ')[n] ↔ ar[n] |
m0 + 1 < # ar, n < # ar, n ≤ m0, n < # ar ∧ n ≤ m0 ∧ m0 < # ar → (arr2list(ar, m0)[n] ↔ ar[n]), ∀ n, ar. n < # ar ∧ n ≤ m0 ∧ m0 < # ar → (arr2list(ar, m0)[n] ↔ ar[n]) ⊦ n = m0 + 1, (arr2list(ar, m0) + ar[m0 + 1] ')[n] ↔ ar[n]
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (n, ar)]]