| ar0 + ar1 = mkarray(0) ⊦ ar0 = mkarray(0) ∧ ar1 = mkarray(0) |
⊦ ar1 = ar2 ↔ # ar1 = # ar2 ∧ (∀ n. n < # ar1 → ar1[n] = ar2[n])
⊦ #(ar0 + ar1) = # ar0 + # ar1
⊦ (ar + ar0) + ar1 = ar + ar0 + ar1
Used simplifier rules: append-len: ⊦ #(ar0 + ar1) = # ar0 + # ar1;%append-a: ⊦ (ar + ar0) + ar1 = ar + ar0 + ar1;% ⊦ # mkarray(n) = n; (s)% ⊦ m + n = 0 ↔ m = 0 ∧ n = 0; (ws)%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic%c: ⊦ m + n = n + m; from specification nat-basic% ⊦ # ar = 0 → (mkarray(0) = ar ↔ true); (ss) Used terms: mkarray(0), ar0 + ar1