]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/project-euler/011/011.factor
core: Rename iota to <iota> so we can have TUPLE: iota ... ; instead of TUPLE: iota...
[factor.git] / extra / project-euler / 011 / 011.factor
index 241fc2b626355c7ff0f14387367225a3dd7164c3..1b554efa17b8ab79271249f41bd296b1b0950bec 100644 (file)
@@ -72,12 +72,12 @@ IN: project-euler.011
 
 : pad-front ( matrix -- matrix )
     [
-        length iota [ 0 <repetition> ] map
+        length <iota> [ 0 <repetition> ] map
     ] keep [ append ] 2map ;
 
 : pad-back ( matrix -- matrix )
     <reversed> [
-        length iota [ 0 <repetition> ] map
+        length <iota> [ 0 <repetition> ] map
     ] keep [ <reversed> append ] 2map ;
 
 : diagonal/ ( -- matrix )