| ⊦ okclass(refval(r0), class1, addclass(class0, fis, st)) ↔ okclass(refval(r0), class1, st) |
⊦ okclass(val, class1, st) ↔ reftypep(val, st) ∧ (val .refval ≠ jvmref → val .refval -- _type ∈ st ∧ st[val .refval -- _type] = typeval(mkclasstype(class1)))
⊦ reftypep(refval(r0), addclass(class0, fis, st)) ∧ ( refval(r0) .refval ≠ jvmref → refval(r0) .refval -- _type ∈ addclass(class0, fis, st) ∧ (addclass(class0, fis, st)[refval(r0) .refval -- _type]) = typeval(mkclasstype(class1))) ↔ okclass(refval(r0), class1, st)
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (addclass(class0, fis, st), class1, refval(r0))]]