Goal:
  
  A : Type
  B : Type
  C : Type
  f : nat → A → B → C
  g : nat → A → B → C
  a : A
  l : list A
  b : B
  l' : list B
  Hfg : ∀ (i : nat) (x : A) (y : B), f i x y = g i x y
  IHl : ∀ (l' : list B) (n : nat), map2i_rec f n l l' = map2i_rec g n l l'
  n : nat
  ============================
   (f n a b :: map2i_rec f (S n) l l' = g n a b :: map2i_rec g (S n) l l')


DEBUG:Going to execute:
f_equal