 
 HELP: set-second
 { $values
-     { "second" object } { "seq" sequence } }
+    { "second" object } { "seq" sequence } }
 { $description "Sets the second element of a sequence." }
 { $examples
     { $example "USING: prettyprint kernel sequences ;"


HELP: halves
{ $values
     { "seq" sequence }
     { "first-slice" slice } { "second-slice" slice } }
{ $description "Splits a sequence into two slices at the midpoint. If the sequence has an odd number of elements, the extra element is returned in the second slice." }
{ $examples { $example "USING: arrays sequences prettyprint kernel ;"
    "{ 1 2 3 4 5 } halves [ >array . ] bi@"


HELP: replicate
{ $values
    { "len" integer } { "quot" { $quotation ( ... -- ... newelt ) } }
    { "newseq" sequence } }
    { $description "Calls the quotation " { $snippet "len" } " times, collecting results into a new array." }
{ $examples
    { $unchecked-example "USING: kernel prettyprint random sequences ;"
        "5 [ 100 random ] replicate ."
