refactor: rename variable in blas/ext/base/snansumpw

PR-URL: #7247
Reviewed-by: Athan Reines <[email protected]>

Author: ShabiShett07

lib/node_modules/@stdlib/blas/ext/base/snansumpw/lib/ndarray.js

@@ -20,7 +20,7 @@
 
 // MODULES //
 
-var float64ToFloat32 = require( '@stdlib/number/float64/base/to-float32' );
+var f32 = require( '@stdlib/number/float64/base/to-float32' );
 var isnanf = require( '@stdlib/math/base/assert/is-nanf' );
 var floor = require( '@stdlib/math/base/special/floor' );
 
@@ -88,7 +88,7 @@ function snansumpw( N, x, strideX, offsetX ) {
 		s = 0.0;
 		for ( i = 0; i < N; i++ ) {
 			if ( isnanf( x[ ix ] ) === false ) {
-				s = float64ToFloat32( s + x[ ix ] );
+				s = f32( s + x[ ix ] );
 			}
 			ix += strideX;
 		}
@@ -115,30 +115,30 @@ function snansumpw( N, x, strideX, offsetX ) {
 
 		M = N % 8;
 		for ( i = 8; i < N-M; i += 8 ) {
-			s0 = ( isnanf( x[ ix ] ) ) ? s0 : float64ToFloat32( s0 + x[ ix ] );
+			s0 = ( isnanf( x[ ix ] ) ) ? s0 : f32( s0 + x[ ix ] );
 			ix += strideX;
-			s1 = ( isnanf( x[ ix ] ) ) ? s1 : float64ToFloat32( s1 + x[ ix ] );
+			s1 = ( isnanf( x[ ix ] ) ) ? s1 : f32( s1 + x[ ix ] );
 			ix += strideX;
-			s2 = ( isnanf( x[ ix ] ) ) ? s2 : float64ToFloat32( s2 + x[ ix ] );
+			s2 = ( isnanf( x[ ix ] ) ) ? s2 : f32( s2 + x[ ix ] );
 			ix += strideX;
-			s3 = ( isnanf( x[ ix ] ) ) ? s3 : float64ToFloat32( s3 + x[ ix ] );
+			s3 = ( isnanf( x[ ix ] ) ) ? s3 : f32( s3 + x[ ix ] );
 			ix += strideX;
-			s4 = ( isnanf( x[ ix ] ) ) ? s4 : float64ToFloat32( s4 + x[ ix ] );
+			s4 = ( isnanf( x[ ix ] ) ) ? s4 : f32( s4 + x[ ix ] );
 			ix += strideX;
-			s5 = ( isnanf( x[ ix ] ) ) ? s5 : float64ToFloat32( s5 + x[ ix ] );
+			s5 = ( isnanf( x[ ix ] ) ) ? s5 : f32( s5 + x[ ix ] );
 			ix += strideX;
-			s6 = ( isnanf( x[ ix ] ) ) ? s6 : float64ToFloat32( s6 + x[ ix ] );
+			s6 = ( isnanf( x[ ix ] ) ) ? s6 : f32( s6 + x[ ix ] );
 			ix += strideX;
-			s7 = ( isnanf( x[ ix ] ) ) ? s7 : float64ToFloat32( s7 + x[ ix ] );
+			s7 = ( isnanf( x[ ix ] ) ) ? s7 : f32( s7 + x[ ix ] );
 			ix += strideX;
 		}
 		// Pairwise sum the accumulators:
-		s = float64ToFloat32( float64ToFloat32( float64ToFloat32(s0+s1) + float64ToFloat32(s2+s3) ) + float64ToFloat32( float64ToFloat32(s4+s5) + float64ToFloat32(s6+s7) ) ); // eslint-disable-line max-len
+		s = f32( f32( f32(s0+s1) + f32(s2+s3) ) + f32( f32(s4+s5) + f32(s6+s7) ) ); // eslint-disable-line max-len
 
 		// Clean-up loop...
 		for ( i; i < N; i++ ) {
 			if ( isnanf( x[ ix ] ) === false ) {
-				s = float64ToFloat32( s + x[ ix ] );
+				s = f32( s + x[ ix ] );
 			}
 			ix += strideX;
 		}
@@ -147,7 +147,7 @@ function snansumpw( N, x, strideX, offsetX ) {
 	// Recurse by dividing by two, but avoiding non-multiples of unroll factor...
 	n = floor( N/2 );
 	n -= n % 8;
-	return float64ToFloat32( snansumpw( n, x, strideX, ix ) + snansumpw( N-n, x, strideX, ix+(n*strideX) ) ); // eslint-disable-line max-len
+	return f32( snansumpw( n, x, strideX, ix ) + snansumpw( N-n, x, strideX, ix+(n*strideX) ) ); // eslint-disable-line max-len
 }