| is_valid_ref(str, r, st), st[r -- _type] .type ≤ ty, is_valid_ref(str, r, st[r -- sk, val]) ⊦ r = r0, val .refval = r0, r0 = st[r -- sk] .refval, sk = _type, sk = _length, validrefs(str, r ' + r0 ' + refs1, ty, st[r -- sk, val]) ↔ validrefs(str, r ' + r0 ' + refs1, ty, st), r = jvmref, r ∈ refs1, dups(refs1), r0 ∈ refs1 |
⊦ is_valid_ref(str, r, st) ↔ ¬ ¬ (is_valid_ref(r, st) ∧ (is_obj(str, r, st) ∨ is_array(str, r, st)))
is_valid_ref(r, st) ∧ (is_obj(str, r, st) ∨ is_array(str, r, st)), st[r -- _type] .type ≤ ty, is_valid_ref(str, r, st[r -- sk, val]) ⊦ r = r0, val .refval = r0, r0 = st[r -- sk] .refval, sk = _type, sk = _length, validrefs(str, r ' + r0 ' + refs1, ty, st[r -- sk, val]) ↔ validrefs(str, r ' + r0 ' + refs1, ty, st), r = jvmref, r ∈ refs1, dups(refs1), r0 ∈ refs1
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st, r, str)]]