Goal:
  
  A : Type
  eos : CoreTactics.end_of_section
  fix_0 : ∀ (l : list A) (H : ∀ x : A, In x l → bool),
            forallb_InP_graph l H (forallb_InP l H)
  ============================
   (∀ (l : list A) (H : ∀ x : A, In x l → bool),
      forallb_InP_graph l H (forallb_InP l H))


DEBUG:Going to execute:
match goal with
           | H:_ ∧ _ |- _ => destruct H
           | H:_ * _ |- _ => destruct H
           | H:?X → _, H':?X
             |- _ => match X with
                     | _ → _ => specialize (H H')
                     end
           | H:?A ∧ ?B → ?C |- _ => apply (uncurry_conj A B C) in H
           end