| is_array(str, r, st), is_valid_ref(str, r, st[r -- sk, val]), st[r -- _type] .type ≤ ty, is_valid_ref(r, st) ⊦ sk = _length, sk = _type, r0 = st[r -- sk] .refval, val .refval = r0, r = r0, r = jvmref, validrefs(str, r ' + r0 ' + refs1, ty, st[r -- sk, val]) ↔ (∃ i. ¬ i < 0 ∧ ¬ st[r -- _length] .intval ≤ i ∧ is_referencevalue(st[r -- i ']) ∧ r0 = st[r -- i '] .refval ∧ validrefs(str, st[r -- i '] .refval ' + refs1, st[r -- _type] .type .type, st)), r0 ∈ refs1, dups(refs1), r ∈ refs1 |
⊦ is_array(str, r, st) ∧ st[r -- _type] .type ≤ ty → ( validrefs(str, r ' + refs, ty, st) ↔ refs = [] ∨ (∃ i. 0 ≤ i ∧ i < st[r -- _length] .intval ∧ is_referencevalue(st[r -- i ']) ∧ refs .first = st[r -- i '] .refval ∧ validrefs(str, refs, st[r -- _type] .type .type, st)))
¬ (is_array(str, r, st[r -- sk, val]) ∧ (st[r -- sk, val][r -- _type]) .type ≤ ty), is_array(str, r, st), is_valid_ref(str, r, st[r -- sk, val]), st[r -- _type] .type ≤ ty, is_valid_ref(r, st) ⊦ sk = _length, sk = _type, r0 = st[r -- sk] .refval, val .refval = r0, r = r0, r = jvmref, validrefs(str, r ' + r0 ' + refs1, ty, st[r -- sk, val]) ↔ (∃ i. ¬ i < 0 ∧ ¬ st[r -- _length] .intval ≤ i ∧ is_referencevalue(st[r -- i ']) ∧ r0 = st[r -- i '] .refval ∧ validrefs(str, st[r -- i '] .refval ' + refs1, st[r -- _type] .type .type, st)), r0 ∈ refs1, dups(refs1), r ∈ refs1
is_array(str, r, st[r -- sk, val]) ∧ (st[r -- sk, val][r -- _type]) .type ≤ ty, is_array(str, r, st), is_valid_ref(str, r, st[r -- sk, val]), st[r -- _type] .type ≤ ty, is_valid_ref(r, st) ⊦ sk = _length, sk = _type, r0 = st[r -- sk] .refval, val .refval = r0, r = r0, r = jvmref, r0 ' + refs1 = [] ∨ (∃ i. 0 ≤ i ∧ i < (st[r -- sk, val][r -- _length]) .intval ∧ is_referencevalue(st[r -- sk, val][r -- i ']) ∧ (r0 ' + refs1) .first = (st[r -- sk, val][r -- i ']) .refval ∧ validrefs(str, r0 ' + refs1, (st[r -- sk, val][r -- _type]) .type .type, st[r -- sk, val])) ↔ (∃ i. ¬ i < 0 ∧ ¬ st[r -- _length] .intval ≤ i ∧ is_referencevalue(st[r -- i ']) ∧ r0 = st[r -- i '] .refval ∧ validrefs(str, st[r -- i '] .refval ' + refs1, st[r -- _type] .type .type, st)), r0 ∈ refs1, dups(refs1), r ∈ refs1
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st[r -- sk, val], ty, r0 ' + refs1, r, str)]]