Initial data commit

Task/Closures-Value-capture/Factor/closures-value-capture-1.factor

@@ -0,0 +1,14 @@
+USING: io kernel locals math prettyprint sequences ;
+
+[let
+    ! Create a sequence of 10 quotations
+    10 iota [
+        :> i            ! Bind lexical variable i
+        [ i i * ]       ! Push a quotation to calculate i squared
+    ] map :> seq
+
+    { 3 8 } [
+        dup pprint " squared is " write
+        seq nth call .
+    ] each
+]

Task/Closures-Value-capture/Factor/closures-value-capture-2.factor

@@ -0,0 +1,12 @@
+USING: fry io kernel math prettyprint sequences ;
+
+! Push a sequence of 10 quotations
+10 iota [
+    '[ _ dup * ]        ! Push a quotation ( i -- i*i )
+] map
+
+{ 3 8 } [
+    dup pprint " squared is " write
+    over nth call .
+] each
+drop