Initial data commit

2023-07-01 11:58:00 -04:00 · 2023-07-01 11:58:00 -04:00 · f23f22d71c
commit f23f22d71c
parent 72d218235f
199087 changed files with 3378941 additions and 0 deletions
--- a/Task/Sorting-algorithms-Counting-sort/Arturo/sorting-algorithms-counting-sort.arturo
+++ b/Task/Sorting-algorithms-Counting-sort/Arturo/sorting-algorithms-counting-sort.arturo
@ -0,0 +1,21 @@
+countingSort: function [items, minimum, maximum][
+    a: new items
+    rng: inc maximum - minimum
+    cnt: array.of: rng 0
+    z: 0
+
+    loop 0..dec size a 'i [
+        mm: a\[i]-minimum
+        cnt\[mm]: cnt\[mm] + 1
+    ]
+
+    loop minimum..maximum 'i [
+        loop 0..dec cnt\[i-minimum] 'j [
+            a\[z]: i
+            z: z + 1
+        ]
+    ]
+    return a
+]
+
+print countingSort [3 1 2 8 5 7 9 4 6] 1 9