| @@ -198,7 +198,7 @@ FLOAT CNAME(BLASLONG n, FLOAT *x, BLASLONG inc_x) { | |||||
| if (n1 > 0) { | if (n1 > 0) { | ||||
| maxf = camax_kernel_32(n1, x); | maxf = camax_kernel_32(n1, x); | ||||
| ix = n1 * 2; | |||||
| i = n1; | i = n1; | ||||
| } | } | ||||
| else | else | ||||
| @@ -198,7 +198,7 @@ FLOAT CNAME(BLASLONG n, FLOAT *x, BLASLONG inc_x) { | |||||
| if (n1 > 0) { | if (n1 > 0) { | ||||
| minf = camin_kernel_32(n1, x); | minf = camin_kernel_32(n1, x); | ||||
| ix = n1 * 2; | |||||
| i = n1; | i = n1; | ||||
| } | } | ||||
| else | else | ||||
| @@ -280,7 +280,7 @@ BLASLONG CNAME(BLASLONG n, FLOAT *x, BLASLONG inc_x) | |||||
| if (n1 > 0) { | if (n1 > 0) { | ||||
| max = icamax_kernel_32(n1, x, &maxf); | max = icamax_kernel_32(n1, x, &maxf); | ||||
| ix = n1 * 2; | |||||
| i = n1; | i = n1; | ||||
| } | } | ||||
| else | else | ||||
| @@ -280,7 +280,7 @@ BLASLONG CNAME(BLASLONG n, FLOAT *x, BLASLONG inc_x) | |||||
| if (n1 > 0) { | if (n1 > 0) { | ||||
| min = icamin_kernel_32(n1, x, &minf); | min = icamin_kernel_32(n1, x, &minf); | ||||
| ix = n1 * 2; | |||||
| i = n1; | i = n1; | ||||
| } | } | ||||
| else | else | ||||
| @@ -199,7 +199,7 @@ BLASLONG CNAME(BLASLONG n, FLOAT *x, BLASLONG inc_x) | |||||
| if (n1 > 0) { | if (n1 > 0) { | ||||
| max = izamax_kernel_16(n1, x, &maxf); | max = izamax_kernel_16(n1, x, &maxf); | ||||
| ix = n1 * 2; | |||||
| i = n1; | i = n1; | ||||
| } | } | ||||
| else | else | ||||
| @@ -199,7 +199,7 @@ BLASLONG CNAME(BLASLONG n, FLOAT *x, BLASLONG inc_x) | |||||
| if (n1 > 0) { | if (n1 > 0) { | ||||
| min = izamin_kernel_16(n1, x, &minf); | min = izamin_kernel_16(n1, x, &minf); | ||||
| ix = n1 * 2; | |||||
| i = n1; | i = n1; | ||||
| } | } | ||||
| else | else | ||||
| @@ -152,7 +152,7 @@ FLOAT CNAME(BLASLONG n, FLOAT *x, BLASLONG inc_x) { | |||||
| if (n1 > 0) { | if (n1 > 0) { | ||||
| maxf = zamax_kernel_16(n1, x); | maxf = zamax_kernel_16(n1, x); | ||||
| ix = n1 * 2; | |||||
| i = n1; | i = n1; | ||||
| } | } | ||||
| else | else | ||||
| @@ -152,7 +152,7 @@ FLOAT CNAME(BLASLONG n, FLOAT *x, BLASLONG inc_x) { | |||||
| if (n1 > 0) { | if (n1 > 0) { | ||||
| minf = zamin_kernel_16(n1, x); | minf = zamin_kernel_16(n1, x); | ||||
| ix = n1 * 2; | |||||
| i = n1; | i = n1; | ||||
| } | } | ||||
| else | else | ||||