	a/SortLib.def		b/SortLib.def
	...		...
68	(----------------------------------------------------------------)	68	(----------------------------------------------------------------)
69	(* ShellSort returns the array A in ascending order as *)	69	(* ShellSort returns the array A in ascending order as *)
70	(* as descibed in Wirths "Algorithmen und Datenstrukturen" *)	70	(* as descibed in Wirths "Algorithmen und Datenstrukturen" *)
71	(----------------------------------------------------------------)	71	(----------------------------------------------------------------)
72		72
		73	PROCEDURE ShellMetznerSort(VAR X : ARRAY OF LONGREAL;
		74	N : CARDINAL);
		75
		76	(---------------------------------------------------------------)
		77	(* Sorts the N values stored in array X in ascending order by *)
		78	(* Shell-Metzner sort *)
		79	(---------------------------------------------------------------)
		80
73	PROCEDURE HeapSort(VAR A : ARRAY OF LONGREAL;	81	PROCEDURE HeapSort(VAR A : ARRAY OF LONGREAL;
74	n : INTEGER);	82	n : INTEGER);
75		83
76	(----------------------------------------------------------------)	84	(----------------------------------------------------------------)
77	(* HeapSort returns the array A in ascending order as *)	85	(* HeapSort returns the array A in ascending order as *)
	...		...
96		104
97	PROCEDURE MergeSortNR(VAR A : ARRAY OF LONGREAL;	105	PROCEDURE MergeSortNR(VAR A : ARRAY OF LONGREAL;
98	num : INTEGER);	106	num : INTEGER);
99		107
100	(----------------------------------------------------------------)	108	(----------------------------------------------------------------)
101	(* Nicht recursive Version von MergeSort (aufsteigende Ordnung) *)	109	(* Nicht rekursive Version von MergeSort (aufsteigende Ordnung) *)
102	(----------------------------------------------------------------)	110	(----------------------------------------------------------------)
103		111
104	PROCEDURE MergeSort(VAR a : VEKTOR;	112	PROCEDURE MergeSort(VAR a : VEKTOR;
105	VAR p : INTVEKTOR;	113	VAR p : INTVEKTOR;
106	low,up : INTEGER);	114	low,up : INTEGER);