RosettaCodeData/Task/Repeat-a-string/Bracmat/repeat-a-string.bracmat

9 lines
127 B
Plaintext

(repeat=
string N rep
. !arg:(?string.?N)
& !string:?rep
& whl
' (!N+-1:>0:?N&!string !rep:?rep)
& str$!rep
);