Data commit

Task/Longest-common-subsequence/Jq/longest-common-subsequence-1.jq

@@ -0,0 +1,13 @@
+def lcs(xstr; ystr):
+  if (xstr == "" or ystr == "") then ""
+  else
+    xstr[0:1] as $x
+    |  xstr[1:] as $xs
+    |  ystr[1:] as $ys
+    | if ($x == ystr[0:1]) then ($x + lcs($xs; $ys))
+      else
+        lcs(xstr; $ys) as $one
+	| lcs($xs; ystr) as $two
+	| if ($one|length) > ($two|length) then $one else $two end
+      end
+  end;

Task/Longest-common-subsequence/Jq/longest-common-subsequence-2.jq

@@ -0,0 +1,2 @@
+lcs("1234"; "1224533324"),
+lcs("thisisatest"; "testing123testing")

Task/Longest-common-subsequence/Jq/longest-common-subsequence-3.jq

@@ -0,0 +1,3 @@
+# jq -n -f lcs-recursive.jq
+"1234"
+"tsitest"