]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/project-euler/150/150.factor
core: Rename iota to <iota> so we can have TUPLE: iota ... ; instead of TUPLE: iota...
[factor.git] / extra / project-euler / 150 / 150.factor
index c31b2b3e2a4f7a3d065bcf2b530eb340400f0dbd..0addaf6d1b977709b54bf291414c6614ee5ec78a 100644 (file)
@@ -52,9 +52,9 @@ IN: project-euler.150
 
 :: (euler150) ( m -- n )
     sums-triangle :> table
-    m iota [| x |
-        x 1 + iota [| y |
-            m x - iota [| z |
+    m <iota> [| x |
+        x 1 + <iota> [| y |
+            m x - <iota> [| z |
                 x z + table nth-unsafe
                 [ y z + 1 + swap nth-unsafe ]
                 [ y         swap nth-unsafe ] bi -