| ∃ class. ty0 = mkclasstype(class) ⊦ r = r0, r0 -- mkfs(class, ty0, fieldvar) ' ∈ st ∧ oktype(st[r0 -- mkfs(class, ty0, fieldvar) '], ty0, addarray(r, ty, vals, st)) ↔ r0 -- mkfs(class, ty0, fieldvar) ' ∈ st ∧ oktype(st[r0 -- mkfs(class, ty0, fieldvar) '], ty0, st) |
⊦ r = r0, r0 -- mkfs(class, mkclasstype(class0), fieldvar) ' ∈ st ∧ oktype(st[r0 -- mkfs(class, mkclasstype(class0), fieldvar) '], mkclasstype(class0), addarray(r, ty, vals, st)) ↔ r0 -- mkfs(class, mkclasstype(class0), fieldvar) ' ∈ st ∧ oktype(st[r0 -- mkfs(class, mkclasstype(class0), fieldvar) '], mkclasstype(class0), st)
[[CONCRETESIMPRULES : ()]]