mirror
/
RosettaCodeData
mirror of https://github.com/acmeism/RosettaCodeData.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity
RosettaCodeData/Task/LZW-compression/Haskell/lzw-compression-3.hs

3 lines
91 B
Haskell
Raw Permalink Blame History

*Main> (ap (==) . liftM2 (.) undoLZW doLZW) ['\0'..'\255'] "TOBEORNOTTOBEORTOBEORNOT"
True
Reference in New Issue View Git Blame Copy Permalink