| validreflist(str, vals1, ty1, st), validref(str, val .refval, ty1, st), is_referencevalue(val), ∀ str, ty1, st, ty, vals0. validreflist(str, vals1, ty1, st) → validreflist(str, vals1, ty1, addarray(newref(st), ty, vals0, st)) ⊦ validreflist(str, val ' + vals1, ty1, addarray(newref(st), ty, vals0, st)) |
val = refval(r), validreflist(str, vals1, ty1, st), validref(str, r, ty1, st), is_referencevalue(val), ∀ str, ty1, st, ty, vals0. validreflist(str, vals1, ty1, st) → validreflist(str, vals1, ty1, addarray(newref(st), ty, vals0, st)) ⊦ validreflist(str, val ' + vals1, ty1, addarray(newref(st), ty, vals0, st))
[[CONCRETESIMPRULES : ([CSIMPELIM : ⊦ is_referencevalue(val) → ( r = val .refval ↔ val = refval(r))])], [EXTRATERMS : (val, r)]]