Monads

gistfile1.txt

-- parseExpr :: something -> Either ParseError Expression 
convert :: String -> Either String String
convert input = case parseExpr input of
              Left err -> Left $ show err
              Right x  -> Right $ show x

-- Want:
convert = magicfunction show $ parseExpr