basic IO in haskell