| elems nx ∩ ginval = ∅ ⊦ abs-log(nx, gstore) = abs-log(nx, gstore \ ginval) |
elems(lnum + nx0) ∩ ginval = ∅, ∀ ginval, gstore. elems nx0 ∩ ginval = ∅ → abs-log(nx0, gstore) = abs-log(nx0, gstore \ ginval) ⊦ abs-log(lnum + nx0, gstore) = abs-log(lnum + nx0, gstore \ ginval)
Used simplifier rules: abs-log-base: ⊦ abs-log([], gstore) = [];%nat-list freely generated by [], +;;% ⊦ elems [] = ∅; (s)% ⊦ ns ∩ ∅ = ∅; (s)%int-a: ⊦ (ns ∩ ns0) ∩ ns1 = ns ∩ ns0 ∩ ns1; from specification set-union[nat-set]%int-c: ⊦ ns ∩ ns0 = ns0 ∩ ns; from specification set-union[nat-set]