Goal:
  
  A : Type
  B : Type
  C : Type
  P : A → B → Type
  l : list C
  l' : list B
  f : C → A
  X : All2 P (map f l) (map (λ x : B, x) l')
  ============================
   (All2 (λ (x : C) (y : B), P (f x) y) l l')


DEBUG:Going to execute:
eapply All2_map_inv
DEBUG LTAC Evaluated term: (map_id l')
DEBUG LTAC Evaluated term: (map_id l')