fact: Fixpoint get (C : Type) (x : X.t) (E : list (X.t*C)) : option C := match E with | nil => None | (y, c) :: F => if (x == y) then Some c else get x F end.
imports: Coq.FSets.FSets Coq.Lists.List Coq.Logic.Decidable Coq.Strings.String String Metalib.CoqFSetDecide Metalib.CoqListFacts Metalib.LibTactics Metalib.CoqFSetInterface Coq.Classes.Equivalence Coq.Classes.EquivDec Metalib.CoqEqDec