sets: rename combine/refine to union-all/intersect-all

[factor.git] / extra / project-euler / 203 / 203.factor

diff --git a/extra/project-euler/203/203.factor b/extra/project-euler/203/203.factor
index 2c0a73c3accda1204ffc140d5e56df4b8453ada1..c4fe0a7b8ca0c661f35cd1e19577821cff7f452f 100644 (file)
--- a/extra/project-euler/203/203.factor
+++ b/extra/project-euler/203/203.factor
@@ -46,7 +46,7 @@ IN: project-euler.203
     [ 0 prefix ] [ 0 suffix ] bi v+ ;
 
 : generate ( n -- seq )
-    1 - { 1 } [ (generate) ] iterate combine ;
+    1 - { 1 } [ (generate) ] iterate union-all ;
 
 : squarefree ( n -- ? )
     factors all-unique? ;