abc.haskell.native

[ [ ( KeywordTok , "import" )
  , ( NormalTok , " " )
  , ( DataTypeTok , "Data.List" )
  , ( NormalTok , " (delete)" )
  ]
, [ ( KeywordTok , "import" )
  , ( NormalTok , " " )
  , ( DataTypeTok , "Data.Char" )
  , ( NormalTok , " (toUpper)" )
  ]
, []
, [ ( CommentTok
    , "-- returns list of all solutions, each solution being a list of blocks"
    )
  ]
, [ ( OtherTok , "abc ::" )
  , ( NormalTok , " (" )
  , ( DataTypeTok , "Eq" )
  , ( NormalTok , " a) " )
  , ( OtherTok , "=>" )
  , ( NormalTok , " [[a]] " )
  , ( OtherTok , "->" )
  , ( NormalTok , " [a] " )
  , ( OtherTok , "->" )
  , ( NormalTok , " [[[a]]]" )
  ]
, [ ( NormalTok , "abc _ [] " )
  , ( OtherTok , "=" )
  , ( NormalTok , " [[]]" )
  ]
, [ ( NormalTok , "abc blocks (c" )
  , ( OperatorTok , ":" )
  , ( NormalTok , "cs) " )
  , ( OtherTok , "=" )
  , ( NormalTok , " [b" )
  , ( OperatorTok , ":" )
  , ( NormalTok , "ans " )
  , ( OperatorTok , "|" )
  , ( NormalTok , " b " )
  , ( OtherTok , "<-" )
  , ( NormalTok , " blocks, c " )
  , ( OtherTok , "`elem`" )
  , ( NormalTok , " b," )
  ]
, [ ( NormalTok , "                             ans " )
  , ( OtherTok , "<-" )
  , ( NormalTok , " abc (delete b blocks) cs]" )
  ]
, []
, [ ( NormalTok , "blocks " )
  , ( OtherTok , "=" )
  , ( NormalTok , " [" )
  , ( StringTok , "\"BO\"" )
  , ( NormalTok , ", " )
  , ( StringTok , "\"XK\"" )
  , ( NormalTok , ", " )
  , ( StringTok , "\"DQ\"" )
  , ( NormalTok , ", " )
  , ( StringTok , "\"CP\"" )
  , ( NormalTok , ", " )
  , ( StringTok , "\"NA\"" )
  , ( NormalTok , ", " )
  , ( StringTok , "\"GT\"" )
  , ( NormalTok , ", " )
  , ( StringTok , "\"RE\"" )
  , ( NormalTok , ", " )
  , ( StringTok , "\"TG\"" )
  , ( NormalTok , ", " )
  , ( StringTok , "\"QD\"" )
  , ( NormalTok , ", " )
  , ( StringTok , "\"FS\"" )
  , ( NormalTok , "," )
  ]
, [ ( NormalTok , "          " )
  , ( StringTok , "\"JW\"" )
  , ( NormalTok , ", " )
  , ( StringTok , "\"HU\"" )
  , ( NormalTok , ", " )
  , ( StringTok , "\"VI\"" )
  , ( NormalTok , ", " )
  , ( StringTok , "\"AN\"" )
  , ( NormalTok , ", " )
  , ( StringTok , "\"OB\"" )
  , ( NormalTok , ", " )
  , ( StringTok , "\"ER\"" )
  , ( NormalTok , ", " )
  , ( StringTok , "\"FS\"" )
  , ( NormalTok , ", " )
  , ( StringTok , "\"LY\"" )
  , ( NormalTok , ", " )
  , ( StringTok , "\"PC\"" )
  , ( NormalTok , ", " )
  , ( StringTok , "\"ZM\"" )
  , ( NormalTok , "]" )
  ]
, []
, [ ( OtherTok , "main ::" )
  , ( NormalTok , " " )
  , ( DataTypeTok , "IO" )
  , ( NormalTok , " ()" )
  ]
, [ ( NormalTok , "main " )
  , ( OtherTok , "=" )
  , ( NormalTok , " " )
  , ( FunctionTok , "mapM_" )
  , ( NormalTok , " (\\w " )
  , ( OtherTok , "->" )
  , ( NormalTok , " " )
  , ( FunctionTok , "print" )
  , ( NormalTok , " (w, " )
  , ( FunctionTok , "not" )
  , ( NormalTok , " " )
  , ( OperatorTok , "." )
  , ( NormalTok , " " )
  , ( FunctionTok , "null" )
  , ( NormalTok , " " )
  , ( OperatorTok , "$" )
  , ( NormalTok , " abc blocks (" )
  , ( FunctionTok , "map" )
  , ( NormalTok , " " )
  , ( FunctionTok , "toUpper" )
  , ( NormalTok , " w)))" )
  ]
, [ ( NormalTok , "         [" )
  , ( StringTok , "\"\"" )
  , ( NormalTok , ", " )
  , ( StringTok , "\"A\"" )
  , ( NormalTok , ", " )
  , ( StringTok , "\"BARK\"" )
  , ( NormalTok , ", " )
  , ( StringTok , "\"BoOK\"" )
  , ( NormalTok , ", " )
  , ( StringTok , "\"TrEAT\"" )
  , ( NormalTok , ", " )
  , ( StringTok , "\"COmMoN\"" )
  , ( NormalTok , ", " )
  , ( StringTok , "\"SQUAD\"" )
  , ( NormalTok , ", " )
  , ( StringTok , "\"conFUsE\"" )
  , ( NormalTok , "]" )
  ]
]