| n→i(# vals) + 1 ≤ n→i(# (vals + byteval(by) ')) ⊦ r = jvmref, true ∧ (∀ j. ¬ j < 0 ∧ ¬ n→i(# vals) < j → is_bytevalue(addarray(r, byte_type, vals + byteval(by) ', st)[r -- j '])) ↔ is_arrayref(r, n→i(# vals), addarray(r, byte_type, vals, st)) ∧ (∀ j. 0 ≤ j ∧ j < n→i(# vals) → is_bytevalue(vals[i→n(j)])) |
⊦ r = jvmref, (∀ j. ¬ j < 0 ∧ ¬ n→i(# vals) < j → is_bytevalue(addarray(r, byte_type, vals + byteval(by) ', st)[r -- j '])) ↔ is_arrayref(r, n→i(# vals), addarray(r, byte_type, vals, st)) ∧ (∀ j. 0 ≤ j ∧ j < n→i(# vals) → is_bytevalue(vals[i→n(j)]))
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ i + j = j + i], [CSIMPSEQ : ⊦ i + j + i0 = (i + j) + i0], [CSIMPSEQ : ⊦ m ≤ m], [CSIMPSEQ : ⊦ n→i(m) ≤ n→i(n) ↔ m ≤ n], [CSIMPSEQ : ⊦ i + j ≤ i0 + j ↔ i ≤ i0], [CSIMPSEQ : ⊦ m + n = n + m], [CSIMPSEQ : ⊦ (m + n0) + n1 = m + n0 + n1], [CSIMPSEQ : ⊦ n→i(m + n) = n→i(m) + n→i(n)], [CSIMPSEQ : ⊦ (vals + vals0) + vals1 = vals + vals0 + vals1], [CSIMPSEQ : ⊦ # val ' = 0 +1], [CSIMPSEQ : ⊦ # (vals + vals0) = # vals + # vals0])]]