diff --git a/lib/node_modules/@stdlib/blas/ext/base/snansumkbn2/lib/ndarray.js b/lib/node_modules/@stdlib/blas/ext/base/snansumkbn2/lib/ndarray.js index 9435d4cb6a63..aaf060e11a39 100644 --- a/lib/node_modules/@stdlib/blas/ext/base/snansumkbn2/lib/ndarray.js +++ b/lib/node_modules/@stdlib/blas/ext/base/snansumkbn2/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 absf = require( '@stdlib/math/base/special/absf' ); @@ -71,7 +71,7 @@ function snansumkbn2( N, x, strideX, offsetX ) { if ( isnanf( x[ ix ] ) ) { return 0.0; } - return float64ToFloat32( N * x[ ix ] ); + return f32( N * x[ ix ] ); } sum = 0.0; ccs = 0.0; // second order correction term for lost low order bits @@ -79,25 +79,25 @@ function snansumkbn2( N, x, strideX, offsetX ) { for ( i = 0; i < N; i++ ) { v = x[ ix ]; if ( isnanf( v ) === false ) { - t = float64ToFloat32( sum + v ); + t = f32( sum + v ); if ( absf( sum ) >= absf( 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 ( absf( cs ) >= absf( 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 ); } ix += strideX; } - return float64ToFloat32( sum + float64ToFloat32( cs + ccs ) ); + return f32( sum + f32( cs + ccs ) ); }