| ⊦ initundone(class1, addarray(r, ty, i, st)) ↔ initundone(class1, st) |
⊦ addarray(r, ty, i, st) = addarray(r, initial_value(ty), i, st[r -- _type, typeval(mkarraytype(ty))][r -- _length, intval(i)])
⊦ initundone(class1, addarray(r, val, i, st)) ↔ initundone(class1, st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ initundone (class1, st[r -- _type, val]) ↔ initundone(class1, st)], [CSIMPSEQ : ⊦ initundone (class1, st[r -- _length, val]) ↔ initundone(class1, st)])]]