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


DEBUG:Going to execute:
exact val