Fix wrong comparison that made IMIN identical to IMAX

as suggested in #1990
This commit is contained in:
Martin Kroeker
2019-01-31 15:25:15 +01:00
committed by GitHub
parent 5be61f4b47
commit 808410c2c7

View File

@@ -53,7 +53,7 @@ BLASLONG CNAME(BLASLONG n, FLOAT *x, BLASLONG inc_x)
while(i < n)
{
if( x[ix] > minf )
if( x[ix] < minf )
{
min = i;
minf = x[ix];