2 lines
91 B
Haskell
2 lines
91 B
Haskell
*Main> (ap (==) . liftM2 (.) undoLZW doLZW) ['\0'..'\255'] "TOBEORNOTTOBEORTOBEORNOT"
|
|
True
|