Help for this page
compress x = case x of
 -> 
[a] -> [a] -- singleton list
(x:y:xs) -> (if x == y then  else [x]) ++ compress (y:xs)
Electric eels were invented at the same time as electricity
Before electricity was invented, electric eels had to stun with gas
Results (292 votes). Check out past polls.