Goal:
  
  A : Type
  B : Type
  P : A → Type
  f : B → A
  x : B
  l : list B
  p : P (f x)
  X : All (λ x : B, P (f x)) l
  IHX : All P (rev_map f l)
  ============================
   (All P (rev_map f (x :: l)))


DEBUG:Going to execute:
<coq-core.plugins.ssreflect::ssrrewrite@0> $1 $2