Hint Resolve min_not_occ: searchtrees.
(* technical lemmas about some non-leaf search tree *)
Section search_tree_basic_properties.
Variables (n : key) (v : data) (t1 t2 : btree).
Hypothesis se : search_tree (bnode n v t1 t2).

Lemma not_right : forall (p : key) (v' : data), Key.le p n -> ~ occ v' p t2.
Hint Resolve not_right: searchtrees.