Goal:
  
  G : t
  s0 : VSet.t
  s1 : VSet.t
  s2 : VSet.t
  x : VSet.elt
  Hs : VSet.Equal (VSet.union s0 (VSet.add x s1)) s2
  ============================
   (VSet.Equal (VSet.union (VSet.add x s0) s1)
      (VSet.union s0 (VSet.add x s1)))


DEBUG:Going to execute:
etransitivity