On Mon, Oct 12, 2009 at 6:37 PM, michael rice <nowgate@yahoo.com> wrote:
transform :: IO ()
transform = putStrLn "What is your digit string?"
>> getLine
>>= \str -> return ('9':str)
>>= \str -> return (read str :: Int)
>>= \i -> putStrLn $ "The number is " ++ show i