| reftypep(val, st), val .refval ≠ jvmref → val .refval -- _type ∈ st ∧ st[val .refval -- _type] = typeval(mkclasstype(class1)) ⊦ okclass(val, class1, st[_out, val0]) |
⊦ okclass(val, class1, st) ↔ reftypep(val, st) ∧ (val .refval ≠ jvmref → val .refval -- _type ∈ st ∧ st[val .refval -- _type] = typeval(mkclasstype(class1)))
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ reftypep(val, st[_out, val0]) ↔ reftypep(val, st)], [CSIMPSEQ : ⊦ r -- _type ∈ st[_out, val] ↔ r -- _type ∈ st], [CSIMPSEQ : ⊦ (st[_out, val][r -- _type]) = st[r -- _type]])], [EXTRATERMS : (st[_out, val0], class1, val)]]