Goal:
    A : Type
  ============================
   (∀ (l : list A) (H : ∀ x : A, In x l → bool),
      forallb_InP_graph l H (forallb_InP l H))


DEBUG:Going to execute:
CoreTactics.set_eos