enrich
store-access,
list-del
with
functions iter . : store → list;
axioms iter-in : ⊦ a ∈ iter st ↔ a ∈ st;
used for: s, ls;
iter-nodups : ⊦ ¬ dups(iter st);
used for: s, ls;
iter-eq : ⊦ iter st0 = iter st1 ↔ dom st0 = dom st1;
used for: s, ls;
end enrich