| ¬ (is_array(r0, st) ∧ okval(byteval(by), st[r0 -- _type] .type .type)), okbytearray(r0, st), is_array(r0, st) ⊦ is_array(r0, st[r0 -- i ', byteval(by)]) |
⊦ okbytearray(r, st) → st[r -- _type] = typeval(mkarraytype(byte_type))
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ is_bytevalue(byteval(by))], [CSIMPSEQ : ⊦ okval(val, byte_type) ↔ is_bytevalue(val)], [CSIMPSEQ : ⊦ mkarraytype(ty) .type = ty], [CSIMPSEQ : ⊦ typeval(ty) .type = ty])]]