Goal:
  
  A : Type
  RA : ReflectEq A
  a0 : A
  y : list A
  IHx : forall y0 : list A, reflectProp (y = y0) (eqb_list eqb y y0)
  ============================
   (a0 :: y = a0 :: y)


DEBUG:Going to execute:
reflexivity