Clean up "else" and other spacing
This commit is contained in:
committed by
Richard Wackerbarth
parent
9b23490f01
commit
9bdab4f3a8
@ -494,7 +494,8 @@ double dnrm2(int n, double x[], int incx)
|
||||
if (scale < absxi) {
|
||||
ssq = 1.0 + ssq * (scale / absxi) * (scale / absxi);
|
||||
scale = absxi;
|
||||
} else
|
||||
}
|
||||
else
|
||||
ssq = ssq + (absxi / scale) * (absxi / scale);
|
||||
}
|
||||
ix += incx;
|
||||
@ -1404,7 +1405,8 @@ void dscal(int n, double sa, double x[], int incx)
|
||||
x[i + 3] = sa * x[i + 3];
|
||||
x[i + 4] = sa * x[i + 4];
|
||||
}
|
||||
} else {
|
||||
}
|
||||
else {
|
||||
if (0 <= incx)
|
||||
ix = 0;
|
||||
else
|
||||
@ -1486,7 +1488,6 @@ void dswap(int n, double x[], int incx, double y[], int incy)
|
||||
x[i + 2] = y[i + 2];
|
||||
y[i + 2] = temp;
|
||||
}
|
||||
} else {
|
||||
if (0 <= incx)
|
||||
ix = 0;
|
||||
else
|
||||
@ -1495,6 +1496,8 @@ void dswap(int n, double x[], int incx, double y[], int incy)
|
||||
iy = 0;
|
||||
else
|
||||
iy = (- n + 1) * incy;
|
||||
}
|
||||
else {
|
||||
for (i = 0; i < n; i++) {
|
||||
temp = x[ix];
|
||||
x[ix] = y[iy];
|
||||
|
Reference in New Issue
Block a user