*** empty log message ***

1 files changed, 27 insertions, 0 deletions

diff --git a/sources/examples/sort.scala b/sources/examples/sort.scala
new file mode 100644
index 0000000000..36d91b72ae
--- /dev/null
+++ b/sources/examples/sort.scala
@@ -0,0 +1,27 @@
+module sorter {
+
+def sort(a: Array[Int]): Unit = {
+
+  def swap(i: Int, j: Int): Unit = {
+    val t = a(i); a(i) = a(j); a(j) = t;
+  }
+
+  def sort1(l: Int, r: Int): Unit = {
+    val pivot = a((l + r) / 2);
+    var i = l, j = r;
+    while (i <= j) {
+      while (a(i) < pivot) { i = i + 1 }
+      while (a(j) > pivot) { j = j - 1 }
+      if (i <= j) {
+        swap(i, j);
+        i = i + 1;
+        j = j - 1;
+      }
+    }
+    if (l < j) sort1(l, j);
+    if (j < r) sort1(i, r);
+  }
+
+  sort1(0, a.length - 1);
+}
+}
\ No newline at end of file