fact: Definition equal_more x1 v1 (cont:enumeration->bool) e2 := match e2 with | End => false | More x2 v2 r2 e2 => match K.compare x1 x2 with | Eq => eqb v1 v2 &&& cont (cons r2 e2) | _ => false end end.
imports: Coq(Bool Arith BinInt FunInd) Coq(Orders OrdersFacts OrdersLists) MMaps(Comparisons Interface OrdList)