fact: Fixpoint pmap_lookup' (ts : pmap Type) (p : positive) : option Type := match p with | xH => pmap_here ts | xI p => pmap_lookup' (pmap_right ts) p | xO p => pmap_lookup' (pmap_left ts) p end.
imports: Coq(PArith) ExtLib.Data.Map.FMapPositive ExtLib.Data.Eq ExtLib.Tactics.Injection Coq(PArith)