| okarray(r, boolean_type, st), is_boolvalue(val), r ∈ st ⊦ r = jvmref, okarray(r, boolean_type, st[r -- i ', val]) |
⊦ okarray(r, ty, st) ∧ okval(val, ty) → okarray(r, ty, st[r -- i ', val])
[[CONCRETESIMPRULES : ([CSIMPNAMEDSEQ : valuefuns, , okval-bool, ⊦ okval(val, boolean_type) ↔ is_boolvalue(val)])], [EXTRATERMS : (val, i, st, boolean_type, r)]]