| validFields(r, fv ' + fis0, st), ∀ r, st, r0. validFields(r, fis0, st) → (update(r, fis0, st)[r0 -- _length]) = st[r0 -- _length] ⊦ (update(r, fis0, st)[r -- fv .1, fv .2][r0 -- _length]) = st[r0 -- _length] |
fv = sk × val, validFields(r, fv ' + fis0, st), ∀ r, st, r0. validFields(r, fis0, st) → (update(r, fis0, st)[r0 -- _length]) = st[r0 -- _length] ⊦ (update(r, fis0, st)[r -- sk, val][r0 -- _length]) = st[r0 -- _length]
[[CONCRETESIMPRULES : ([CSIMPELIM : ⊦ sk = fv .1 ∧ val = fv .2 ↔ fv = sk × val])], [EXTRATERMS : (fv, sk, val)]]