import System.IO(openFile, IOMode(WriteMode), hPutStrLn)

main = do
  h <- openFile "test.txt" WriteMode
  hPutStrLn h "Hello world"