fact: Definition pick (h : heap) := if h is Heap.Def hs _ then head null (supp hs) else null.
imports: Coq(ssreflect ssrbool ssrfun Eqdep) mathcomp(ssrnat eqtype seq path) pcm(options axioms finmap) pcm(pcm unionmap)