binary-search: improve example for search.

char-rename
John Benediktsson 2017-05-03 18:16:38 -07:00
parent 1f4bcc2d56
commit aac6780285
1 changed files with 6 additions and 6 deletions

View File

@ -12,15 +12,15 @@ $nl
{ $examples { $examples
"Searching for an integer in a sorted array:" "Searching for an integer in a sorted array:"
{ $example { $example
"USING: binary-search math.order prettyprint ;" "USING: binary-search math.order ;"
"{ -13 -4 1 9 16 17 28 } [ 5 >=< ] search . ." "{ -130 -40 10 90 160 170 280 } [ 50 >=< ] search"
"1\n2" "2\n10"
} }
"Frequently, the quotation passed to " { $link search } " is constructed by " { $link curry } " or " { $link with } " in order to make the search key a parameter:" "Frequently, the quotation passed to " { $link search } " is constructed by " { $link curry } " or " { $link with } " in order to make the search key a parameter:"
{ $example { $example
"USING: binary-search kernel math.order prettyprint ;" "USING: binary-search kernel math.order ;"
"5 { -13 -4 1 9 16 17 28 } [ <=> ] with search . ." "50 { -130 -40 10 90 160 170 280 } [ <=> ] with search"
"1\n2" "2\n10"
} }
} ; } ;