Goal:
  
  G : t
  HI : invariants
  P : VSet.elt -> Prop
  f : VSet.elt -> bool
  Hf : forall x : VSet.elt, ssrbool.reflect (P x) (f x)
  s : VSet.t
  ============================
   (VSet.For_all P s <-> VSet.For_all (fun x : VSet.elt => f x = true) s)


DEBUG:Going to execute:
apply iff_forall