Polymorphic maps to be used in spec/ghost only ... mem (k: 'k) (m: fmap 'k 'v) = S.mem k m.domain predicate mapsto (k: 'k) (v: 'v) (m: fmap 'k 'v) = mem k m ...
確定! 回上一頁