diff --git a/src/qsort/libqsort.c b/src/qsort/libqsort.c
index c684af22..b9d963e7 100644
--- a/src/qsort/libqsort.c
+++ b/src/qsort/libqsort.c
@@ -84,7 +84,7 @@ int istack[100];
 
 void sort(unsigned long n)
 {
-	unsigned long i,ir=n,j,k,l=1;
+	unsigned long i,ir=n-1,j,k,l=0;
 	int jstack=0;
 	float a,temp;
 
diff --git a/src/select/libselect.c b/src/select/libselect.c
index 0663c5db..389c4258 100644
--- a/src/select/libselect.c
+++ b/src/select/libselect.c
@@ -47,8 +47,8 @@ float select(unsigned long k, unsigned long n)
 	float a,temp;
 	int flag, flag2;
 
-	l=1;
-	ir=n;
+	l=0;
+	ir=n-1;
 	flag = flag2 = 0;
 	while (!flag) {
 		if (ir <= l+1) {