diff --git a/extra/project-euler/045/045.factor b/extra/project-euler/045/045.factor
index 809f81ce92..d9cf8c99f8 100644
--- a/extra/project-euler/045/045.factor
+++ b/extra/project-euler/045/045.factor
@@ -32,7 +32,7 @@ IN: project-euler.045
 
 DEFER: next-solution
 
-: (next-solution) ( n hexagonal -- n )
+: (next-solution) ( n hexagonal -- hexagonal )
     dup pentagonal? [ nip ] [ drop next-solution ] if ;
 
 : next-solution ( n -- m )
diff --git a/extra/project-euler/053/053.factor b/extra/project-euler/053/053.factor
index 37f1d87b66..9d1692556e 100644
--- a/extra/project-euler/053/053.factor
+++ b/extra/project-euler/053/053.factor
@@ -1,6 +1,6 @@
 ! Copyright (c) 2008 Aaron Schaefer.
 ! See http://factorcode.org/license.txt for BSD license.
-USING: combinators.lib kernel math math.combinatorics math.ranges sequences ;
+USING: combinators.lib kernel math math.combinatorics math.ranges ;
 IN: project-euler.053
 
 ! http://projecteuler.net/index.php?section=problems&id=53
@@ -27,7 +27,7 @@ IN: project-euler.053
 ! --------
 
 : euler053 ( -- answer )
-    23 100 [a,b] [ dup [ nCk ] with map [ 1000000 > ] count ] sigma ;
+    23 100 [a,b] [ dup [ nCk 1000000 > ] with count ] sigma ;
 
 ! [ euler053 ] 100 ave-time
 ! 64 ms run / 2 ms GC ave time - 100 trials