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

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

diff --git a/extra/project-euler/079/079.factor b/extra/project-euler/079/079.factor
index 4fb0effffe1c72c3f5418c707cafeb6687aec0b0..944918aba135bf52dbda5d901da93a4fafbb0c7a 100644 (file)
--- a/extra/project-euler/079/079.factor
+++ b/extra/project-euler/079/079.factor
@@ -52,7 +52,7 @@ PRIVATE>
 
 : topological-sort ( seq -- seq )
     [ [ (topological-sort) ] { } make ] keep
-    combine over diff append ;
+    union-all over diff append ;
 
 : euler079 ( -- answer )
     source-079 >edges topological-sort digits>number ;