U E D R , A S I H C RSS

반복문자열/임인택

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.
Valid XHTML 1.0! Valid CSS! powered by MoniWiki
last modified 2021-02-07 05:29:34
Processing time 0.0080 sec