| fis .keys = statfields(class), okfieldinits(class, fis), compat(str, val, ty, st), is_referencevalue(val) ⊦ compat(str, val, ty, addclass(class, fis, st)) |
⊦ compat(str, val, ty, st) ↔ okval(val, ty) ∧ ( is_referencevalue(val) ∧ 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)) ∧ asgcomp(str, val, ty, st))
fis .keys = statfields(class), okfieldinits(class, fis), compat(str, val, ty, st), is_referencevalue(val) ⊦ okval(val, ty) ∧ ( is_referencevalue(val) ∧ val .refval ≠ jvmref → val .refval -- _type ∈ addclass(class, fis, st) ∧ is_typevalue(addclass(class, fis, st)[val .refval -- _type]) ∧ is_reftype((addclass(class, fis, st)[val .refval -- _type]) .type) ∧ ( has_classtype((addclass(class, fis, st)[val .refval -- _type]) .type) → tdname+∃(str, (addclass(class, fis, st)[val .refval -- _type]) .type .jtelemtype .class)) ∧ ( is_classtype((addclass(class, fis, st)[val .refval -- _type]) .type) → class+∃(str, (addclass(class, fis, st)[val .refval -- _type]) .type .class)) ∧ asgcomp(str, val, ty, addclass(class, fis, st)))
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (addclass(class, fis, st), ty, val, str)]]