Data commit

Task/Hash-from-two-arrays/WDTE/hash-from-two-arrays-1.wdte

@@ -0,0 +1,11 @@
+let a => import 'arrays';
+let s => import 'stream';
+
+let toScope keys vals =>
+    s.zip (a.stream keys) (a.stream vals)
+    ->
+        s.reduce (collect (true)) (@ r scope kv =>
+            let [k v] => kv;
+            set scope k v;
+        )
+    ;

Task/Hash-from-two-arrays/WDTE/hash-from-two-arrays-2.wdte

@@ -0,0 +1,10 @@
+toScope
+    ['a'; 'b'; 'c']
+    [1; 2; 3]
+    : scope
+-> known
+-> a.stream
+-> s.map (@ m k => [k; at scope k])
+-> s.collect
+-- io.writeln io.stdout
+;