| 0 ≤ i, 0 < st[r -- _length] .intval, is_array(str, r, st), okbytearray(r, st), i < st[r -- _length] .intval, is_referencevalue(st[r -- i ']), validrefs(str, st[r -- i '] .refval ' + refs, st[r -- _type] .type .type, st) ⊦ r = (st[r -- i '] .refval ' + refs) .last |
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ 0 ≤ i ∧ i < st[r -- _length] .intval ∧ okbytearray(r, st) → st[r -- i '] ≠ refval(r1)], [CSIMPELIM : ⊦ is_referencevalue(val) → ( r = val .refval ↔ val = refval(r))])], [EXTRATERMS : (st[r -- i '], r0)]]