Merge branch 'master' of git://factorcode.org/git/factor
commit
725b60e383
|
@ -8,7 +8,7 @@ IN: lcs
|
|||
0 1 ? + [ [ 1+ ] bi@ ] dip min min ;
|
||||
|
||||
: lcs-step ( insert delete change same? -- next )
|
||||
1 -1./0. ? + max max ; ! -1./0. is -inf (float)
|
||||
1 -1/0. ? + max max ; ! -1/0. is -inf (float)
|
||||
|
||||
:: loop-step ( i j matrix old new step -- )
|
||||
i j 1+ matrix nth nth ! insertion
|
||||
|
|
|
@ -25,7 +25,7 @@ $nl
|
|||
ABOUT: "number-strings"
|
||||
|
||||
HELP: digits>integer
|
||||
{ $values { "seq" "a sequence of integers" } { "radix" "an integer between 2 and 36" } { "n" integer } }
|
||||
{ $values { "seq" "a sequence of integers" } { "radix" "an integer between 2 and 36" } { "n/f" { $maybe integer } } }
|
||||
{ $description "Converts a sequence of digits (with most significant digit first) into an integer." }
|
||||
{ $notes "This is one of the factors of " { $link string>number } "." } ;
|
||||
|
||||
|
|
|
@ -227,7 +227,7 @@ unit-test
|
|||
[ -3 10 nth ] must-fail
|
||||
[ 11 10 nth ] must-fail
|
||||
|
||||
[ -1./0. 0 delete-nth ] must-fail
|
||||
[ -1/0. 0 delete-nth ] must-fail
|
||||
[ "" ] [ "" [ CHAR: \s = ] trim ] unit-test
|
||||
[ "" ] [ "" [ CHAR: \s = ] trim-head ] unit-test
|
||||
[ "" ] [ "" [ CHAR: \s = ] trim-tail ] unit-test
|
||||
|
|
|
@ -66,6 +66,12 @@ ARTICLE: "syntax-floats" "Float syntax"
|
|||
"7.e13"
|
||||
"1.0e-5"
|
||||
}
|
||||
"There are three special float values:"
|
||||
{ $table
|
||||
{ "Positive infinity" { $snippet "1/0." } }
|
||||
{ "Negative infinity" { $snippet "-1/0." } }
|
||||
{ "Not-a-number" { $snippet "0/0." } }
|
||||
}
|
||||
"More information on floats can be found in " { $link "floats" } "." ;
|
||||
|
||||
ARTICLE: "syntax-complex-numbers" "Complex number syntax"
|
||||
|
|
Loading…
Reference in New Issue