| sk .fs = mkfs(class0, ty0, fieldvar0), validref(str, r0, ty, st), is_reftype(ty), is_indexkey(sk), okval(refval(r2), st[r1 -- _type] .type .type), validref(str, r2, st[r1 -- _type] .type .type, st), r ≠ r1 ∨ _type ≠ sk ⊦ is_arraytype(st[r1 -- _type] .type), ty = void_type, mkfs(class, ty, fieldvar) ' = _length, validref(str, r0, ty, st[r1 -- sk, refval(r2)]) |
⊦ is_indexkey(sk) ↔ (∃ i. sk = i ')
sk .fs = mkfs(class0, ty0, fieldvar0), validref(str, r0, ty, st), is_reftype(ty), ∃ i. sk = i ', okval(refval(r2), st[r1 -- _type] .type .type), validref(str, r2, st[r1 -- _type] .type .type, st), r ≠ r1 ∨ _type ≠ sk ⊦ is_arraytype(st[r1 -- _type] .type), ty = void_type, mkfs(class, ty, fieldvar) ' = _length, validref(str, r0, ty, st[r1 -- sk, refval(r2)])
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (sk)]]