Goal:
    A : byte -> Type  f : forall b : byte, A b  v := f "v"%byte : A "v"%byte
  ============================
   (A "v"%byte)


DEBUG:Going to execute:
exact val