 
 HELP: new-like
 { $values
-     { "len" integer } { "exemplar" "an exemplar sequence" } { "quot" quotation }
-     { "seq" sequence } }
+    { "len" integer } { "exemplar" "an exemplar sequence" } { "quot" quotation }
+    { "seq" sequence } }
 { $description "Creates a new sequence of length " { $snippet "len" } " and calls the quotation with this sequence on the stack. The output of the quotation and the original exemplar are then passed to " { $link like } " so that the output sequence is the exemplar's type." } ;
 
 HELP: push-either
 { $values
-     { "elt" object } { "quot" quotation } { "accum1" vector } { "accum2" vector } }
+    { "elt" object } { "quot" quotation } { "accum1" vector } { "accum2" vector } }
 { $description "Pushes the input object onto one of the accumulators; the first if the quotation yields true, the second if false." } ;
 
 HELP: sequence-hashcode
 { $values
-     { "n" integer } { "seq" sequence }
-     { "x" integer } }
+    { "n" integer } { "seq" sequence }
+    { "x" integer } }
 { $description "Iterates over a sequence, computes a hashcode with " { $link hashcode* } " for each element, and combines them using " { $link sequence-hashcode-step } "." } ;
 
 HELP: sequence-hashcode-step
 { $values
-     { "oldhash" integer } { "newpart" integer }
-     { "newhash" integer } }
+    { "oldhash" integer } { "newpart" integer }
+    { "newhash" integer } }
 { $description "An implementation word that computes a running hashcode of a sequence using some bit-twiddling. The resulting hashcode is always a fixnum." } ;
 
 HELP: index-or-length
 { $values
-     { "seq" sequence } { "n" integer } { "n'" integer } }
+    { "seq" sequence } { "n" integer } { "n'" integer } }
 { $description "Returns the input sequence and its length or " { $snippet "n" } ", whichever is less." }
 { $examples { $example "USING: sequences kernel prettyprint ;"
     "\"abcd\" 3 index-or-length [ . ] bi@"


HELP: trim
{ $values
     { "seq" sequence } { "quot" quotation }
     { "newseq" sequence } }
{ $description "Removes elements starting from the left and right sides of a sequence if they match a predicate. Once an element does not match, the test stops and the rest of the sequence is left on the stack as a new sequence." }
{ $examples
    { $example "USING: prettyprint math sequences ;"


HELP: 2selector
{ $values
    { "quot" quotation }
    { "selector" quotation } { "accum1" vector } { "accum2" vector } }
{ $description "Creates two new vectors to accumulate values based on a predicate. The first vector accumulates values for which the predicate yields true; the second for false." } ;

HELP: collector
{ $values
    { "quot" quotation }
    { "quot'" quotation } { "vec" vector } }
{ $description "Creates a new quotation that pushes its result to a vector and outputs that vector on the stack." }
{ $examples { $example "USING: sequences prettyprint kernel math ;"
    "{ 1 2 } [ 30 + ] collector [ each ] dip ."
