Goal:
    a : byte  b : byte  H : a = b
  ============================
   (NoConfusion_byte a b)


DEBUG:Going to execute:
fun H =>
             let ph := fresh "X" in
             let ph' := fresh "X" in
             destruct H as [H ph ph']