hsPrecTable :: PEnv
hsPrecTable = [
  ("-",     (InfixL, 6)),
  ("+",     (InfixL, 6)),
  ("*",     (InfixL, 7)),
  ("div",   (InfixN, 7)),
  ("mod",   (InfixN, 7)),

  ("<",     (InfixN, 4)),
  ("<=",    (InfixN, 4)),
  ("==",    (InfixN, 4)),
  ("/=",    (InfixN, 4)),
  (">=",    (InfixN, 4)),
  (">",     (InfixN, 4)),

  ("C:",        (InfixR, 5)),
  ("++",        (InfixR, 5)),
  ("\\",        (InfixN, 5)),
  ("!!",        (InfixL, 9)),
  (".",         (InfixR, 9)),
  ("^",         (InfixR, 8)),
  ("elem",      (InfixN, 4)),
  ("notElem",   (InfixN, 4)),

  ("||",    (InfixR, 2)),
  ("&&",    (InfixR, 3))]
hsPrecTable :: PEnv
hsPrecTable = [
  ("-",     (InfixL, 6)),
  ("+",     (InfixL, 6)),
  ("*",     (InfixL, 7)),
  ("div",   (InfixN, 7)),
  ("mod",   (InfixN, 7)),

  ("<",     (InfixN, 4)),
  ("<=",    (InfixN, 4)),
  ("==",    (InfixN, 4)),
  ("/=",    (InfixN, 4)),
  (">=",    (InfixN, 4)),
  (">",     (InfixN, 4)),

  ("C:",        (InfixR, 5)),
  ("++",        (InfixR, 5)),
  ("\\",        (InfixN, 5)),
  ("!!",        (InfixL, 9)),
  (".",         (InfixR, 9)),
  ("^",         (InfixR, 8)),
  ("elem",      (InfixN, 4)),
  ("notElem",   (InfixN, 4)),

  ("||",    (InfixR, 2)),
  ("&&",    (InfixR, 3))]
hsPrecTable = [
  ("-",     (InfixL, 6)),
  ("+",     (InfixL, 6)),
  ("*",     (InfixL, 7)),
  ("div",   (InfixN, 7)),
  ("mod",   (InfixN, 7)),

  ("<",     (InfixN, 4)),
  ("<=",    (InfixN, 4)),
  ("==",    (InfixN, 4)),
  ("/=",    (InfixN, 4)),
  (">=",    (InfixN, 4)),
  (">",     (InfixN, 4)),

  ("C:",        (InfixR, 5)),
  ("++",        (InfixR, 5)),
  ("\\",        (InfixN, 5)),
  ("!!",        (InfixL, 9)),
  (".",         (InfixR, 9)),
  ("^",         (InfixR, 8)),
  ("elem",      (InfixN, 4)),
  ("notElem",   (InfixN, 4)),

  ("||",    (InfixR, 2)),
  ("&&",    (InfixR, 3))]