Goal:
    A : Type  B : Type  f : nat → A → B  l : list A  l' : list A  n : nat
  ============================
   (mapi_rec f (l ++ l') n = mapi_rec f l n ++ mapi_rec f l' (#|l| + n))


DEBUG:Going to execute:
induction l in n |- *; simpl