Goal:
  
  A : Type
  B : Type
  f : nat → A → B
  g : nat → A → B
  l : list A
  H : ∀ (n : nat) (x : A), f n x = g n x
  ============================
   (mapi f l = mapi g l)


DEBUG:Going to execute:
now apply mapi_rec_ext