steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

math.combinatorics: fix tests for next-permutation.

db4
John Benediktsson 2012-03-02 10:05:57 -08:00
parent 7bb807d441
commit 7a07e8742c
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
basis/math/combinatorics/combinatorics-tests.factor
View File

@ -1,4 +1,4 @@
USING: math.combinatorics math.combinatorics.private tools.test sequences ; USING: kernel math math.combinatorics math.combinatorics.private tools.test sequences ;
IN: math.combinatorics.tests IN: math.combinatorics.tests
[ 1 ] [ 0 factorial ] unit-test [ 1 ] [ 0 factorial ] unit-test
@ -49,7 +49,7 @@ IN: math.combinatorics.tests
[ "21" ] [ "12" next-permutation ] unit-test [ "21" ] [ "12" next-permutation ] unit-test
[ "8344112666" ] [ "8342666411" next-permutation ] unit-test [ "8344112666" ] [ "8342666411" next-permutation ] unit-test
[ "ABC" "ACB" "BAC" "BCA" "CAB" "CBA" "ABC" ] [ "ABC" "ACB" "BAC" "BCA" "CAB" "CBA" "ABC" ]
[ "ABC" 6 [ dup >string next-permutation ] times ] unit-test [ "ABC" 6 [ dup dup clone-like next-permutation ] times ] unit-test
[ 2598960 ] [ 52 iota 5 <combo> choose ] unit-test [ 2598960 ] [ 52 iota 5 <combo> choose ] unit-test