RosettaCodeData/Task/Repeat-a-string/OCaml/repeat-a-string-4.ocaml

4 lines
79 B
Plaintext

let string_repeat s n =
String.concat "" (Array.to_list (Array.make n s))
;;