Goal:
    y : t  H : compare y y = Lt
  ============================
   False


DEBUG:Going to execute:
induction y

Goals:
    H : compare "" "" = Lt
  ============================
   False

  
  b : Byte.byte
  y : string
  H : compare (String b y) (String b y) = Lt
  IHy : compare y y = Lt -> False
  ============================
   False


DEBUG:Going to execute:
simpl in *
DEBUG LTAC Evaluated term: y

Goals:
    H : Eq = Lt
  ============================
   False

  
  b : Byte.byte
  y : string
  H : match ByteCompare.compare b b with
      | Eq => compare y y
      | Lt => Lt
      | Gt => Gt
      end = Lt
  IHy : compare y y = Lt -> False
  ============================
   False


DEBUG:Going to execute:
try congruence