| is_primtype(ty) ⊦ junkrefs(str, r ' + refs, mkarraytype(ty), st) ↔ r ≠ jvmref ∧ ¬ okarray(r, ty, st) |
⊦ r ≠ jvmref ∧ (¬ is_valid_ref(str, r, st) ∨ ¬ st[r -- _type] .type ≤ ty) → junkrefs(str, r ' + refs, ty, st)
¬ (r ≠ jvmref ∧ (¬ is_valid_ref(str, r, st) ∨ ¬ st[r -- _type] .type ≤ mkarraytype(ty))), is_primtype(ty) ⊦ junkrefs(str, r ' + refs, mkarraytype(ty), st) ↔ r ≠ jvmref ∧ ¬ okarray(r, ty, st)
r ≠ jvmref ∧ (¬ is_valid_ref(str, r, st) ∨ ¬ st[r -- _type] .type ≤ mkarraytype(ty)), is_primtype(ty) ⊦ true ↔ r ≠ jvmref ∧ ¬ okarray(r, ty, st)
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st, mkarraytype(ty), refs, r, str)]]