| (fv ' + fis0)[n] = sk × val, n ≤ # fis0, ∀ n0, sk0, val0. fis0[n0] = sk0 × val0 ∧ ¬ # fis0 ≤ n0 → (fis0 .vals)[n0] = val0 ∨ fis0 = [] ⊦ (fv .2 ' + fis0 .vals)[n] = val |
fv = sk1 × val1, (fv ' + fis0)[n] = sk × val, n ≤ # fis0, ∀ n0, sk0, val0. fis0[n0] = sk0 × val0 ∧ ¬ # fis0 ≤ n0 → (fis0 .vals)[n0] = val0 ∨ fis0 = [] ⊦ (val1 ' + fis0 .vals)[n] = val
[[CONCRETESIMPRULES : ([CSIMPELIM : ⊦ sk = fv .1 ∧ val = fv .2 ↔ fv = sk × val])], [EXTRATERMS : (fv, sk1, val1)]]