| ⊦ r = jvmref, (∀ sk, val0. sk × val0 ∈ fis → is_integervalue(val0) ∧ is_fskey(sk) ∧ is_arraytype(sk .fs .type) ∧ okarray(st[_mode, val][r -- sk], sk .fs .type .type, val0 .intval, st[_mode, val])) ↔ okarrays(r, fis, st) |
⊦ okarray(val, ty, i, st[_mode, val0]) ↔ okarray(val, ty, i, st)
⊦ r = jvmref, (∀ sk, val0. sk × val0 ∈ fis → is_integervalue(val0) ∧ is_fskey(sk) ∧ is_arraytype(sk .fs .type) ∧ okarray(st[r -- sk], sk .fs .type .type, val0 .intval, st)) ↔ okarrays(r, fis, st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ r ≠ jvmref → (st[_mode, val][r -- sk]) = st[r -- sk]])]]