| # ax = # ndx ⊦ fs[adr, nd][ax, ndx] = fs[ax, ndx][adr, nd], adr ∈ ax |
#(adr0 + ax0) = # ndx, ∀ ndx, fs, adr, nd. # ax0 = # ndx → fs[adr, nd][ax0, ndx] = fs[ax0, ndx][adr, nd] ∨ adr ∈ ax0 ⊦ fs[adr, nd][adr0 + ax0, ndx] = fs[adr0 + ax0, ndx][adr, nd], adr ∈ adr0 + ax0
Used simplifier rules: write-base: ⊦ fs[[], []] = fs;%address-list freely generated by [], +;;% ⊦ # [] = 0; (s)% ⊦ # ndx = 0 ↔ ndx = []; (s)% ⊦ ¬ adr ∈ []; (s)