| v ∈ vols ⊦ v0 = v, (v0 ∈ to-vtbl(vols -- v)[v, # vols[v]] ↔ v0 ∈ vols) ∧ to-vtbl(vols -- v)[v, # vols[v]][v0] = to-vtbl(vols)[v0] |
v ∈ vols ⊦ to-vtbl(vols -- v)[v0] = to-vtbl(vols)[v0], v0 = v
Used simplifier rules: to-vtbl-in: ⊦ v ∈ to-vtbl(vols) ↔ v ∈ vols;% ⊦ v ≠ v0 → vtbl[v0, n][v] = vtbl[v]; (s)% ⊦ v ∈ vols -- v0 ↔ v ≠ v0 ∧ v ∈ vols; (s)% ⊦ v ≠ v0 → (v ∈ vtbl[v0, n] ↔ v ∈ vtbl); (s)