fact: Definition read_sp (p : ideald read_s.1) (v : ans A) m := m \In id_val p /\ exists w, v = Val w /\ look x m = dyn w.
imports: mathcomp(ssreflect ssrbool ssrfun ssrnat eqtype seq) LemmaOverloading(prelude heaps rels hprop domains)