Goal:
  
  A : Type
  i : positive
  x : A
  IHi : forall m : tree' A, get' i (set' i x m) = Some x
  m : tree' A
  a : A
  ============================
   (get' i (set0 i x) = Some x)


DEBUG:Going to execute:
<coq-core.plugins.ltac::auto@0> $1 $2 $3