| 0 < st0[r -- _length] .intval, n < i→n(st0[r -- _length] .intval), r ∈ st, r -- _length ∈ st, is_array(r, st), st ⊆ st0, n < # getarray(r, st0) ⊦ getarray(r, st0) = [], st0[r -- _length] .intval = 0, noval = st0[r -- n→i(n) '], r -- n→i(n) ' ∈ st |
⊦ is_array(r, st) ↔ r ≠ jvmref ∧ r -- _type ∈ st ∧ is_typevalue(st[r -- _type]) ∧ is_arraytype(st[r -- _type] .type) ∧ okarray(r, st[r -- _type] .type .type, st)
0 < st0[r -- _length] .intval, n < i→n(st0[r -- _length] .intval), r ∈ st, r -- _length ∈ st, r ≠ jvmref ∧ r -- _type ∈ st ∧ is_typevalue(st[r -- _type]) ∧ is_arraytype(st[r -- _type] .type) ∧ okarray(r, st[r -- _type] .type .type, st), st ⊆ st0, n < # getarray(r, st0) ⊦ getarray(r, st0) = [], st0[r -- _length] .intval = 0, noval = st0[r -- n→i(n) '], r -- n→i(n) ' ∈ st
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st, r)]]