| v ∈ vols ⊦ (v0 ∈ to-vtbl(vols -- v)[v, # vols[v]] ↔ v0 ∈ vols) ∧ to-vtbl(vols -- v)[v, # vols[v]][v0] = to-vtbl(vols)[v0] |
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]
Used simplifier rules: to-vtbl-at: ⊦ v ∈ vols → to-vtbl(vols)[v] = # vols[v];% ⊦ ¬ v ∈ vols → vols -- v = vols; (s)% ⊦ ¬ v ∈ vols → vols[v] = (∅)[v]; (s)% ⊦ v ∈ vtbl[v, n]; (s)% ⊦ vtbl[v, n][v] = n; (s) Used formulas: v0 = v