| v ∈ vols0[v0, ebatbl], ∀ vols1, v. # vols1 < # vols0[v0, ebatbl] → v ∈ vols1 → to-vtbl(vols1)[v] = # vols1[v] ⊦ to-vtbl(vols0)[v0, # ebatbl][v] = # vols0[v0, ebatbl][v], v = v0, v0 ∈ vols0 |
v ∈ vols0, ∀ vols1, v. # vols1 < # vols0[v0, ebatbl] → v ∈ vols1 → to-vtbl(vols1)[v] = # vols1[v] ⊦ to-vtbl(vols0)[v] = # vols0[v], v0 ∈ vols0
Used simplifier rules: ⊦ v ≠ v0 → (v ∈ vols[v0, ebatbl] ↔ v ∈ vols); (s)% ⊦ v ≠ v0 → vols[v0, ebatbl][v] = vols[v]; (s)% ⊦ v ≠ v0 → vtbl[v0, n][v] = vtbl[v]; (s)