| sk .fs = mkfs(class, ty, fieldvar), is_indexkey(sk), okval(refval(r0), st[r -- _type] .type .type), validref(str, r0, st[r -- _type] .type .type, st), validval(str, refval(r2), ty0, st) ⊦ mkfs(class0, ty0, fieldvar0) ' = _length, ty0 = void_type, validref(str, r0, st[r -- _type] .type .type, st[r1 -- mkfs(class0, ty0, fieldvar0) ', refval(r2)]), validref(str, r2, ty0, st) ∧ is_reftype(ty0) |
⊦ validval(str, val, ty, st) ↔ okval(val, ty) ∧ (is_referencevalue(val) → validrefval(str, val, ty, st))
⊦ validrefval(str, refval(r), ty, st) ↔ validref(str, r, ty, st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ okval(refval(r), ty) ↔ ty = void_type ∨ is_reftype(ty)], [CSIMPSEQ : ⊦ is_referencevalue(refval(r))])], [EXTRATERMS : (st, ty0, refval(r2), str)]]