Anonymous user
LZW compression: Difference between revisions
m
→{{header|Haskell}}: make the types more general
m (→{{header|Julia}}: update from Julia 0.6 to 1.1.1) |
m (→{{header|Haskell}}: make the types more general) |
||
Line 2,038:
import Data.Maybe (fromJust)
doLZW ::
doLZW _ [] = []
doLZW as (x:xs) = lzw (return <$> as) [x] xs
Line 2,049:
w_ = w ++ [x]
undoLZW ::
undoLZW _ [] = []
undoLZW a cs =
|