| initdone(class0, st) ⊦ initdone(class, st), initdone(class0, st[jvmref -- mkfs(class, void_type, `initstate' .field) ', initval(error)]) |
⊦ rk ≠ jvmref -- mkfs(class, void_type, `initstate' .field) ' ∧ rk ≠ _uninit → (initdone(class, st[rk, val]) ↔ initdone(class, st))
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ r -- sk = r0 -- sk0 ↔ r = r0 ∧ sk = sk0], [CSIMPSEQ : ⊦ fs ' = fs0 ' ↔ fs = fs0], [CSIMPSEQ : ⊦ mkfs(class, ty, fieldvar) = mkfs(class0, ty0, fieldvar0) ↔ class = class0 ∧ ty = ty0 ∧ fieldvar = fieldvar0], [CSIMPSEQ : ⊦ jvmref -- sk = _uninit ↔ sk = mkfs (`java.lang.Object' .class, void_type, `uninit' .field) '], [CSIMPSEQ : ⊦ stringvar .field = stringvar0 .field ↔ stringvar = stringvar0])], [EXTRATERMS : (initval(error), jvmref -- mkfs(class, void_type, `initstate' .field) ', st, class0)]]