Goal:
  
  A : Type
  f : nat → A → bool
  g : nat → A → bool
  fg : f =2 g
  y : nat
  y0 : list A
  ============================
   (alli f y y0 = alli g y y0)


DEBUG:Going to execute:
apply alli_ext