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

math.combinatorics: minor fix to reduce-combinations stack effect.

db4
John Benediktsson 2013-04-18 07:17:36 -07:00
parent 77b3d509be
commit 02d652e6c0
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

@ -204,7 +204,7 @@ PRIVATE>
[ combinations-quot find drop ] [ combinations-quot find drop ]
[ drop pick [ combination ] [ 3drop f ] if ] 3bi ; inline [ drop pick [ combination ] [ 3drop f ] if ] 3bi ; inline
: reduce-combinations ( ... seq k identity quot: ( ... prev elt -- next ) -- ... result ) : reduce-combinations ( ... seq k identity quot: ( ... prev elt -- ... next ) -- ... result )
[ -rot ] dip each-combination ; inline [ -rot ] dip each-combination ; inline
: all-subsets ( seq -- subsets ) : all-subsets ( seq -- subsets )