| ⊦ ¬ st[r -- sk] .refval -- i ' ∈ st ∧ 0 ≤ i ∧ i < st[r -- (sk ' + _length ')] .intval → ¬ is_array(str, st[r -- 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 -- sk] .refval -- i ' ∈ st ∧ 0 ≤ i ∧ i < st[r -- (sk ' + _length ')] .intval → ¬ is_array(st[r -- sk] .refval, st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (sks + sks0) + sks1 = sks + sks0 + sks1])]]