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

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

Author: ShabiShett07

lib/node_modules/@stdlib/blas/ext/base/scusumkbn2/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 abs = require( '@stdlib/math/base/special/abs' );
 
 
@@ -80,7 +80,7 @@ function scusumkbn2( N, sum, x, strideX, offsetX, y, strideY, offsetY ) {
 			if ( v !== 0.0 ) {
 				break;
 			}
-			sum = float64ToFloat32( sum + v );
+			sum = f32( sum + v );
 			y[ iy ] = sum;
 			ix += strideX;
 			iy += strideY;
@@ -92,23 +92,23 @@ function scusumkbn2( N, sum, x, strideX, offsetX, y, strideY, offsetY ) {
 	cs = 0.0; // first order correction term for lost low order bits
 	for ( ; i < N; i++ ) {
 		v = x[ ix ];
-		t = float64ToFloat32( sum+v );
+		t = f32( sum+v );
 		if ( abs( sum ) >= abs( v ) ) {
-			c = float64ToFloat32( float64ToFloat32( sum-t ) + v );
+			c = f32( f32( sum-t ) + v );
 		} else {
-			c = float64ToFloat32( float64ToFloat32( v-t ) + sum );
+			c = f32( f32( v-t ) + sum );
 		}
 		sum = t;
-		t = float64ToFloat32( cs+c );
+		t = f32( cs+c );
 		if ( abs( cs ) >= abs( c ) ) {
-			cc = float64ToFloat32( float64ToFloat32( cs-t ) + c );
+			cc = f32( f32( cs-t ) + c );
 		} else {
-			cc = float64ToFloat32( float64ToFloat32( c-t ) + cs );
+			cc = f32( f32( c-t ) + cs );
 		}
 		cs = t;
-		ccs = float64ToFloat32( ccs+cc );
+		ccs = f32( ccs+cc );
 
-		y[ iy ] = float64ToFloat32( sum + float64ToFloat32( cs+ccs ) );
+		y[ iy ] = f32( sum + f32( cs+ccs ) );
 		ix += strideX;
 		iy += strideY;
 	}