{-
  Purpose:
    Show that multiple modules can occur in same file.
  Reference:
    First code example here:
      http://www.haskell.org/onlinereport/haskell2010/haskellch5.html#x11-980005
-}

module Main where
  main :: IO ()
  
  main = 
    do
      putStrLn "Begin IoDemo.hs:"
      val1 <- return 123
      val2 <- return 345
      print (val1+val2+Test.test)

module Test where
  test = 5