Goal:
  
  elt : Type
  lt_tree_dec : forall (x : T.t) (t : M.Raw.tree elt),
                {M.Raw.lt_tree x t} + {~ M.Raw.lt_tree x t}
  x : T.t
  t : M.Raw.tree elt
  l : M.Raw.tree elt
  k : M.Raw.key
  n : elt
  r : M.Raw.tree elt
  z : Int.Z_as_Int.t
  l0 : T.lt x k
  l1 : M.Raw.lt_tree x l
  l2 : M.Raw.lt_tree x r
  f : M.Raw.lt_tree x (M.Raw.Node l k n r z)
  ============================
   (M.Raw.In x l)


DEBUG:Going to execute:
idtac + symmetry
Level 1: Backtrace:

In environment
elt : Type
lt_tree_dec : forall (x : T.t) (t : M.Raw.tree elt),
              {M.Raw.lt_tree x t} + {~ M.Raw.lt_tree x t}
x : T.t
t, l : M.Raw.tree elt
k : M.Raw.key
n : elt
r : M.Raw.tree elt
z : Int.Z_as_Int.t
l0 : T.lt x k
l1 : M.Raw.lt_tree x l
l2 : M.Raw.lt_tree x r
f : M.Raw.lt_tree x (M.Raw.Node l k n r z)
Unable to unify "x" with "k".
Level 0: Backtrace:

In environment
elt : Type
lt_tree_dec : forall (x : T.t) (t : M.Raw.tree elt),
              {M.Raw.lt_tree x t} + {~ M.Raw.lt_tree x t}
x : T.t
t, l : M.Raw.tree elt
k : M.Raw.key
n : elt
r : M.Raw.tree elt
z : Int.Z_as_Int.t
l0 : T.lt x k
l1 : M.Raw.lt_tree x l
l2 : M.Raw.lt_tree x r
f : M.Raw.lt_tree x (M.Raw.Node l k n r z)
Unable to unify "x" with "k".
Level 0: Backtrace:

In environment
elt : Type
lt_tree_dec : forall (x : T.t) (t : M.Raw.tree elt),
              {M.Raw.lt_tree x t} + {~ M.Raw.lt_tree x t}
x : T.t
t, l : M.Raw.tree elt
k : M.Raw.key
n : elt
r : M.Raw.tree elt
z : Int.Z_as_Int.t
l0 : T.lt x k
l1 : M.Raw.lt_tree x l
l2 : M.Raw.lt_tree x r
f : M.Raw.lt_tree x (M.Raw.Node l k n r z)
Unable to unify "x" with "k".
Level 1: Backtrace:

In environment
elt : Type
lt_tree_dec : forall (x : T.t) (t : M.Raw.tree elt),
              {M.Raw.lt_tree x t} + {~ M.Raw.lt_tree x t}
x : T.t
t, l : M.Raw.tree elt
k : M.Raw.key
n : elt
r : M.Raw.tree elt
z : Int.Z_as_Int.t
l0 : T.lt x k
l1 : M.Raw.lt_tree x l
l2 : M.Raw.lt_tree x r
f : M.Raw.lt_tree x (M.Raw.Node l k n r z)
Unable to unify "x" with "k".
Level 0: Backtrace:

In environment
elt : Type
lt_tree_dec : forall (x : T.t) (t : M.Raw.tree elt),
              {M.Raw.lt_tree x t} + {~ M.Raw.lt_tree x t}
x : T.t
t, l : M.Raw.tree elt
k : M.Raw.key
n : elt
r : M.Raw.tree elt
z : Int.Z_as_Int.t
l0 : T.lt x k
l1 : M.Raw.lt_tree x l
l2 : M.Raw.lt_tree x r
f : M.Raw.lt_tree x (M.Raw.Node l k n r z)
Unable to unify "x" with "k".
Level 0: Backtrace:

In environment
elt : Type
lt_tree_dec : forall (x : T.t) (t : M.Raw.tree elt),
              {M.Raw.lt_tree x t} + {~ M.Raw.lt_tree x t}
x : T.t
t, l : M.Raw.tree elt
k : M.Raw.key
n : elt
r : M.Raw.tree elt
z : Int.Z_as_Int.t
l0 : T.lt x k
l1 : M.Raw.lt_tree x l
l2 : M.Raw.lt_tree x r
f : M.Raw.lt_tree x (M.Raw.Node l k n r z)
Unable to unify "x" with "k".