[ [ ( 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 _ [] " ) , ( FunctionTok , "=" ) , ( NormalTok , " [[]]" ) ] , [ ( NormalTok , "abc blocks (c" ) , ( FunctionTok , ":" ) , ( NormalTok , "cs) " ) , ( FunctionTok , "=" ) , ( NormalTok , " [b" ) , ( FunctionTok , ":" ) , ( NormalTok , "ans " ) , ( FunctionTok , "|" ) , ( NormalTok , " b " ) , ( OtherTok , "<-" ) , ( NormalTok , " blocks, c " ) , ( OtherTok , "`elem`" ) , ( NormalTok , " b," ) ] , [ ( NormalTok , " ans " ) , ( OtherTok , "<-" ) , ( NormalTok , " abc (delete b blocks) cs]" ) ] , [] , [ ( NormalTok , "blocks " ) , ( FunctionTok , "=" ) , ( 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 " ) , ( FunctionTok , "=" ) , ( NormalTok , " mapM_ (\\w " ) , ( OtherTok , "->" ) , ( NormalTok , " print (w, not " ) , ( FunctionTok , "." ) , ( NormalTok , " null " ) , ( FunctionTok , "\$" ) , ( NormalTok , " abc blocks (map toUpper 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 , "]" ) ] ]