fact: Fixpoint min_binding (t : tree) : option (key * elt) := match t with | Leaf => None | Node _ Leaf x e r => Some (x,e) | Node _ l x e r => min_binding l end.
imports: Coq(Bool Arith BinInt FunInd) Coq(Orders OrdersFacts OrdersLists) MMaps(Comparisons Interface OrdList)