Skip to content

Instantly share code, notes, and snippets.

@lnicola

lnicola/zip.hs

Created June 26, 2014 12:12
Show Gist options
  • Save lnicola/82257b3170f3e0448fbe to your computer and use it in GitHub Desktop.
Save lnicola/82257b3170f3e0448fbe to your computer and use it in GitHub Desktop.
Download ZIP
Raw
zip.hs
import Control.Monad
import Data.Char
import Data.List
import System.Environment
import Control.Monad.Instances
main = getArgs >>= mapM (liftM lines . readFile) >>= return . liftM2 zip head (head . tail)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment