Haskell: Module that repeats any IO action n times

repeat.hs

module Repeater where

    -- General usable module that repeats any IO action n times.
    -- by Niko Heikkilä
    repeatIOAction :: Int -> IO () -> IO ()     -- Inputs: integer and IO. Outputs: IO 
    repeatIOAction 0 _ = return ()              -- exit recursive loop here
    repeatIOAction n action = do
        action                                  -- action to perform
        repeatIOAction (n-1) action             -- decrement n to make it recursive

    -- Example: print a string "Hello World" 10 times to console
    main = repeatIOAction 10 (putStrLn "Hello World")

-- | END OF MODULE | --