| ty0 ≤ mkarraytype(ty) ∧ is_arrayref(r, i0, st) ∧ (∀ j. 0 ≤ j ∧ j < i0 → okval(st[r -- j '], ty)), st[r -- _length] = intval(i0), st[r -- _type] = typeval(ty0), r -- _type ∈ st, r -- _length ∈ st, r ∈ st, 0 ≤ i0 ⊦ is_arraytype(ty0) ∧ ty0 .type ≤ ty ∧ is_arrayref(r, i0, putByteArray(bytes, r1, i, st)) ∧ (∀ j. ¬ j < 0 ∧ ¬ i0 ≤ j → okval(st[r -- j '], ty)), r = jvmref, r = r1 |
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ r ≠ r1 → ( is_arrayref (r, i0, putByteArray (bytes, r1, i, st)) ↔ is_arrayref(r, i0, st))], [CSIMPSEQ : ⊦ ¬ i < j ↔ j ≤ i], [CSIMPSEQ : ⊦ ¬ i ≤ j ↔ j < i], [CSIMPSEQ : ⊦ ty0 ≤ mkarraytype(ty) ↔ is_arraytype(ty0) ∧ ty0 .type ≤ ty])]]