Goal:
    A : Type  i : positive
  ============================
   (forall (j : positive) (m : tree' A),
    i <> j -> get i (rem' j m) = get' i m)


DEBUG:Going to execute:
induction i; destruct j, m; simpl