=== Source Code ===
{{{~cpp
module RepeatStr
	where

message target msg 0 = target
message target msg n = message (target++msg++"\n") (msg) (n-1)

repeatMessage msg n = putStr (message "" msg n)
}}}
=== Usage ===
{{{~cpp
RepeatStr> repeatMessage "CAUCSE LOVE." 5
}}}
=== Result ===
{{{~cpp
CAUCSE LOVE.
CAUCSE LOVE.
CAUCSE LOVE.
CAUCSE LOVE.
CAUCSE LOVE.
}}}
----
[반복문자열]