Hello everybody,

 All I want to do in the following code is to read  an integer from stdin and print it back to stdout. Can somebody help me fix my code snippet below..

Thanks,
Sunil

module Main where

import Prelude

stringToInt::String->Int

stringToInt str = read str

main =

    do x<-getLine

       y<-stringToInt x

       print y