Cleanup some lint warnings.

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

diff --git a/extra/project-euler/044/044.factor b/extra/project-euler/044/044.factor
index 6460fcf97097b44447933fff36f5f5097978125a..e2fce058812d4aad1fc7ecf3bf70650ec543892a 100644 (file)
--- a/extra/project-euler/044/044.factor
+++ b/extra/project-euler/044/044.factor
@@ -32,7 +32,7 @@ IN: project-euler.044
     dup 3 * 1 - * 2 /i ; inline
 
 : sum-and-diff? ( m n -- ? )
-    [ + ] [ - ] 2bi [ pentagonal? ] bi@ and ; inline
+    [ + ] [ - ] 2bi [ pentagonal? ] both? ; inline
 
 : euler044-step ( min m n -- min' )
     [ nth-pentagonal ] bi@