September 2017 Update

Task/Sorting-algorithms-Bubble-sort/Jq/sorting-algorithms-bubble-sort-1.jq

@@ -0,0 +1,14 @@
+def bubble_sort:
+  def swap(i;j): .[i] as $x | .[i]=.[j] | .[j]=$x;
+
+  # input/output: [changed, list]
+  reduce range(0; length) as $i
+    ( [false, .];
+      if $i > 0 and (.[0]|not) then .
+      else reduce range(0; (.[1]|length) - $i - 1) as $j
+        (.[0] = false;
+        .[1] as $list
+        | if $list[$j] > $list[$j + 1] then [true, ($list|swap($j; $j+1))]
+          else .
+          end )
+      end  ) | .[1] ;

Task/Sorting-algorithms-Bubble-sort/Jq/sorting-algorithms-bubble-sort-2.jq

@@ -0,0 +1,5 @@
+(
+ [3,2,1],
+ [1,2,3],
+ ["G", "F", "C", "A", "B", "E", "D"]
+)  | bubble_sort

Task/Sorting-algorithms-Bubble-sort/Jq/sorting-algorithms-bubble-sort-3.jq

@@ -0,0 +1,4 @@
+$ jq -c -n -f Bubble_sort.jq
+[1,2,3]
+[1,2,3]
+["A","B","C","D","E","F","G"]