| ⊦ okarray(r, boolean_type, st) → st[r -- _length] .intval = n→i(# getbooleanarray(r, st)) |
⊦ getbooleanarray(r, st) = getbooleanarray(r, 0, st[r -- _length] .intval, st)
⊦ getbooleanarray(r, i, j, st) = booleanvalues(getarray(r, i, j, st))
okarray(r, boolean_type, st), r ∈ st ⊦ st[r -- _length] .intval = n→i(# booleanvalues(getarray(r, 0, st[r -- _length] .intval, st))), r = jvmref
[[CONCRETESIMPRULES : ([CSIMPNAMEDFORWARD : okfuns, , okarray-05, ⊦ okarray(r, ty, st) → r ≠ jvmref ∧ r ∈ st])]]