| st[_mode] = return(val, ty), is_referencevalue(val), compatrefs(str, st), compatstatic(str, st), _mode ∈ st, newref(r, st), is_predefined_class(class), okval(val, ty), val .refval ≠ jvmref → val .refval -- _type ∈ st ∧ is_typevalue(st[val .refval -- _type]) ∧ is_reftype(st[val .refval -- _type] .type) ∧ (has_classtype(st[val .refval -- _type] .type) → tdname+∃(str, st[val .refval -- _type] .type .jtelemtype .class)) ∧ (is_classtype(st[val .refval -- _type] .type) → class+∃(str, st[val .refval -- _type] .type .class)) ∧ is_subtype(str, st[val .refval -- _type] .type, ty) ⊦ r = jvmref, return(val, ty) = return(noval, void_type), compat(str, val, ty, st[r -- _type, typeval(mkclasstype(class))]) |
val = refval(r0), st[_mode] = return(val, ty), is_referencevalue(val), compatrefs(str, st), compatstatic(str, st), _mode ∈ st, newref(r, st), is_predefined_class(class), okval(val, ty), r0 ≠ jvmref → r0 -- _type ∈ st ∧ is_typevalue(st[r0 -- _type]) ∧ is_reftype(st[r0 -- _type] .type) ∧ (has_classtype(st[r0 -- _type] .type) → tdname+∃(str, st[r0 -- _type] .type .jtelemtype .class)) ∧ (is_classtype(st[r0 -- _type] .type) → class+∃(str, st[r0 -- _type] .type .class)) ∧ is_subtype(str, st[r0 -- _type] .type, ty) ⊦ r = jvmref, return(val, ty) = return(noval, void_type), compat(str, val, ty, st[r -- _type, typeval(mkclasstype(class))])
[[CONCRETESIMPRULES : ([CSIMPELIM : ⊦ is_referencevalue(val) → ( r = val .refval ↔ val = refval(r))])], [EXTRATERMS : (val, r0)]]