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

math.combinatorics: cleaner next-permutation.

char-rename
John Benediktsson 2017-01-02 09:34:15 -08:00
parent e9f6a56c53
commit 59ce436dab
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/math/combinatorics/combinatorics.factor
View File

@ -153,7 +153,7 @@ HINTS: (next-permutation) array ;
PRIVATE> PRIVATE>
: next-permutation ( seq -- seq ) : next-permutation ( seq -- seq )
dup [ ] [ drop (next-permutation) ] if-empty ; dup empty? [ (next-permutation) ] unless ;
! Combinadic-based combination methodology ! Combinadic-based combination methodology