Goal:
  
  A : Type
  B : Type
  C : Type
  f : A → B → C
  g : A → B → C
  l : list A
  l' : list B
  H : ∀ (x : A) (y : B), f x y = g x y
  ============================
   (map2 f l l' = map2 g l l')


DEBUG:Going to execute:
induction l in l' |- *

Goals:
  
  A : Type
  B : Type
  C : Type
  f : A → B → C
  g : A → B → C
  l' : list B
  H : ∀ (x : A) (y : B), f x y = g x y
  ============================
   (map2 f [] l' = map2 g [] l')

  
  A : Type
  B : Type
  C : Type
  f : A → B → C
  g : A → B → C
  a : A
  l : list A
  l' : list B
  H : ∀ (x : A) (y : B), f x y = g x y
  IHl : ∀ l' : list B, map2 f l l' = map2 g l l'
  ============================
   (map2 f (a :: l) l' = map2 g (a :: l) l')


DEBUG:Going to execute:
destruct l'
DEBUG LTAC Evaluated term: l

Goals:
  
  A : Type
  B : Type
  C : Type
  f : A → B → C
  g : A → B → C
  H : ∀ (x : A) (y : B), f x y = g x y
  ============================
   (map2 f [] [] = map2 g [] [])

  
  A : Type
  B : Type
  C : Type
  f : A → B → C
  g : A → B → C
  b : B
  l' : list B
  H : ∀ (x : A) (y : B), f x y = g x y
  ============================
   (map2 f [] (b :: l') = map2 g [] (b :: l'))

  
  A : Type
  B : Type
  C : Type
  f : A → B → C
  g : A → B → C
  a : A
  l : list A
  H : ∀ (x : A) (y : B), f x y = g x y
  IHl : ∀ l' : list B, map2 f l l' = map2 g l l'
  ============================
   (map2 f (a :: l) [] = map2 g (a :: l) [])

  
  A : Type
  B : Type
  C : Type
  f : A → B → C
  g : A → B → C
  a : A
  l : list A
  b : B
  l' : list B
  H : ∀ (x : A) (y : B), f x y = g x y
  IHl : ∀ l' : list B, map2 f l l' = map2 g l l'
  ============================
   (map2 f (a :: l) (b :: l') = map2 g (a :: l) (b :: l'))


DEBUG:Going to execute:
simpl
DEBUG LTAC Evaluated term: l'
DEBUG LTAC Evaluated term: l'

Goals:
  
  A : Type
  B : Type
  C : Type
  f : A → B → C
  g : A → B → C
  H : ∀ (x : A) (y : B), f x y = g x y
  ============================
   ([] = [])

  
  A : Type
  B : Type
  C : Type
  f : A → B → C
  g : A → B → C
  b : B
  l' : list B
  H : ∀ (x : A) (y : B), f x y = g x y
  ============================
   ([] = [])

  
  A : Type
  B : Type
  C : Type
  f : A → B → C
  g : A → B → C
  a : A
  l : list A
  H : ∀ (x : A) (y : B), f x y = g x y
  IHl : ∀ l' : list B, map2 f l l' = map2 g l l'
  ============================
   ([] = [])

  
  A : Type
  B : Type
  C : Type
  f : A → B → C
  g : A → B → C
  a : A
  l : list A
  b : B
  l' : list B
  H : ∀ (x : A) (y : B), f x y = g x y
  IHl : ∀ l' : list B, map2 f l l' = map2 g l l'
  ============================
   (f a b :: map2 f l l' = g a b :: map2 g l l')


DEBUG:Going to execute:
auto

Goals:
  
  A : Type
  B : Type
  C : Type
  f : A → B → C
  g : A → B → C
  H : ∀ (x : A) (y : B), f x y = g x y
  ============================
   ([] = [])

  
  A : Type
  B : Type
  C : Type
  f : A → B → C
  g : A → B → C
  b : B
  l' : list B
  H : ∀ (x : A) (y : B), f x y = g x y
  ============================
   ([] = [])

  
  A : Type
  B : Type
  C : Type
  f : A → B → C
  g : A → B → C
  a : A
  l : list A
  H : ∀ (x : A) (y : B), f x y = g x y
  IHl : ∀ l' : list B, map2 f l l' = map2 g l l'
  ============================
   ([] = [])

  
  A : Type
  B : Type
  C : Type
  f : A → B → C
  g : A → B → C
  a : A
  l : list A
  b : B
  l' : list B
  H : ∀ (x : A) (y : B), f x y = g x y
  IHl : ∀ l' : list B, map2 f l l' = map2 g l l'
  ============================
   (f a b :: map2 f l l' = g a b :: map2 g l l')


DEBUG:Going to execute:
<coq-core.plugins.ltac::auto@0> $1 $2 $3