Diff of /SortLib.def [a0c93f] .. [6c2cfa]

  Switch to side-by-side view 

--- a/SortLib.def
+++ b/SortLib.def
@@ -70,6 +70,14 @@
           (* as descibed in Wirths "Algorithmen und Datenstrukturen"        *)
           (*----------------------------------------------------------------*)
 
+PROCEDURE ShellMetznerSort(VAR X : ARRAY OF LONGREAL;
+                               N : CARDINAL);
+
+          (*---------------------------------------------------------------*)
+          (* Sorts the N values stored in array X in ascending order by    *)
+          (* Shell-Metzner sort                                            *)
+          (*---------------------------------------------------------------*)
+
 PROCEDURE HeapSort(VAR A : ARRAY OF LONGREAL;
                        n : INTEGER);
 
@@ -98,7 +106,7 @@
                           num : INTEGER);
 
           (*----------------------------------------------------------------*)
-          (* Nicht recursive Version von MergeSort (aufsteigende Ordnung)   *)
+          (* Nicht rekursive Version von MergeSort (aufsteigende Ordnung)   *)
           (*----------------------------------------------------------------*)
 
 PROCEDURE MergeSort(VAR a      : VEKTOR;