]> gitweb.factorcode.org Git - factor.git/commitdiff
Fix contains? -> any? rename issue
authorAaron Schaefer <aaron@elasticdog.com>
Wed, 1 Apr 2009 22:43:45 +0000 (18:43 -0400)
committerAaron Schaefer <aaron@elasticdog.com>
Wed, 1 Apr 2009 22:43:45 +0000 (18:43 -0400)
extra/project-euler/001/001.factor

index 17f8d0386d80dbbb591530f0892f041ae7eb709f..68e1ff032adf56afb9c564c15679b5a21e9561e0 100644 (file)
@@ -53,7 +53,7 @@ PRIVATE>
 
 
 : euler001c ( -- answer )
-    1000 [ { 3 5 } [ mod 0 = ] with contains? ] filter sum ;
+    1000 [ { 3 5 } [ mod 0 = ] with any? ] filter sum ;
 
 ! [ euler001c ] 100 ave-time
 ! 0 ms ave run time - 0.06 SD (100 trials)