| ⊦ addclass(class1, (mkfs(class1, ty, fieldvar) ' × val) ', st) = (st[jvmref -- mkfs(class1, void_type, `initstate' .field) ', initval(done)][jvmref -- mkfs(class1, ty, fieldvar) ', val]) |
⊦ addclass(class1, (mkfs(class1, ty, fieldvar) ' × val) ' + fis, st) = (addclass(class1, fis, st)[jvmref -- mkfs(class1, ty, fieldvar) ', val])
⊦ addclass(class1, [], st) = st[jvmref -- mkfs(class1, void_type, `initstate' .field) ', initval(done)]
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ fis + [] = fis], [CSIMPSEQ : ⊦ (fis + fis0) + fis1 = fis + fis0 + fis1])], [EXTRATERMS : (class1, ty, fieldvar, val, [], st)]]