| ¬ ( ¬ junkrefs(str, r ' + refs0, (st[r0 -- mkfs(class, ty0, fieldvar) ', refval(r1)][r -- _type]) .type, st) ∧ ¬ junkref(str, r1, st) ∧ st[r1 -- _type] .type ≤ mkfs(class, ty0, fieldvar) .type ∧ r1 ≠ jvmref ∧ mkfs(class, ty0, fieldvar) .type ≠ void_type ∧ mkfs(class, ty0, fieldvar) ' ≠ _length), is_reftype(ty0), ty ≤ ty0, junkrefs(str, r ' + refs0, (st[r0 -- mkfs(class, ty0, fieldvar) ', refval(r1)][r -- _type]) .type, st[r0 -- mkfs(class, ty0, fieldvar) ', refval(r1)]), r1 = jvmref ∨ st[r1 -- _type] .type ≤ ty ∧ ¬ junkref(str, r1, st) ⊦ junkref(str, r, st) |
⊦ ¬ junkref(str, r, st) → (junkrefs(str, r ' + refs0, st[r -- _type] .type, st) ↔ false)
is_reftype(ty0), ty ≤ ty0, junkrefs(str, r ' + refs0, st[r -- _type] .type, st[r0 -- mkfs(class, ty0, fieldvar) ', refval(r1)]), r1 = jvmref ∨ st[r1 -- _type] .type ≤ ty ∧ ¬ junkref(str, r1, st) ⊦ ty0 = void_type, junkref(str, r, st), mkfs(class, ty0, fieldvar) ' ≠ _length ∧ r1 ≠ jvmref ∧ st[r1 -- _type] .type ≤ ty0 ∧ ¬ junkref(str, r1, st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ ¬ is_reftype(void_type)], [CSIMPSEQ : ⊦ ty ≤ void_type ↔ ty = void_type], [CSIMPSEQ : ⊦ ty ≠ void_type → (st[ r -- mkfs (class, ty, fieldvar) ', val] [r0 -- _type ] ) = st[r0 -- _type]], [CSIMPSEQ : ⊦ mkfs(class, ty, fieldvar) .type = ty], [CSIMPSEQ : ⊦ (refs + refs0) + refs1 = refs + refs0 + refs1])]]