Goal:
    P : E.t -> Prop  P_Proper : Proper (E.eq ==> impl) P  s : t
  ============================
   (List.Exists P nil -> exists x : elt, InA E.eq x nil /\ P x)


DEBUG:Going to execute:
<coq-core.plugins.ltac::constructor@0>