]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/rosetta-code/knapsack-unbounded/knapsack-unbounded.factor
core: Rename iota to <iota> so we can have TUPLE: iota ... ; instead of TUPLE: iota...
[factor.git] / extra / rosetta-code / knapsack-unbounded / knapsack-unbounded.factor
index 940eb4e3b64dcb64a1a630bf259dc911ff466fd8..55f54c0f5adbd13c3eaa3cf319228a2c25f3929b 100644 (file)
@@ -63,5 +63,5 @@ M:: bounty <=> ( a b -- <=> )
     ] 2map ;
 
 : best-bounty ( -- bounty )
-    find-max-amounts [ 1 + iota ] map <product-sequence>
+    find-max-amounts [ 1 + <iota> ] map <product-sequence>
     [ <bounty> ] [ max ] map-reduce ;