| refs ≠ [] ∧ refs .first = r ∧ junkrefs(str1, refs, st[refs .first -- _type] .type, st), st[r -- _type] = typeval(mkarraytype(ty)), is_primtype(ty) ⊦ refs ≠ [] ∧ refs .first = r ∧ junkrefs(str, refs, st[refs .first -- _type] .type, st) |
st[refs .first -- _type] = typeval(mkarraytype(ty)), is_primtype(ty), junkrefs(str1, refs, mkarraytype(ty), st) ⊦ refs = [], junkrefs(str, refs, mkarraytype(ty), st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ typeval(ty) .type = ty])]]