| is_indexkey(sk) ⊦ (addclass(class, [], st)[r -- sk]) = st[r -- sk] |
⊦ addclass(class1, [], st) = st[jvmref -- mkfs(class1, void_type, `initstate' .field) ', initval(done)]
is_indexkey(sk) ⊦ (((r = jvmref ∧ sk = mkfs(class, void_type, `initstate' .field) ') ⊃ initval(done); st[r -- sk])) = st[r -- sk]
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ r -- sk = r0 -- sk0 ↔ ¬ ¬ (r = r0 ∧ sk = sk0)], [CSIMPSEQ : ⊦ (st[rk0, val][rk]) = ((rk = rk0 ⊃ val; st[rk]))])]]