| okstore(st[r -- sk, val]), jvmref ∈ st[r -- sk, val] ⊦ sk = _type, r -- sk = _mode, r -- sk = _out, okstore(st) |
⊦ okstore(st) ↔ is_javastore(st) ∧ (∀ r. r ≠ jvmref ∧ r ∈ st → r -- _type ∈ st ∧ is_typevalue(st[r -- _type]))
is_javastore(st[r -- sk, val]) ∧ (∀ r0. r0 ≠ jvmref ∧ r0 ∈ st[r -- sk, val] → r0 -- _type ∈ st[r -- sk, val] ∧ is_typevalue(st[r -- sk, val][r0 -- _type])), jvmref ∈ st[r -- sk, val] ⊦ sk = _type, r -- sk = _mode, r -- sk = _out, okstore(st)
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st[r -- sk, val])]]