Goal:
  
  G : t
  s : VSet.t
  s' : VSet.t
  x : V.t
  y : V.t
  Hs : VSet.Subset s s'
  p : SPath s x y
  ============================
   (SPath s' x y)


DEBUG:Going to execute:
revert s' Hs