From 1e15a9ff36eba4bd4669820c3fc3ce1ec0ecfbc1 Mon Sep 17 00:00:00 2001 From: aayush0325 Date: Sat, 28 Dec 2024 18:06:19 +0000 Subject: [PATCH 1/2] feat: add C ndarray interface and refactor implementation --- type: pre_commit_static_analysis_report description: Results of running static analysis checks when committing changes. report: - task: lint_filenames status: passed - task: lint_editorconfig status: passed - task: lint_markdown status: passed - task: lint_package_json status: na - task: lint_repl_help status: passed - task: lint_javascript_src status: passed - task: lint_javascript_cli status: na - task: lint_javascript_examples status: na - task: lint_javascript_tests status: passed - task: lint_javascript_benchmarks status: passed - task: lint_python status: na - task: lint_r status: na - task: lint_c_src status: passed - task: lint_c_examples status: passed - task: lint_c_benchmarks status: passed - task: lint_c_tests_fixtures status: na - task: lint_shell status: na - task: lint_typescript_declarations status: na - task: lint_typescript_tests status: na - task: lint_license_headers status: passed --- --- .../@stdlib/stats/base/snanmaxabs/README.md | 148 +++++++++++++++--- .../base/snanmaxabs/benchmark/benchmark.js | 30 ++-- .../snanmaxabs/benchmark/benchmark.native.js | 30 ++-- .../snanmaxabs/benchmark/benchmark.ndarray.js | 30 ++-- .../benchmark/benchmark.ndarray.native.js | 30 ++-- .../snanmaxabs/benchmark/c/benchmark.length.c | 54 ++++++- .../stats/base/snanmaxabs/docs/repl.txt | 32 ++-- .../base/snanmaxabs/examples/c/example.c | 9 +- .../stats/base/snanmaxabs/include.gypi | 2 +- .../include/stdlib/stats/base/snanmaxabs.h | 9 +- .../stats/base/snanmaxabs/lib/index.js | 7 +- .../stats/base/snanmaxabs/lib/ndarray.js | 20 ++- .../base/snanmaxabs/lib/ndarray.native.js | 20 +-- .../stats/base/snanmaxabs/lib/snanmaxabs.js | 51 +----- .../base/snanmaxabs/lib/snanmaxabs.native.js | 9 +- .../stats/base/snanmaxabs/manifest.json | 75 ++++++++- .../@stdlib/stats/base/snanmaxabs/src/addon.c | 60 +++++++ .../stats/base/snanmaxabs/src/addon.cpp | 117 -------------- .../@stdlib/stats/base/snanmaxabs/src/main.c | 83 ++++++++++ .../stats/base/snanmaxabs/src/snanmaxabs.c | 72 --------- .../base/snanmaxabs/test/test.ndarray.js | 13 +- .../snanmaxabs/test/test.ndarray.native.js | 13 +- .../base/snanmaxabs/test/test.snanmaxabs.js | 13 +- .../snanmaxabs/test/test.snanmaxabs.native.js | 13 +- 24 files changed, 526 insertions(+), 414 deletions(-) create mode 100644 lib/node_modules/@stdlib/stats/base/snanmaxabs/src/addon.c delete mode 100644 lib/node_modules/@stdlib/stats/base/snanmaxabs/src/addon.cpp create mode 100644 lib/node_modules/@stdlib/stats/base/snanmaxabs/src/main.c delete mode 100644 lib/node_modules/@stdlib/stats/base/snanmaxabs/src/snanmaxabs.c diff --git a/lib/node_modules/@stdlib/stats/base/snanmaxabs/README.md b/lib/node_modules/@stdlib/stats/base/snanmaxabs/README.md index e8603c5fca80..940ecff5ce22 100644 --- a/lib/node_modules/@stdlib/stats/base/snanmaxabs/README.md +++ b/lib/node_modules/@stdlib/stats/base/snanmaxabs/README.md @@ -36,7 +36,7 @@ limitations under the License. var snanmaxabs = require( '@stdlib/stats/base/snanmaxabs' ); ``` -#### snanmaxabs( N, x, stride ) +#### snanmaxabs( N, x, strideX ) Computes the maximum absolute value of a single-precision floating-point strided array `x`, ignoring `NaN` values. @@ -44,9 +44,8 @@ Computes the maximum absolute value of a single-precision floating-point strided var Float32Array = require( '@stdlib/array/float32' ); var x = new Float32Array( [ 1.0, -2.0, NaN, 2.0 ] ); -var N = x.length; -var v = snanmaxabs( N, x, 1 ); +var v = snanmaxabs( x.length, x, 1 ); // returns 2.0 ``` @@ -54,18 +53,16 @@ The function has the following parameters: - **N**: number of indexed elements. - **x**: input [`Float32Array`][@stdlib/array/float32]. -- **stride**: index increment for `x`. +- **strideX**: stride length for `x`. -The `N` and `stride` parameters determine which elements in `x` are accessed at runtime. For example, to compute the maximum absolute value of every other element in `x`, +The `N` and stride parameters determine which elements in the strided array are accessed at runtime. For example, to compute the maximum absolute value of every other element in `x`, ```javascript var Float32Array = require( '@stdlib/array/float32' ); -var floor = require( '@stdlib/math/base/special/floor' ); var x = new Float32Array( [ 1.0, 2.0, -7.0, -2.0, 4.0, 3.0, NaN, NaN ] ); -var N = floor( x.length / 2 ); -var v = snanmaxabs( N, x, 2 ); +var v = snanmaxabs( 4, x, 2 ); // returns 7.0 ``` @@ -75,18 +72,15 @@ Note that indexing is relative to the first index. To introduce an offset, use [ ```javascript var Float32Array = require( '@stdlib/array/float32' ); -var floor = require( '@stdlib/math/base/special/floor' ); var x0 = new Float32Array( [ 2.0, 1.0, -2.0, -2.0, 3.0, 4.0, NaN, NaN ] ); var x1 = new Float32Array( x0.buffer, x0.BYTES_PER_ELEMENT*1 ); // start at 2nd element -var N = floor( x0.length / 2 ); - -var v = snanmaxabs( N, x1, 2 ); +var v = snanmaxabs( 4, x1, 2 ); // returns 4.0 ``` -#### snanmaxabs.ndarray( N, x, stride, offset ) +#### snanmaxabs.ndarray( N, x, strideX, offsetX ) Computes the maximum absolute value of a single-precision floating-point strided array, ignoring `NaN` values and using alternative indexing semantics. @@ -94,26 +88,23 @@ Computes the maximum absolute value of a single-precision floating-point strided var Float32Array = require( '@stdlib/array/float32' ); var x = new Float32Array( [ 1.0, -2.0, NaN, 2.0 ] ); -var N = x.length; -var v = snanmaxabs.ndarray( N, x, 1, 0 ); +var v = snanmaxabs.ndarray( x.length, x, 1, 0 ); // returns 2.0 ``` The function has the following additional parameters: -- **offset**: starting index for `x`. +- **offsetX**: starting index for `x`. -While [`typed array`][mdn-typed-array] views mandate a view offset based on the underlying `buffer`, the `offset` parameter supports indexing semantics based on a starting index. For example, to calculate the maximum absolute value for every other value in `x` starting from the second value +While [`typed array`][mdn-typed-array] views mandate a view offset based on the underlying buffer, the offset parameter supports indexing semantics based on a starting index. For example, to calculate the maximum absolute value for every other element in `x` starting from the second element ```javascript var Float32Array = require( '@stdlib/array/float32' ); -var floor = require( '@stdlib/math/base/special/floor' ); var x = new Float32Array( [ 2.0, 1.0, -2.0, -2.0, 3.0, 4.0, NaN, NaN ] ); -var N = floor( x.length / 2 ); -var v = snanmaxabs.ndarray( N, x, 2, 1 ); +var v = snanmaxabs.ndarray( 4, x, 2, 1 ); // returns 4.0 ``` @@ -164,6 +155,123 @@ console.log( v ); + + +* * * + +
+ +## C APIs + + + +
+ +
+ + + + + +
+ +### Usage + +```c +#include "stdlib/stats/base/snanmaxabs.h" +``` + +#### stdlib_strided_snanmaxabs( N, \*X, strideX ) + +Computes the maximum absolute value of a single-precision floating-point strided array `x`, ignoring `NaN` values. + +```c +const float x[] = { 1.0f, -2.0f, 0.0f/0.0f, -4.0f }; + +float v = stdlib_strided_snanmaxabs( 4, x, 1 ); +// returns 4.0f +``` + +The function accepts the following arguments: + +- **N**: `[in] CBLAS_INT` number of indexed elements. +- **X**: `[in] float*` input array. +- **strideX**: `[in] CBLAS_INT` stride length for `X`. + +```c +float stdlib_strided_snanmaxabs( const CBLAS_INT N, const float *X, const CBLAS_INT strideX ); +``` + +#### stdlib_strided_snanmaxabs_ndarray( N, \*X, strideX, offsetX ) + +Computes the maximum absolute value of a single-precision floating-point strided array, ignoring `NaN` values and using alternative indexing semantics. + +```c +const float x[] = { 1.0f, -2.0f, 0.0f/0.0f, -4.0f }; + +float v = stdlib_strided_snanmaxabs_ndarray( 4, x, 1, 0 ); +// returns 4.0f +``` + +The function accepts the following arguments: + +- **N**: `[in] CBLAS_INT` number of indexed elements. +- **X**: `[in] float*` input array. +- **strideX**: `[in] CBLAS_INT` stride length for `X`. +- **offsetX**: `[in] CBLAS_INT` starting index for `X`. + +```c +float stdlib_strided_snanmaxabs_ndarray( const CBLAS_INT N, const float *X, const CBLAS_INT strideX, const CBLAS_INT offsetX ); +``` + +
+ + + + + +
+ +
+ + + + + +
+ +### Examples + +```c +#include "stdlib/stats/base/snanmaxabs.h" +#include + +int main( void ) { + // Create a strided array: + const float x[] = { 1.0f, -2.0f, -3.0f, 4.0f, -5.0f, -6.0f, 7.0f, 8.0f, 0.0f/0.0f, 0.0f/0.0f }; + + // Specify the number of elements: + const int N = 5; + + // Specify the stride length: + const int strideX = 2; + + // Compute the maximum absolute value: + float v = stdlib_strided_snanmaxabs( N, x, strideX ); + + // Print the result: + printf( "maxabs: %f\n", v ); +} +``` + +
+ + + +
+ + +
diff --git a/lib/node_modules/@stdlib/stats/base/snanmaxabs/benchmark/benchmark.js b/lib/node_modules/@stdlib/stats/base/snanmaxabs/benchmark/benchmark.js index fec98f474021..0f32056ec8ce 100644 --- a/lib/node_modules/@stdlib/stats/base/snanmaxabs/benchmark/benchmark.js +++ b/lib/node_modules/@stdlib/stats/base/snanmaxabs/benchmark/benchmark.js @@ -21,16 +21,30 @@ // MODULES // var bench = require( '@stdlib/bench' ); -var randu = require( '@stdlib/random/base/randu' ); +var uniform = require( '@stdlib/random/base/uniform' ); +var bernoulli = require( '@stdlib/random/base/bernoulli' ); +var filledarrayBy = require( '@stdlib/array/filled-by' ); var isnan = require( '@stdlib/math/base/assert/is-nan' ); var pow = require( '@stdlib/math/base/special/pow' ); -var Float32Array = require( '@stdlib/array/float32' ); var pkg = require( './../package.json' ).name; var snanmaxabs = require( './../lib/snanmaxabs.js' ); // FUNCTIONS // +/** +* Returns a random value or `NaN`. +* +* @private +* @returns {number} random number or `NaN` +*/ +function rand() { + if ( bernoulli( 0.2 ) ) { + return NaN; + } + return uniform( -10.0, 10.0 ); +} + /** * Creates a benchmark function. * @@ -39,17 +53,7 @@ var snanmaxabs = require( './../lib/snanmaxabs.js' ); * @returns {Function} benchmark function */ function createBenchmark( len ) { - var x; - var i; - - x = new Float32Array( len ); - for ( i = 0; i < x.length; i++ ) { - if ( randu() < 0.2 ) { - x[ i ] = NaN; - } else { - x[ i ] = ( randu()*20.0 ) - 10.0; - } - } + var x = filledarrayBy( len, 'float32', rand ); return benchmark; function benchmark( b ) { diff --git a/lib/node_modules/@stdlib/stats/base/snanmaxabs/benchmark/benchmark.native.js b/lib/node_modules/@stdlib/stats/base/snanmaxabs/benchmark/benchmark.native.js index f43bc2a300ab..2c2d915a0059 100644 --- a/lib/node_modules/@stdlib/stats/base/snanmaxabs/benchmark/benchmark.native.js +++ b/lib/node_modules/@stdlib/stats/base/snanmaxabs/benchmark/benchmark.native.js @@ -22,10 +22,11 @@ var resolve = require( 'path' ).resolve; var bench = require( '@stdlib/bench' ); -var randu = require( '@stdlib/random/base/randu' ); +var uniform = require( '@stdlib/random/base/uniform' ); +var bernoulli = require( '@stdlib/random/base/bernoulli' ); +var filledarrayBy = require( '@stdlib/array/filled-by' ); var isnan = require( '@stdlib/math/base/assert/is-nan' ); var pow = require( '@stdlib/math/base/special/pow' ); -var Float32Array = require( '@stdlib/array/float32' ); var tryRequire = require( '@stdlib/utils/try-require' ); var pkg = require( './../package.json' ).name; @@ -40,6 +41,19 @@ var opts = { // FUNCTIONS // +/** +* Returns a random value or `NaN`. +* +* @private +* @returns {number} random number or `NaN` +*/ +function rand() { + if ( bernoulli( 0.2 ) ) { + return NaN; + } + return uniform( -10.0, 10.0 ); +} + /** * Creates a benchmark function. * @@ -48,17 +62,7 @@ var opts = { * @returns {Function} benchmark function */ function createBenchmark( len ) { - var x; - var i; - - x = new Float32Array( len ); - for ( i = 0; i < x.length; i++ ) { - if ( randu() < 0.2 ) { - x[ i ] = NaN; - } else { - x[ i ] = ( randu()*20.0 ) - 10.0; - } - } + var x = filledarrayBy( len, 'float32', rand ); return benchmark; function benchmark( b ) { diff --git a/lib/node_modules/@stdlib/stats/base/snanmaxabs/benchmark/benchmark.ndarray.js b/lib/node_modules/@stdlib/stats/base/snanmaxabs/benchmark/benchmark.ndarray.js index ab9bcb51ac7b..37a45be4fa29 100644 --- a/lib/node_modules/@stdlib/stats/base/snanmaxabs/benchmark/benchmark.ndarray.js +++ b/lib/node_modules/@stdlib/stats/base/snanmaxabs/benchmark/benchmark.ndarray.js @@ -21,16 +21,30 @@ // MODULES // var bench = require( '@stdlib/bench' ); -var randu = require( '@stdlib/random/base/randu' ); +var uniform = require( '@stdlib/random/base/uniform' ); +var bernoulli = require( '@stdlib/random/base/bernoulli' ); +var filledarrayBy = require( '@stdlib/array/filled-by' ); var isnan = require( '@stdlib/math/base/assert/is-nan' ); var pow = require( '@stdlib/math/base/special/pow' ); -var Float32Array = require( '@stdlib/array/float32' ); var pkg = require( './../package.json' ).name; var snanmaxabs = require( './../lib/ndarray.js' ); // FUNCTIONS // +/** +* Returns a random value or `NaN`. +* +* @private +* @returns {number} random number or `NaN` +*/ +function rand() { + if ( bernoulli( 0.2 ) ) { + return NaN; + } + return uniform( -10.0, 10.0 ); +} + /** * Creates a benchmark function. * @@ -39,17 +53,7 @@ var snanmaxabs = require( './../lib/ndarray.js' ); * @returns {Function} benchmark function */ function createBenchmark( len ) { - var x; - var i; - - x = new Float32Array( len ); - for ( i = 0; i < x.length; i++ ) { - if ( randu() < 0.2 ) { - x[ i ] = NaN; - } else { - x[ i ] = ( randu()*20.0 ) - 10.0; - } - } + var x = filledarrayBy( len, 'float32', rand ); return benchmark; function benchmark( b ) { diff --git a/lib/node_modules/@stdlib/stats/base/snanmaxabs/benchmark/benchmark.ndarray.native.js b/lib/node_modules/@stdlib/stats/base/snanmaxabs/benchmark/benchmark.ndarray.native.js index 4ea2daea4fe2..06fe5e736f5c 100644 --- a/lib/node_modules/@stdlib/stats/base/snanmaxabs/benchmark/benchmark.ndarray.native.js +++ b/lib/node_modules/@stdlib/stats/base/snanmaxabs/benchmark/benchmark.ndarray.native.js @@ -22,10 +22,11 @@ var resolve = require( 'path' ).resolve; var bench = require( '@stdlib/bench' ); -var randu = require( '@stdlib/random/base/randu' ); +var uniform = require( '@stdlib/random/base/uniform' ); +var bernoulli = require( '@stdlib/random/base/bernoulli' ); +var filledarrayBy = require( '@stdlib/array/filled-by' ); var isnan = require( '@stdlib/math/base/assert/is-nan' ); var pow = require( '@stdlib/math/base/special/pow' ); -var Float32Array = require( '@stdlib/array/float32' ); var tryRequire = require( '@stdlib/utils/try-require' ); var pkg = require( './../package.json' ).name; @@ -40,6 +41,19 @@ var opts = { // FUNCTIONS // +/** +* Returns a random value or `NaN`. +* +* @private +* @returns {number} random number or `NaN` +*/ +function rand() { + if ( bernoulli( 0.2 ) ) { + return NaN; + } + return uniform( -10.0, 10.0 ); +} + /** * Creates a benchmark function. * @@ -48,17 +62,7 @@ var opts = { * @returns {Function} benchmark function */ function createBenchmark( len ) { - var x; - var i; - - x = new Float32Array( len ); - for ( i = 0; i < x.length; i++ ) { - if ( randu() < 0.2 ) { - x[ i ] = NaN; - } else { - x[ i ] = ( randu()*20.0 ) - 10.0; - } - } + var x = filledarrayBy( len, 'float32', rand ); return benchmark; function benchmark( b ) { diff --git a/lib/node_modules/@stdlib/stats/base/snanmaxabs/benchmark/c/benchmark.length.c b/lib/node_modules/@stdlib/stats/base/snanmaxabs/benchmark/c/benchmark.length.c index 691ab56b3c96..30a43aaa8431 100644 --- a/lib/node_modules/@stdlib/stats/base/snanmaxabs/benchmark/c/benchmark.length.c +++ b/lib/node_modules/@stdlib/stats/base/snanmaxabs/benchmark/c/benchmark.length.c @@ -94,7 +94,7 @@ static float rand_float( void ) { * @param len array length * @return elapsed time in seconds */ -static double benchmark( int iterations, int len ) { +static double benchmark1( int iterations, int len ) { double elapsed; float x[ len ]; float v; @@ -111,6 +111,7 @@ static double benchmark( int iterations, int len ) { v = 0.0f; t = tic(); for ( i = 0; i < iterations; i++ ) { + // cppcheck-suppress uninitvar v = stdlib_strided_snanmaxabs( len, x, 1 ); if ( v != v ) { printf( "should not return NaN\n" ); @@ -124,6 +125,44 @@ static double benchmark( int iterations, int len ) { return elapsed; } +/** +* Runs a benchmark. +* +* @param iterations number of iterations +* @param len array length +* @return elapsed time in seconds +*/ +static double benchmark2( int iterations, int len ) { + double elapsed; + float x[ len ]; + float v; + double t; + int i; + + for ( i = 0; i < len; i++ ) { + if ( rand_float() < 0.2f ) { + x[ i ] = 0.0f / 0.0f; // NaN + } else { + x[ i ] = ( rand_float()*20000.0f ) - 10000.0f; + } + } + v = 0.0f; + t = tic(); + for ( i = 0; i < iterations; i++ ) { + // cppcheck-suppress uninitvar + v = stdlib_strided_snanmaxabs_ndarray( len, x, 1, 0 ); + if ( v != v ) { + printf( "should not return NaN\n" ); + break; + } + } + elapsed = tic() - t; + if ( v != v ) { + printf( "should not return NaN\n" ); + } + return elapsed; +} + /** * Main execution sequence. */ @@ -146,7 +185,18 @@ int main( void ) { for ( j = 0; j < REPEATS; j++ ) { count += 1; printf( "# c::%s:len=%d\n", NAME, len ); - elapsed = benchmark( iter, len ); + elapsed = benchmark1( iter, len ); + print_results( iter, elapsed ); + printf( "ok %d benchmark finished\n", count ); + } + } + for ( i = MIN; i <= MAX; i++ ) { + len = pow( 10, i ); + iter = ITERATIONS / pow( 10, i-1 ); + for ( j = 0; j < REPEATS; j++ ) { + count += 1; + printf( "# c::%s:ndarray:len=%d\n", NAME, len ); + elapsed = benchmark2( iter, len ); print_results( iter, elapsed ); printf( "ok %d benchmark finished\n", count ); } diff --git a/lib/node_modules/@stdlib/stats/base/snanmaxabs/docs/repl.txt b/lib/node_modules/@stdlib/stats/base/snanmaxabs/docs/repl.txt index 34bf47047120..c29db10babed 100644 --- a/lib/node_modules/@stdlib/stats/base/snanmaxabs/docs/repl.txt +++ b/lib/node_modules/@stdlib/stats/base/snanmaxabs/docs/repl.txt @@ -1,10 +1,10 @@ -{{alias}}( N, x, stride ) +{{alias}}( N, x, strideX ) Computes the maximum absolute value of a single-precision floating-point strided array, ignoring `NaN` values. - The `N` and `stride` parameters determine which elements in `x` are accessed - at runtime. + The `N` and stride parameters determine which elements in the strided array + are accessed at runtime. Indexing is relative to the first index. To introduce an offset, use a typed array view. @@ -19,8 +19,8 @@ x: Float32Array Input array. - stride: integer - Index increment. + strideX: integer + Stride Length. Returns ------- @@ -34,22 +34,19 @@ > {{alias}}( x.length, x, 1 ) 2.0 - // Using `N` and `stride` parameters: + // Using `N` and stride parameters: > x = new {{alias:@stdlib/array/float32}}( [ -2.0, 1.0, 1.0, -5.0, 2.0, -1.0, NaN ] ); - > var N = {{alias:@stdlib/math/base/special/floor}}( x.length / 2 ); - > var stride = 2; - > {{alias}}( N, x, stride ) + > {{alias}}( 3, x, 2 ) 2.0 // Using view offsets: > var x0 = new {{alias:@stdlib/array/float32}}( [ 1.0, -2.0, 3.0, 2.0, 5.0, -1.0, NaN ] ); > var x1 = new {{alias:@stdlib/array/float32}}( x0.buffer, x0.BYTES_PER_ELEMENT*1 ); - > N = {{alias:@stdlib/math/base/special/floor}}( x0.length / 2 ); - > stride = 2; - > {{alias}}( N, x1, stride ) + > {{alias}}( 3, x1, 2 ) 2.0 -{{alias}}.ndarray( N, x, stride, offset ) + +{{alias}}.ndarray( N, x, strideX, offsetX ) Computes the maximum absolute value of a single-precision floating-point strided array, ignoring `NaN` values and using alternative indexing semantics. @@ -66,10 +63,10 @@ x: Float32Array Input array. - stride: integer - Index increment. + strideX: integer + Stride Length. - offset: integer + offsetX: integer Starting index. Returns @@ -86,8 +83,7 @@ // Using offset parameter: > var x = new {{alias:@stdlib/array/float32}}( [ 1.0, -2.0, 3.0, 2.0, 5.0, -1.0, NaN ] ); - > var N = {{alias:@stdlib/math/base/special/floor}}( x.length / 2 ); - > {{alias}}.ndarray( N, x, 2, 1 ) + > {{alias}}.ndarray( 3, x, 2, 1 ) 2.0 See Also diff --git a/lib/node_modules/@stdlib/stats/base/snanmaxabs/examples/c/example.c b/lib/node_modules/@stdlib/stats/base/snanmaxabs/examples/c/example.c index c01621fd7097..ef3f46569577 100644 --- a/lib/node_modules/@stdlib/stats/base/snanmaxabs/examples/c/example.c +++ b/lib/node_modules/@stdlib/stats/base/snanmaxabs/examples/c/example.c @@ -17,21 +17,20 @@ */ #include "stdlib/stats/base/snanmaxabs.h" -#include #include int main( void ) { // Create a strided array: - float x[] = { 1.0, -2.0, -3.0, 4.0, -5.0, -6.0, 7.0, 8.0, 0.0/0.0, 0.0/0.0 }; + const float x[] = { 1.0f, -2.0f, -3.0f, 4.0f, -5.0f, -6.0f, 7.0f, 8.0f, 0.0f/0.0f, 0.0f/0.0f }; // Specify the number of elements: - int64_t N = 5; + const int N = 5; // Specify the stride length: - int64_t stride = 2; + const int strideX = 2; // Compute the maximum absolute value: - float v = stdlib_strided_snanmaxabs( N, x, stride ); + float v = stdlib_strided_snanmaxabs( N, x, strideX ); // Print the result: printf( "maxabs: %f\n", v ); diff --git a/lib/node_modules/@stdlib/stats/base/snanmaxabs/include.gypi b/lib/node_modules/@stdlib/stats/base/snanmaxabs/include.gypi index 868c5c12e852..26476a8c2655 100644 --- a/lib/node_modules/@stdlib/stats/base/snanmaxabs/include.gypi +++ b/lib/node_modules/@stdlib/stats/base/snanmaxabs/include.gypi @@ -36,7 +36,7 @@ # Source files: 'src_files': [ - '<(src_dir)/addon.cpp', + '<(src_dir)/addon.c', ' +#include "stdlib/blas/base/shared.h" /* * If C++, prevent name mangling so that the compiler emits a binary file having undecorated names, thus mirroring the behavior of a C compiler. @@ -31,7 +31,12 @@ extern "C" { /** * Computes the maximum absolute value of a single-precision floating-point strided array, ignoring `NaN` values. */ -float stdlib_strided_snanmaxabs( const int64_t N, const float *X, const int64_t stride ); +float API_SUFFIX(stdlib_strided_snanmaxabs)( const CBLAS_INT N, const float *X, const CBLAS_INT strideX ); + +/** +* Computes the maximum absolute value of a single-precision floating-point strided array, ignoring `NaN` values and using alternative indexing semantics. +*/ +float API_SUFFIX(stdlib_strided_snanmaxabs_ndarray)( const CBLAS_INT N, const float *X, const CBLAS_INT strideX, const CBLAS_INT offsetX ); #ifdef __cplusplus } diff --git a/lib/node_modules/@stdlib/stats/base/snanmaxabs/lib/index.js b/lib/node_modules/@stdlib/stats/base/snanmaxabs/lib/index.js index 16922960ccc9..74ca276cf5a8 100644 --- a/lib/node_modules/@stdlib/stats/base/snanmaxabs/lib/index.js +++ b/lib/node_modules/@stdlib/stats/base/snanmaxabs/lib/index.js @@ -28,20 +28,17 @@ * var snanmaxabs = require( '@stdlib/stats/base/snanmaxabs' ); * * var x = new Float32Array( [ 1.0, -2.0, NaN, 2.0 ] ); -* var N = x.length; * -* var v = snanmaxabs( N, x, 1 ); +* var v = snanmaxabs( x.length, x, 1 ); * // returns 2.0 * * @example * var Float32Array = require( '@stdlib/array/float32' ); -* var floor = require( '@stdlib/math/base/special/floor' ); * var snanmaxabs = require( '@stdlib/stats/base/snanmaxabs' ); * * var x = new Float32Array( [ 2.0, 1.0, 2.0, -2.0, -2.0, 2.0, 3.0, 4.0, NaN, NaN ] ); -* var N = floor( x.length / 2 ); * -* var v = snanmaxabs.ndarray( N, x, 2, 1 ); +* var v = snanmaxabs.ndarray( 5, x, 2, 1 ); * // returns 4.0 */ diff --git a/lib/node_modules/@stdlib/stats/base/snanmaxabs/lib/ndarray.js b/lib/node_modules/@stdlib/stats/base/snanmaxabs/lib/ndarray.js index 1bbf40f32c57..745f35c9facc 100644 --- a/lib/node_modules/@stdlib/stats/base/snanmaxabs/lib/ndarray.js +++ b/lib/node_modules/@stdlib/stats/base/snanmaxabs/lib/ndarray.js @@ -31,21 +31,19 @@ var abs = require( '@stdlib/math/base/special/abs' ); * * @param {PositiveInteger} N - number of indexed elements * @param {Float32Array} x - input array -* @param {integer} stride - stride length -* @param {NonNegativeInteger} offset - starting index +* @param {integer} strideX - stride length +* @param {NonNegativeInteger} offsetX - starting index * @returns {number} maximum absolute value * * @example * var Float32Array = require( '@stdlib/array/float32' ); -* var floor = require( '@stdlib/math/base/special/floor' ); * * var x = new Float32Array( [ 2.0, 1.0, 2.0, -2.0, -2.0, 2.0, 3.0, 4.0, NaN, NaN ] ); -* var N = floor( x.length / 2 ); * -* var v = snanmaxabs( N, x, 2, 1 ); +* var v = snanmaxabs( 5, x, 2, 1 ); * // returns 4.0 */ -function snanmaxabs( N, x, stride, offset ) { +function snanmaxabs( N, x, strideX, offsetX ) { var max; var ix; var v; @@ -54,16 +52,16 @@ function snanmaxabs( N, x, stride, offset ) { if ( N <= 0 ) { return NaN; } - if ( N === 1 || stride === 0 ) { - return abs( x[ offset ] ); + if ( N === 1 || strideX === 0 ) { + return abs( x[ offsetX ] ); } - ix = offset; + ix = offsetX; for ( i = 0; i < N; i++ ) { v = x[ ix ]; if ( v === v ) { break; } - ix += stride; + ix += strideX; } if ( i === N ) { return NaN; @@ -71,7 +69,7 @@ function snanmaxabs( N, x, stride, offset ) { max = abs( v ); i += 1; for ( i; i < N; i++ ) { - ix += stride; + ix += strideX; v = abs( x[ ix ] ); if ( isnanf( v ) ) { continue; diff --git a/lib/node_modules/@stdlib/stats/base/snanmaxabs/lib/ndarray.native.js b/lib/node_modules/@stdlib/stats/base/snanmaxabs/lib/ndarray.native.js index 50489d95d1eb..23fe3e1898d2 100644 --- a/lib/node_modules/@stdlib/stats/base/snanmaxabs/lib/ndarray.native.js +++ b/lib/node_modules/@stdlib/stats/base/snanmaxabs/lib/ndarray.native.js @@ -20,8 +20,7 @@ // MODULES // -var Float32Array = require( '@stdlib/array/float32' ); -var addon = require( './snanmaxabs.native.js' ); +var addon = require( './../src/addon.node' ); // MAIN // @@ -31,27 +30,20 @@ var addon = require( './snanmaxabs.native.js' ); * * @param {PositiveInteger} N - number of indexed elements * @param {Float32Array} x - input array -* @param {integer} stride - stride length -* @param {NonNegativeInteger} offset - starting index +* @param {integer} strideX - stride length +* @param {NonNegativeInteger} offsetX - starting index * @returns {number} maximum absolute value * * @example * var Float32Array = require( '@stdlib/array/float32' ); -* var floor = require( '@stdlib/math/base/special/floor' ); * * var x = new Float32Array( [ 2.0, 1.0, 2.0, -2.0, -2.0, 2.0, 3.0, 4.0, NaN, NaN ] ); -* var N = floor( x.length / 2 ); * -* var v = snanmaxabs( N, x, 2, 1 ); +* var v = snanmaxabs( 5, x, 2, 1 ); * // returns 4.0 */ -function snanmaxabs( N, x, stride, offset ) { - var view; - if ( stride < 0 ) { - offset += (N-1) * stride; - } - view = new Float32Array( x.buffer, x.byteOffset+(x.BYTES_PER_ELEMENT*offset), x.length-offset ); // eslint-disable-line max-len - return addon( N, view, stride ); +function snanmaxabs( N, x, strideX, offsetX ) { + return addon.ndarray( N, x, strideX, offsetX ); } diff --git a/lib/node_modules/@stdlib/stats/base/snanmaxabs/lib/snanmaxabs.js b/lib/node_modules/@stdlib/stats/base/snanmaxabs/lib/snanmaxabs.js index fcc0c5aef533..de20f0a75ff1 100644 --- a/lib/node_modules/@stdlib/stats/base/snanmaxabs/lib/snanmaxabs.js +++ b/lib/node_modules/@stdlib/stats/base/snanmaxabs/lib/snanmaxabs.js @@ -20,8 +20,8 @@ // MODULES // -var isnanf = require( '@stdlib/math/base/assert/is-nanf' ); -var abs = require( '@stdlib/math/base/special/abs' ); +var stride2offset = require( '@stdlib/strided/base/stride2offset' ); +var ndarray = require( './ndarray.js' ); // MAIN // @@ -31,58 +31,19 @@ var abs = require( '@stdlib/math/base/special/abs' ); * * @param {PositiveInteger} N - number of indexed elements * @param {Float32Array} x - input array -* @param {integer} stride - stride length +* @param {integer} strideX - stride length * @returns {number} maximum absolute value * * @example * var Float32Array = require( '@stdlib/array/float32' ); * * var x = new Float32Array( [ 1.0, -2.0, NaN, 2.0 ] ); -* var N = x.length; * -* var v = snanmaxabs( N, x, 1 ); +* var v = snanmaxabs( x.length, x, 1 ); * // returns 2.0 */ -function snanmaxabs( N, x, stride ) { - var max; - var ix; - var v; - var i; - - if ( N <= 0 ) { - return NaN; - } - if ( N === 1 || stride === 0 ) { - return abs( x[ 0 ] ); - } - if ( stride < 0 ) { - ix = (1-N) * stride; - } else { - ix = 0; - } - for ( i = 0; i < N; i++ ) { - v = x[ ix ]; - if ( v === v ) { - break; - } - ix += stride; - } - if ( i === N ) { - return NaN; - } - max = abs( v ); - i += 1; - for ( i; i < N; i++ ) { - ix += stride; - v = abs( x[ ix ] ); - if ( isnanf( v ) ) { - continue; - } - if ( v > max ) { - max = v; - } - } - return max; +function snanmaxabs( N, x, strideX ) { + return ndarray( N, x, strideX, stride2offset( N, strideX ) ); } diff --git a/lib/node_modules/@stdlib/stats/base/snanmaxabs/lib/snanmaxabs.native.js b/lib/node_modules/@stdlib/stats/base/snanmaxabs/lib/snanmaxabs.native.js index 92015b0fc98b..4c07021c0a9e 100644 --- a/lib/node_modules/@stdlib/stats/base/snanmaxabs/lib/snanmaxabs.native.js +++ b/lib/node_modules/@stdlib/stats/base/snanmaxabs/lib/snanmaxabs.native.js @@ -30,20 +30,19 @@ var addon = require( './../src/addon.node' ); * * @param {PositiveInteger} N - number of indexed elements * @param {Float32Array} x - input array -* @param {integer} stride - stride length +* @param {integer} strideX - stride length * @returns {number} maximum absolute value * * @example * var Float32Array = require( '@stdlib/array/float32' ); * * var x = new Float32Array( [ 1.0, -2.0, 2.0, NaN ] ); -* var N = x.length; * -* var v = snanmaxabs( N, x, 1 ); +* var v = snanmaxabs( x.length, x, 1 ); * // returns 2.0 */ -function snanmaxabs( N, x, stride ) { - return addon( N, x, stride ); +function snanmaxabs( N, x, strideX ) { + return addon( N, x, strideX ); } diff --git a/lib/node_modules/@stdlib/stats/base/snanmaxabs/manifest.json b/lib/node_modules/@stdlib/stats/base/snanmaxabs/manifest.json index d3d49ced3845..4b310a204081 100644 --- a/lib/node_modules/@stdlib/stats/base/snanmaxabs/manifest.json +++ b/lib/node_modules/@stdlib/stats/base/snanmaxabs/manifest.json @@ -1,5 +1,8 @@ { - "options": {}, + "options": { + "task": "build", + "wasm": false + }, "fields": [ { "field": "src", @@ -24,18 +27,80 @@ ], "confs": [ { + "task": "build", + "wasm": false, "src": [ - "./src/snanmaxabs.c" + "./src/main.c" ], "include": [ "./include" ], - "libraries": [ - "-lm" + "libraries": [], + "libpath": [], + "dependencies": [ + "@stdlib/blas/base/shared", + "@stdlib/strided/base/stride2offset", + "@stdlib/math/base/special/absf", + "@stdlib/math/base/assert/is-nanf", + "@stdlib/napi/export", + "@stdlib/napi/argv", + "@stdlib/napi/argv-int64", + "@stdlib/napi/argv-strided-float32array", + "@stdlib/napi/create-double" + ] + }, + { + "task": "benchmark", + "wasm": false, + "src": [ + "./src/main.c" + ], + "include": [ + "./include" + ], + "libraries": [], + "libpath": [], + "dependencies": [ + "@stdlib/blas/base/shared", + "@stdlib/strided/base/stride2offset", + "@stdlib/math/base/assert/is-nanf", + "@stdlib/math/base/special/absf" + ] + }, + { + "task": "examples", + "wasm": false, + "src": [ + "./src/main.c" + ], + "include": [ + "./include" + ], + "libraries": [], + "libpath": [], + "dependencies": [ + "@stdlib/blas/base/shared", + "@stdlib/strided/base/stride2offset", + "@stdlib/math/base/assert/is-nanf", + "@stdlib/math/base/special/absf" + ] + }, + { + "task": "", + "wasm": true, + "src": [ + "./src/main.c" + ], + "include": [ + "./include" ], + "libraries": [], "libpath": [], "dependencies": [ - "@stdlib/math/base/assert/is-nanf" + "@stdlib/blas/base/shared", + "@stdlib/strided/base/stride2offset", + "@stdlib/math/base/assert/is-nanf", + "@stdlib/math/base/special/absf" ] } ] diff --git a/lib/node_modules/@stdlib/stats/base/snanmaxabs/src/addon.c b/lib/node_modules/@stdlib/stats/base/snanmaxabs/src/addon.c new file mode 100644 index 000000000000..8c16b476a185 --- /dev/null +++ b/lib/node_modules/@stdlib/stats/base/snanmaxabs/src/addon.c @@ -0,0 +1,60 @@ +/** +* @license Apache-2.0 +* +* Copyright (c) 2024 The Stdlib Authors. +* +* Licensed under the Apache License, Version 2.0 (the "License"); +* you may not use this file except in compliance with the License. +* You may obtain a copy of the License at +* +* http://www.apache.org/licenses/LICENSE-2.0 +* +* Unless required by applicable law or agreed to in writing, software +* distributed under the License is distributed on an "AS IS" BASIS, +* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. +* See the License for the specific language governing permissions and +* limitations under the License. +*/ + +#include "stdlib/stats/base/snanmaxabs.h" +#include "stdlib/napi/export.h" +#include "stdlib/napi/argv.h" +#include "stdlib/napi/argv_int64.h" +#include "stdlib/napi/argv_strided_float32array.h" +#include "stdlib/napi/create_double.h" +#include + +/** +* Receives JavaScript callback invocation data. +* +* @param env environment under which the function is invoked +* @param info callback data +* @return Node-API value +*/ +static napi_value addon( napi_env env, napi_callback_info info ) { + STDLIB_NAPI_ARGV( env, info, argv, argc, 3 ); + STDLIB_NAPI_ARGV_INT64( env, N, argv, 0 ); + STDLIB_NAPI_ARGV_INT64( env, strideX, argv, 2 ); + STDLIB_NAPI_ARGV_STRIDED_FLOAT32ARRAY( env, X, N, strideX, argv, 1 ); + STDLIB_NAPI_CREATE_DOUBLE( env, (double)stdlib_strided_snanmaxabs( N, X, strideX ), v ); + return v; +} + +/** +* Receives JavaScript callback invocation data. +* +* @param env environment under which the function is invoked +* @param info callback data +* @return Node-API value +*/ +static napi_value addon_method( napi_env env, napi_callback_info info ) { + STDLIB_NAPI_ARGV( env, info, argv, argc, 4 ); + STDLIB_NAPI_ARGV_INT64( env, N, argv, 0 ); + STDLIB_NAPI_ARGV_INT64( env, strideX, argv, 2 ); + STDLIB_NAPI_ARGV_INT64( env, offsetX, argv, 3 ); + STDLIB_NAPI_ARGV_STRIDED_FLOAT32ARRAY( env, X, N, strideX, argv, 1 ); + STDLIB_NAPI_CREATE_DOUBLE( env, (double)stdlib_strided_snanmaxabs_ndarray( N, X, strideX, offsetX ), v ); + return v; +} + +STDLIB_NAPI_MODULE_EXPORT_FCN_WITH_METHOD( addon, "ndarray", addon_method ) diff --git a/lib/node_modules/@stdlib/stats/base/snanmaxabs/src/addon.cpp b/lib/node_modules/@stdlib/stats/base/snanmaxabs/src/addon.cpp deleted file mode 100644 index a748e657d628..000000000000 --- a/lib/node_modules/@stdlib/stats/base/snanmaxabs/src/addon.cpp +++ /dev/null @@ -1,117 +0,0 @@ -/** -* @license Apache-2.0 -* -* Copyright (c) 2020 The Stdlib Authors. -* -* Licensed under the Apache License, Version 2.0 (the "License"); -* you may not use this file except in compliance with the License. -* You may obtain a copy of the License at -* -* http://www.apache.org/licenses/LICENSE-2.0 -* -* Unless required by applicable law or agreed to in writing, software -* distributed under the License is distributed on an "AS IS" BASIS, -* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. -* See the License for the specific language governing permissions and -* limitations under the License. -*/ - -#include "stdlib/stats/base/snanmaxabs.h" -#include -#include -#include -#include -#include - -/** -* Add-on namespace. -*/ -namespace stdlib_stats_base_snanmaxabs { - - /** - * Computes the maximum absolute value of a single-precision floating-point strided array, ignoring `NaN` values. - * - * ## Notes - * - * - When called from JavaScript, the function expects three arguments: - * - * - `N`: number of indexed elements - * - `X`: input array - * - `stride`: stride length - */ - napi_value node_snanmaxabs( napi_env env, napi_callback_info info ) { - napi_status status; - - size_t argc = 3; - napi_value argv[ 3 ]; - status = napi_get_cb_info( env, info, &argc, argv, nullptr, nullptr ); - assert( status == napi_ok ); - - if ( argc < 3 ) { - napi_throw_error( env, nullptr, "invalid invocation. Must provide 3 arguments." ); - return nullptr; - } - - napi_valuetype vtype0; - status = napi_typeof( env, argv[ 0 ], &vtype0 ); - assert( status == napi_ok ); - if ( vtype0 != napi_number ) { - napi_throw_type_error( env, nullptr, "invalid argument. First argument must be a number." ); - return nullptr; - } - - bool res; - status = napi_is_typedarray( env, argv[ 1 ], &res ); - assert( status == napi_ok ); - if ( res == false ) { - napi_throw_type_error( env, nullptr, "invalid argument. Second argument must be a Float32Array." ); - return nullptr; - } - - napi_valuetype vtype2; - status = napi_typeof( env, argv[ 2 ], &vtype2 ); - assert( status == napi_ok ); - if ( vtype2 != napi_number ) { - napi_throw_type_error( env, nullptr, "invalid argument. Third argument must be a number." ); - return nullptr; - } - - int64_t N; - status = napi_get_value_int64( env, argv[ 0 ], &N ); - assert( status == napi_ok ); - - int64_t stride; - status = napi_get_value_int64( env, argv[ 2 ], &stride ); - assert( status == napi_ok ); - - napi_typedarray_type vtype1; - size_t xlen; - void *X; - status = napi_get_typedarray_info( env, argv[ 1 ], &vtype1, &xlen, &X, nullptr, nullptr ); - assert( status == napi_ok ); - if ( vtype1 != napi_float32_array ) { - napi_throw_type_error( env, nullptr, "invalid argument. Second argument must be a Float32Array." ); - return nullptr; - } - if ( (N-1)*llabs(stride) >= (int64_t)xlen ) { - napi_throw_range_error( env, nullptr, "invalid argument. Second argument has insufficient elements based on the associated stride and the number of indexed elements." ); - return nullptr; - } - - napi_value v; - status = napi_create_double( env, (double)stdlib_strided_snanmaxabs( N, (float *)X, stride ), &v ); - assert( status == napi_ok ); - - return v; - } - - napi_value Init( napi_env env, napi_value exports ) { - napi_status status; - napi_value fcn; - status = napi_create_function( env, "exports", NAPI_AUTO_LENGTH, node_snanmaxabs, NULL, &fcn ); - assert( status == napi_ok ); - return fcn; - } - - NAPI_MODULE( NODE_GYP_MODULE_NAME, Init ) -} // end namespace stdlib_stats_base_snanmaxabs diff --git a/lib/node_modules/@stdlib/stats/base/snanmaxabs/src/main.c b/lib/node_modules/@stdlib/stats/base/snanmaxabs/src/main.c new file mode 100644 index 000000000000..139a7182c767 --- /dev/null +++ b/lib/node_modules/@stdlib/stats/base/snanmaxabs/src/main.c @@ -0,0 +1,83 @@ +/** +* @license Apache-2.0 +* +* Copyright (c) 2020 The Stdlib Authors. +* +* Licensed under the Apache License, Version 2.0 (the "License"); +* you may not use this file except in compliance with the License. +* You may obtain a copy of the License at +* +* http://www.apache.org/licenses/LICENSE-2.0 +* +* Unless required by applicable law or agreed to in writing, software +* distributed under the License is distributed on an "AS IS" BASIS, +* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. +* See the License for the specific language governing permissions and +* limitations under the License. +*/ + +#include "stdlib/stats/base/snanmaxabs.h" +#include "stdlib/math/base/assert/is_nanf.h" +#include "stdlib/blas/base/shared.h" +#include "stdlib/math/base/special/absf.h" +#include "stdlib/strided/base/stride2offset.h" + +/** +* Computes the maximum absolute value of a single-precision floating-point strided array, ignoring `NaN` values. +* +* @param N number of indexed elements +* @param X input array +* @param strideX stride length +* @return output value +*/ +float API_SUFFIX(stdlib_strided_snanmaxabs)( const CBLAS_INT N, const float *X, const CBLAS_INT strideX ) { + const CBLAS_INT ox = stdlib_strided_stride2offset( N, strideX ); + return API_SUFFIX(stdlib_strided_snanmaxabs_ndarray)( N, X, strideX, ox ); +} + +/** +* Computes the maximum absolute value of a single-precision floating-point strided array, ignoring `NaN` values and using alternative indexing semantics. +* +* @param N number of indexed elements +* @param X input array +* @param strideX stride length +* @param offsetX starting index for X +* @return output value +*/ +float API_SUFFIX(stdlib_strided_snanmaxabs_ndarray)( const CBLAS_INT N, const float *X, const CBLAS_INT strideX, const CBLAS_INT offsetX ) { + CBLAS_INT ix; + CBLAS_INT i; + float max; + float v; + + if ( N <= 0 ) { + return 0.0f / 0.0f; // NaN + } + if ( N == 1 || strideX == 0 ) { + return stdlib_base_absf( X[ offsetX ] ); + } + ix = offsetX; + for ( i = 0; i < N; i++ ) { + v = X[ ix ]; + if ( v == v ) { + break; + } + ix += strideX; + } + if ( i == N ) { + return 0.0f / 0.0f; // NaN + } + max = stdlib_base_absf( v ); + i += 1; + for (; i < N; i++ ) { + ix += strideX; + v = stdlib_base_absf( X[ ix ] ); + if ( stdlib_base_is_nanf( v ) ) { + continue; + } + if ( v > max ) { + max = v; + } + } + return max; +} diff --git a/lib/node_modules/@stdlib/stats/base/snanmaxabs/src/snanmaxabs.c b/lib/node_modules/@stdlib/stats/base/snanmaxabs/src/snanmaxabs.c deleted file mode 100644 index 9500ad25e730..000000000000 --- a/lib/node_modules/@stdlib/stats/base/snanmaxabs/src/snanmaxabs.c +++ /dev/null @@ -1,72 +0,0 @@ -/** -* @license Apache-2.0 -* -* Copyright (c) 2020 The Stdlib Authors. -* -* Licensed under the Apache License, Version 2.0 (the "License"); -* you may not use this file except in compliance with the License. -* You may obtain a copy of the License at -* -* http://www.apache.org/licenses/LICENSE-2.0 -* -* Unless required by applicable law or agreed to in writing, software -* distributed under the License is distributed on an "AS IS" BASIS, -* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. -* See the License for the specific language governing permissions and -* limitations under the License. -*/ - -#include "stdlib/stats/base/snanmaxabs.h" -#include "stdlib/math/base/assert/is_nanf.h" -#include -#include - -/** -* Computes the maximum absolute value of a single-precision floating-point strided array, ignoring `NaN` values. -* -* @param N number of indexed elements -* @param X input array -* @param stride stride length -* @return output value -*/ -float stdlib_strided_snanmaxabs( const int64_t N, const float *X, const int64_t stride ) { - int64_t ix; - int64_t i; - float max; - float v; - - if ( N <= 0 ) { - return 0.0f / 0.0f; // NaN - } - if ( N == 1 || stride == 0 ) { - return fabsf( X[ 0 ] ); - } - if ( stride < 0 ) { - ix = (1-N) * stride; - } else { - ix = 0; - } - for ( i = 0; i < N; i++ ) { - v = X[ ix ]; - if ( v == v ) { - break; - } - ix += stride; - } - if ( i == N ) { - return 0.0f / 0.0f; // NaN - } - max = fabsf( v ); - i += 1; - for (; i < N; i++ ) { - ix += stride; - v = fabsf( X[ ix ] ); - if ( stdlib_base_is_nanf( v ) ) { - continue; - } - if ( v > max ) { - max = v; - } - } - return max; -} diff --git a/lib/node_modules/@stdlib/stats/base/snanmaxabs/test/test.ndarray.js b/lib/node_modules/@stdlib/stats/base/snanmaxabs/test/test.ndarray.js index 231f9757c2a3..d86a33c1eeb3 100644 --- a/lib/node_modules/@stdlib/stats/base/snanmaxabs/test/test.ndarray.js +++ b/lib/node_modules/@stdlib/stats/base/snanmaxabs/test/test.ndarray.js @@ -21,7 +21,6 @@ // MODULES // var tape = require( 'tape' ); -var floor = require( '@stdlib/math/base/special/floor' ); var isnan = require( '@stdlib/math/base/assert/is-nan' ); var isPositiveZero = require( '@stdlib/math/base/assert/is-positive-zero' ); var Float32Array = require( '@stdlib/array/float32' ); @@ -96,7 +95,6 @@ tape( 'if provided an `N` parameter equal to `1`, the function returns the first }); tape( 'the function supports a `stride` parameter', function test( t ) { - var N; var x; var v; @@ -113,15 +111,13 @@ tape( 'the function supports a `stride` parameter', function test( t ) { NaN ]); - N = floor( x.length / 2 ); - v = snanmaxabs( N, x, 2, 0 ); + v = snanmaxabs( 5, x, 2, 0 ); t.strictEqual( v, 4.0, 'returns expected value' ); t.end(); }); tape( 'the function supports a negative `stride` parameter', function test( t ) { - var N; var x; var v; @@ -138,8 +134,7 @@ tape( 'the function supports a negative `stride` parameter', function test( t ) 2.0 ]); - N = floor( x.length / 2 ); - v = snanmaxabs( N, x, -2, 8 ); + v = snanmaxabs( 5, x, -2, 8 ); t.strictEqual( v, 4.0, 'returns expected value' ); t.end(); @@ -158,7 +153,6 @@ tape( 'if provided a `stride` parameter equal to `0`, the function returns the f }); tape( 'the function supports an `offset` parameter', function test( t ) { - var N; var x; var v; @@ -174,9 +168,8 @@ tape( 'the function supports an `offset` parameter', function test( t ) { NaN, NaN // 4 ]); - N = floor( x.length / 2 ); - v = snanmaxabs( N, x, 2, 1 ); + v = snanmaxabs( 5, x, 2, 1 ); t.strictEqual( v, 4.0, 'returns expected value' ); t.end(); diff --git a/lib/node_modules/@stdlib/stats/base/snanmaxabs/test/test.ndarray.native.js b/lib/node_modules/@stdlib/stats/base/snanmaxabs/test/test.ndarray.native.js index eef7392d6f11..a50239e41b83 100644 --- a/lib/node_modules/@stdlib/stats/base/snanmaxabs/test/test.ndarray.native.js +++ b/lib/node_modules/@stdlib/stats/base/snanmaxabs/test/test.ndarray.native.js @@ -22,7 +22,6 @@ var resolve = require( 'path' ).resolve; var tape = require( 'tape' ); -var floor = require( '@stdlib/math/base/special/floor' ); var isnan = require( '@stdlib/math/base/assert/is-nan' ); var isPositiveZero = require( '@stdlib/math/base/assert/is-positive-zero' ); var Float32Array = require( '@stdlib/array/float32' ); @@ -105,7 +104,6 @@ tape( 'if provided an `N` parameter equal to `1`, the function returns the first }); tape( 'the function supports a `stride` parameter', opts, function test( t ) { - var N; var x; var v; @@ -122,15 +120,13 @@ tape( 'the function supports a `stride` parameter', opts, function test( t ) { NaN ]); - N = floor( x.length / 2 ); - v = snanmaxabs( N, x, 2, 0 ); + v = snanmaxabs( 5, x, 2, 0 ); t.strictEqual( v, 4.0, 'returns expected value' ); t.end(); }); tape( 'the function supports a negative `stride` parameter', opts, function test( t ) { - var N; var x; var v; @@ -147,8 +143,7 @@ tape( 'the function supports a negative `stride` parameter', opts, function test 2.0 ]); - N = floor( x.length / 2 ); - v = snanmaxabs( N, x, -2, 8 ); + v = snanmaxabs( 5, x, -2, 8 ); t.strictEqual( v, 4.0, 'returns expected value' ); t.end(); @@ -167,7 +162,6 @@ tape( 'if provided a `stride` parameter equal to `0`, the function returns the f }); tape( 'the function supports an `offset` parameter', opts, function test( t ) { - var N; var x; var v; @@ -183,9 +177,8 @@ tape( 'the function supports an `offset` parameter', opts, function test( t ) { NaN, NaN // 4 ]); - N = floor( x.length / 2 ); - v = snanmaxabs( N, x, 2, 1 ); + v = snanmaxabs( 5, x, 2, 1 ); t.strictEqual( v, 4.0, 'returns expected value' ); t.end(); diff --git a/lib/node_modules/@stdlib/stats/base/snanmaxabs/test/test.snanmaxabs.js b/lib/node_modules/@stdlib/stats/base/snanmaxabs/test/test.snanmaxabs.js index f3f68fa423c2..018c7477749c 100644 --- a/lib/node_modules/@stdlib/stats/base/snanmaxabs/test/test.snanmaxabs.js +++ b/lib/node_modules/@stdlib/stats/base/snanmaxabs/test/test.snanmaxabs.js @@ -21,7 +21,6 @@ // MODULES // var tape = require( 'tape' ); -var floor = require( '@stdlib/math/base/special/floor' ); var isnan = require( '@stdlib/math/base/assert/is-nan' ); var isPositiveZero = require( '@stdlib/math/base/assert/is-positive-zero' ); var Float32Array = require( '@stdlib/array/float32' ); @@ -96,7 +95,6 @@ tape( 'if provided an `N` parameter equal to `1`, the function returns the first }); tape( 'the function supports a `stride` parameter', function test( t ) { - var N; var x; var v; @@ -113,15 +111,13 @@ tape( 'the function supports a `stride` parameter', function test( t ) { NaN ]); - N = floor( x.length / 2 ); - v = snanmaxabs( N, x, 2 ); + v = snanmaxabs( 5, x, 2 ); t.strictEqual( v, 4.0, 'returns expected value' ); t.end(); }); tape( 'the function supports a negative `stride` parameter', function test( t ) { - var N; var x; var v; @@ -138,8 +134,7 @@ tape( 'the function supports a negative `stride` parameter', function test( t ) 2.0 ]); - N = floor( x.length / 2 ); - v = snanmaxabs( N, x, -2 ); + v = snanmaxabs( 5, x, -2 ); t.strictEqual( v, 4.0, 'returns expected value' ); t.end(); @@ -160,7 +155,6 @@ tape( 'if provided a `stride` parameter equal to `0`, the function returns the f tape( 'the function supports view offsets', function test( t ) { var x0; var x1; - var N; var v; x0 = new Float32Array([ @@ -178,9 +172,8 @@ tape( 'the function supports view offsets', function test( t ) { ]); x1 = new Float32Array( x0.buffer, x0.BYTES_PER_ELEMENT*1 ); // start at 2nd element - N = floor(x1.length / 2); - v = snanmaxabs( N, x1, 2 ); + v = snanmaxabs( 5, x1, 2 ); t.strictEqual( v, 4.0, 'returns expected value' ); t.end(); diff --git a/lib/node_modules/@stdlib/stats/base/snanmaxabs/test/test.snanmaxabs.native.js b/lib/node_modules/@stdlib/stats/base/snanmaxabs/test/test.snanmaxabs.native.js index 79bfe1fe7679..3b1e7f5b7867 100644 --- a/lib/node_modules/@stdlib/stats/base/snanmaxabs/test/test.snanmaxabs.native.js +++ b/lib/node_modules/@stdlib/stats/base/snanmaxabs/test/test.snanmaxabs.native.js @@ -22,7 +22,6 @@ var resolve = require( 'path' ).resolve; var tape = require( 'tape' ); -var floor = require( '@stdlib/math/base/special/floor' ); var isnan = require( '@stdlib/math/base/assert/is-nan' ); var isPositiveZero = require( '@stdlib/math/base/assert/is-positive-zero' ); var Float32Array = require( '@stdlib/array/float32' ); @@ -187,7 +186,6 @@ tape( 'if provided an `N` parameter equal to `1`, the function returns the first }); tape( 'the function supports a `stride` parameter', opts, function test( t ) { - var N; var x; var v; @@ -204,15 +202,13 @@ tape( 'the function supports a `stride` parameter', opts, function test( t ) { NaN ]); - N = floor( x.length / 2 ); - v = snanmaxabs( N, x, 2 ); + v = snanmaxabs( 5, x, 2 ); t.strictEqual( v, 4.0, 'returns expected value' ); t.end(); }); tape( 'the function supports a negative `stride` parameter', opts, function test( t ) { - var N; var x; var v; @@ -229,8 +225,7 @@ tape( 'the function supports a negative `stride` parameter', opts, function test 2.0 ]); - N = floor( x.length / 2 ); - v = snanmaxabs( N, x, -2 ); + v = snanmaxabs( 5, x, -2 ); t.strictEqual( v, 4.0, 'returns expected value' ); t.end(); @@ -251,7 +246,6 @@ tape( 'if provided a `stride` parameter equal to `0`, the function returns the f tape( 'the function supports view offsets', opts, function test( t ) { var x0; var x1; - var N; var v; x0 = new Float32Array([ @@ -269,9 +263,8 @@ tape( 'the function supports view offsets', opts, function test( t ) { ]); x1 = new Float32Array( x0.buffer, x0.BYTES_PER_ELEMENT*1 ); // start at 2nd element - N = floor(x1.length / 2); - v = snanmaxabs( N, x1, 2 ); + v = snanmaxabs( 5, x1, 2 ); t.strictEqual( v, 4.0, 'returns expected value' ); t.end(); From e40d2156aaf0e2f6b74927ef1745e3fc23cc3baa Mon Sep 17 00:00:00 2001 From: stdlib-bot <82920195+stdlib-bot@users.noreply.github.com> Date: Sat, 28 Dec 2024 18:13:49 +0000 Subject: [PATCH 2/2] chore: update copyright years --- lib/node_modules/@stdlib/stats/base/snanmaxabs/src/main.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lib/node_modules/@stdlib/stats/base/snanmaxabs/src/main.c b/lib/node_modules/@stdlib/stats/base/snanmaxabs/src/main.c index 139a7182c767..55030dd4bc75 100644 --- a/lib/node_modules/@stdlib/stats/base/snanmaxabs/src/main.c +++ b/lib/node_modules/@stdlib/stats/base/snanmaxabs/src/main.c @@ -1,7 +1,7 @@ /** * @license Apache-2.0 * -* Copyright (c) 2020 The Stdlib Authors. +* Copyright (c) 2024 The Stdlib Authors. * * Licensed under the Apache License, Version 2.0 (the "License"); * you may not use this file except in compliance with the License.