| ⊦ st[r -- (sk1 ' + sk0 ' + sk ' + _length ')] .intval < 0 → ¬ is_array(str, st[r -- (sk1 ' + sk0 ' + sk ')] .refval, st) |
⊦ is_array(str, r, st) ↔ ¬ ¬ ( type∃(str, st[r -- _type] .type) ∧ st[r -- _type] .type .jtelemtype ≠ void_type ∧ st[r -- _type] .type .jtelemtype ≠ abstract_type ∧ is_array(r, st))
⊦ st[r -- (sk1 ' + sk0 ' + sk ' + _length ')] .intval < 0 → ¬ is_array(st[r -- (sk1 ' + sk0 ' + sk ')] .refval, st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (sks + sks0) + sks1 = sks + sks0 + sks1])]]