| ⊦ r = jvmref, okarrays(r, fis, st[_mode, val]) ↔ okarrays(r, fis, st) |
⊦ okarrays(r, fis, st) ↔ (∀ sk, val. sk × val ∈ fis → is_integervalue(val) ∧ is_fskey(sk) ∧ is_arraytype(sk .fs .type) ∧ okarray(st[r -- sk], sk .fs .type .type, val .intval, st))
⊦ 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)
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st[_mode, val], fis, r)]]