6 lines
105 B
Text
6 lines
105 B
Text
|
with strings'
|
||
|
|
: repeatString ( $n-$ )
|
||
|
|
1- [ dup ] dip [ over prepend ] times nip ;
|
||
|
|
|
||
|
|
"ha" 5 repeatString
|