| fis .keys = statfields(class), st[r -- _type] = typeval(ty), r ∈ st, okfieldinits(class, fis), compatrefs(str, st), compatstatic(str, st), compatmode(str, st), r -- _type ∈ addclass(class, fis, st) ⊦ r = jvmref, (is_classtype(ty) ∧ class+∃(str, ty .class) → compatobj(str, r, addclass(class, fis, st))) ∧ (is_arraytype(ty) ∧ (¬ has_classtype(ty) ∨ tdname+∃(str, ty .type .jtelemtype .class)) → compatarray(str, r, addclass(class, fis, st))) |
⊦ compatrefs(str, st) ↔ (∀ r. r ≠ jvmref ∧ r -- _type ∈ st ∧ is_typevalue(st[r -- _type]) → (is_classtype(st[r -- _type] .type) ∧ class+∃(str, st[r -- _type] .type .class) → compatobj(str, r, st)) ∧ ( is_arraytype(st[r -- _type] .type) ∧ (¬ has_classtype(st[r -- _type] .type) ∨ tdname+∃(str, st[r -- _type] .type .jtelemtype .class)) → compatarray(str, r, st)))
fis .keys = statfields(class), st[r -- _type] = typeval(ty), r ∈ st, okfieldinits(class, fis), ∀ r. r ≠ jvmref ∧ r -- _type ∈ st ∧ is_typevalue(st[r -- _type]) → (is_classtype(st[r -- _type] .type) ∧ class+∃(str, st[r -- _type] .type .class) → compatobj(str, r, st)) ∧ ( is_arraytype(st[r -- _type] .type) ∧ (¬ has_classtype(st[r -- _type] .type) ∨ tdname+∃(str, st[r -- _type] .type .jtelemtype .class)) → compatarray(str, r, st)), compatstatic(str, st), compatmode(str, st), r -- _type ∈ addclass(class, fis, st) ⊦ r = jvmref, (is_classtype(ty) ∧ class+∃(str, ty .class) → compatobj(str, r, addclass(class, fis, st))) ∧ (is_arraytype(ty) ∧ (¬ has_classtype(ty) ∨ tdname+∃(str, ty .type .jtelemtype .class)) → compatarray(str, r, addclass(class, fis, st)))
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st, str)]]