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


DEBUG:Going to execute:
exact val