From 5dc7009819265054f097b045d841b441bd9e8d33 Mon Sep 17 00:00:00 2001 From: DhruvArvindSingh Date: Sun, 4 Jan 2026 19:24:57 +0530 Subject: [PATCH 1/6] feat: adds fortrand and c implementation of blas/base/srotg --- 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: passed - 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: missing_dependencies - task: lint_c_examples status: missing_dependencies - task: lint_c_benchmarks status: missing_dependencies - task: lint_c_tests_fixtures status: na - task: lint_shell status: na - task: lint_typescript_declarations status: passed - task: lint_typescript_tests status: na - task: lint_license_headers status: passed --- --- .../@stdlib/blas/base/srotg/README.md | 131 +++++ .../blas/base/srotg/benchmark/benchmark.js | 108 ++-- .../base/srotg/benchmark/benchmark.native.js | 109 ++++ .../base/srotg/benchmark/benchmark.ndarray.js | 108 ++++ .../benchmark/benchmark.ndarray.native.js | 113 ++++ .../blas/base/srotg/benchmark/c/Makefile | 146 ++++++ .../base/srotg/benchmark/c/benchmark.length.c | 193 +++++++ .../base/srotg/benchmark/fortran/Makefile | 141 +++++ .../benchmark/fortran/benchmark.length.f | 213 ++++++++ .../@stdlib/blas/base/srotg/binding.gyp | 265 ++++++++++ .../@stdlib/blas/base/srotg/docs/repl.txt | 12 +- .../blas/base/srotg/examples/c/Makefile | 146 ++++++ .../blas/base/srotg/examples/c/example.c | 49 ++ .../@stdlib/blas/base/srotg/include.gypi | 70 +++ .../srotg/include/stdlib/blas/base/srotg.h | 48 ++ .../include/stdlib/blas/base/srotg_cblas.h | 43 ++ .../include/stdlib/blas/base/srotg_fortran.h | 41 ++ .../blas/base/srotg/lib/assign.native.js | 52 ++ .../@stdlib/blas/base/srotg/lib/index.js | 15 +- .../@stdlib/blas/base/srotg/lib/main.js | 23 +- .../@stdlib/blas/base/srotg/lib/native.js | 35 ++ .../@stdlib/blas/base/srotg/lib/srotg.js | 48 ++ .../blas/base/srotg/lib/srotg.native.js | 51 ++ .../@stdlib/blas/base/srotg/manifest.json | 486 ++++++++++++++++++ .../@stdlib/blas/base/srotg/package.json | 4 + .../@stdlib/blas/base/srotg/src/Makefile | 70 +++ .../@stdlib/blas/base/srotg/src/addon.c | 63 +++ .../@stdlib/blas/base/srotg/src/srotg.c | 34 ++ .../@stdlib/blas/base/srotg/src/srotg.f | 105 ++++ .../blas/base/srotg/src/srotg_assign.c | 75 +++ .../@stdlib/blas/base/srotg/src/srotg_cblas.c | 48 ++ .../@stdlib/blas/base/srotg/src/srotg_f.c | 72 +++ .../base/srotg/test/test.assign.native.js | 163 ++++++ .../@stdlib/blas/base/srotg/test/test.js | 56 +- .../@stdlib/blas/base/srotg/test/test.main.js | 97 ---- .../blas/base/srotg/test/test.srotg.js | 97 ++++ .../blas/base/srotg/test/test.srotg.native.js | 106 ++++ 37 files changed, 3459 insertions(+), 177 deletions(-) create mode 100644 lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.native.js create mode 100644 lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.ndarray.js create mode 100644 lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.ndarray.native.js create mode 100644 lib/node_modules/@stdlib/blas/base/srotg/benchmark/c/Makefile create mode 100644 lib/node_modules/@stdlib/blas/base/srotg/benchmark/c/benchmark.length.c create mode 100644 lib/node_modules/@stdlib/blas/base/srotg/benchmark/fortran/Makefile create mode 100644 lib/node_modules/@stdlib/blas/base/srotg/benchmark/fortran/benchmark.length.f create mode 100644 lib/node_modules/@stdlib/blas/base/srotg/binding.gyp create mode 100644 lib/node_modules/@stdlib/blas/base/srotg/examples/c/Makefile create mode 100644 lib/node_modules/@stdlib/blas/base/srotg/examples/c/example.c create mode 100644 lib/node_modules/@stdlib/blas/base/srotg/include.gypi create mode 100644 lib/node_modules/@stdlib/blas/base/srotg/include/stdlib/blas/base/srotg.h create mode 100644 lib/node_modules/@stdlib/blas/base/srotg/include/stdlib/blas/base/srotg_cblas.h create mode 100644 lib/node_modules/@stdlib/blas/base/srotg/include/stdlib/blas/base/srotg_fortran.h create mode 100644 lib/node_modules/@stdlib/blas/base/srotg/lib/assign.native.js create mode 100644 lib/node_modules/@stdlib/blas/base/srotg/lib/native.js create mode 100644 lib/node_modules/@stdlib/blas/base/srotg/lib/srotg.js create mode 100644 lib/node_modules/@stdlib/blas/base/srotg/lib/srotg.native.js create mode 100644 lib/node_modules/@stdlib/blas/base/srotg/manifest.json create mode 100644 lib/node_modules/@stdlib/blas/base/srotg/src/Makefile create mode 100644 lib/node_modules/@stdlib/blas/base/srotg/src/addon.c create mode 100644 lib/node_modules/@stdlib/blas/base/srotg/src/srotg.c create mode 100644 lib/node_modules/@stdlib/blas/base/srotg/src/srotg.f create mode 100644 lib/node_modules/@stdlib/blas/base/srotg/src/srotg_assign.c create mode 100644 lib/node_modules/@stdlib/blas/base/srotg/src/srotg_cblas.c create mode 100644 lib/node_modules/@stdlib/blas/base/srotg/src/srotg_f.c create mode 100644 lib/node_modules/@stdlib/blas/base/srotg/test/test.assign.native.js delete mode 100644 lib/node_modules/@stdlib/blas/base/srotg/test/test.main.js create mode 100644 lib/node_modules/@stdlib/blas/base/srotg/test/test.srotg.js create mode 100644 lib/node_modules/@stdlib/blas/base/srotg/test/test.srotg.native.js diff --git a/lib/node_modules/@stdlib/blas/base/srotg/README.md b/lib/node_modules/@stdlib/blas/base/srotg/README.md index 7fa9b5bc1174..604b75f0eece 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/README.md +++ b/lib/node_modules/@stdlib/blas/base/srotg/README.md @@ -92,6 +92,137 @@ for ( i = 0; i < 100; i++ ) { + + +* * * + +
+ +## C APIs + + + +
+ +
+ + + + + +
+ +### Usage + +```c +#include "stdlib/blas/base/srotg.h" +``` + +#### c_srotg( a, b, \*Out, strideOut ) + +Constructs a Givens plane rotation provided two single-precision floating-point values `a` and `b`. + +```c +float Out[4]; +c_srotg( 0.0, 2.0, Out, 1 ); +// Out => [ 2.0, 1.0, 0.0, 1.0 ] +``` + +The function accepts the following arguments: + +- **a**: `[in] float` rotational elimination parameter. +- **b**: `[in] float` rotational elimination parameter. +- **Out**: `[inout] float*` output array. +- **strideOut**: `[in] CBLAS_INT` stride length for `Out`. + +```c +void c_srotg_assign( float a, float b, float* Out, const CBLAS_INT strideOut, const CBLAS_INT offsetOut ); +``` + +#### c_srotg_assign(a, b, \*Out, strideOut, offsetOut ) + +Constructs a Givens plane rotation provided two single-precision floating-point values `a` and `b` and assigns results to an output array. + +```c +float Out[4]; +c_srotg_assign( 0.0, 2.0, Out, 1, 0 ); +// Out => [ 2.0, 1.0, 0.0, 1.0 ] +``` + +The function accepts the following arguments: + +- **a**: `[in] float` rotational elimination parameter. +- **b**: `[in] float` rotational elimination parameter. +- **Out**: `[inout] float*` output array. +- **strideOut**: `[in] CBLAS_INT` stride length for `Out`. +- **offsetOut**: `[in] CBLAS_INT` starting index for `Out`. + +Givens transformation. + +```c +void c_srotg_assign( float a, float b, float* Out, const CBLAS_INT strideOut, const CBLAS_INT offsetOut ); +``` + +
+ + + + + +
+ +
+ + + + + +
+ +### Examples + +```c +#include "stdlib/blas/base/srotg.h" +#include + +int main( void ) { + // Specify rotational elimination parameter: + const float a = 0.0; + const float b = 2.0; + int i; + + // Create strided arrays: + float Out[4]; + + // Specify stride lengths: + const int strideOut = 1; + + // Apply plane rotation: + c_srotg( a, b, Out, strideOut ); + + // Print the result: + for ( i = 0; i < 4; i++ ) { + printf( "Out[%d] = %f\n", i, Out[i] ); + } + + // Apply plane rotation + c_srotg_assign( a, b, Out, strideOut, 0 ); + + // Print the result: + for ( i = 0; i < 4; i++ ) { + printf( "Out[%d] = %f\n", i, Out[i] ); + } +} +``` + +
+ + + +
+ + +
diff --git a/lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.js b/lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.js index 4f229c376eb9..95c7759d0df3 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.js +++ b/lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.js @@ -1,7 +1,7 @@ /** * @license Apache-2.0 * -* Copyright (c) 2023 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. @@ -21,68 +21,84 @@ // MODULES // var bench = require( '@stdlib/bench' ); -var discreteUniform = require( '@stdlib/random/array/discrete-uniform' ); +var uniform = require( '@stdlib/random/array/uniform' ); var isnanf = require( '@stdlib/math/base/assert/is-nanf' ); -var Float32Array = require( '@stdlib/array/float32' ); +var pow = require( '@stdlib/math/base/special/pow' ); +var format = require( '@stdlib/string/format' ); var pkg = require( './../package.json' ).name; var srotg = require( './../lib' ); // VARIABLES // -var OPTS = { +var options = { 'dtype': 'float32' }; -// MAIN // +// FUNCTIONS // -bench( pkg, function benchmark( b ) { - var out; - var x; - var y; - var i; +/** +* Creates a benchmark function. +* +* @private +* @param {PositiveInteger} len - array length +* @returns {Function} benchmark function +*/ +function createBenchmark(len) { + var va = uniform(len, -100.0, 100.0, options); + var vb = uniform(len, -100.0, 100.0, options); + return benchmark; - x = discreteUniform( 100, -5, 5, OPTS ); - y = discreteUniform( 100, -5, 5, OPTS ); + /** + * Benchmark function. + * + * @private + * @param {Benchmark} b - benchmark instance + */ + function benchmark(b) { + var out; + var i; - b.tic(); - for ( i = 0; i < b.iterations; i++ ) { - out = srotg( x[ i%x.length ], y[ i%y.length ] ); - if ( isnanf( out[ i%4 ] ) ) { - b.fail( 'should not return NaN' ); + b.tic(); + for (i = 0; i < b.iterations; i++) { + out = srotg(va[i % len], vb[i % len]); + if (isnanf(out[i % 4])) { + b.fail('should not return NaN'); + } } + b.toc(); + if (isnanf(out[i % 4])) { + b.fail('should not return NaN'); + } + b.pass('benchmark finished'); + b.end(); } - b.toc(); - if ( isnanf( out[ i%4 ] ) ) { - b.fail( 'should not return NaN' ); - } - b.pass( 'benchmark finished' ); - b.end(); -}); - -bench( pkg+':assign', function benchmark( b ) { - var out; - var x; - var y; - var z; +} + + +// MAIN // + +/** +* Main execution sequence. +* +* @private +*/ +function main() { + var len; + var min; + var max; + var f; var i; - x = discreteUniform( 100, -5, 5, OPTS ); - y = discreteUniform( 100, -5, 5, OPTS ); - out = new Float32Array( 4 ); + min = 1; // 10^min + max = 6; // 10^max - b.tic(); - for ( i = 0; i < b.iterations; i++ ) { - z = srotg.assign( x[ i%x.length ], y[ i%y.length ], out, 1, 0 ); - if ( typeof z !=='object' ) { - b.fail( 'should return an array' ); - } + for (i = min; i <= max; i++) { + len = pow(10, i); + f = createBenchmark(len); + bench(format('%s:len=%d', pkg, len), f); } - b.toc(); - if ( isnanf( z[ i%4 ] ) ) { - b.fail( 'should return the output array' ); - } - b.pass( 'benchmark finished' ); - b.end(); -}); +} + +main(); diff --git a/lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.native.js b/lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.native.js new file mode 100644 index 000000000000..0c8be16c3363 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.native.js @@ -0,0 +1,109 @@ +/** +* @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. +*/ + +'use strict'; + +// MODULES // + +var resolve = require( 'path' ).resolve; +var bench = require( '@stdlib/bench' ); +var uniform = require( '@stdlib/random/array/uniform' ); +var isnanf = require( '@stdlib/math/base/assert/is-nanf' ); +var pow = require( '@stdlib/math/base/special/pow' ); +var format = require( '@stdlib/string/format' ); +var tryRequire = require( '@stdlib/utils/try-require' ); +var pkg = require( './../package.json' ).name; + + +// VARIABLES // + +var srotg = tryRequire(resolve(__dirname, './../lib/native.js')); +var opts = { + 'skip': (srotg instanceof Error) +}; +var options = { + 'dtype': 'float32' +}; + + +// FUNCTIONS // + +/** +* Creates a benchmark function. +* +* @private +* @param {PositiveInteger} len - array length +* @returns {Function} benchmark function +*/ +function createBenchmark(len) { + var va = uniform(len, -100.0, 100.0, options); + var vb = uniform(len, -100.0, 100.0, options); + return benchmark; + + /** + * Benchmark function. + * + * @private + * @param {Benchmark} b - benchmark instance + */ + function benchmark(b) { + var out; + var i; + + b.tic(); + for (i = 0; i < b.iterations; i++) { + out = srotg(va[i % len], vb[i % len]); + if (isnanf(out[i % 4])) { + b.fail('should not return NaN'); + } + } + b.toc(); + if (isnanf(out[i % 4])) { + b.fail('should not return NaN'); + } + b.pass('benchmark finished'); + b.end(); + } +} + + +// MAIN // + +/** +* Main execution sequence. +* +* @private +*/ +function main() { + var len; + var min; + var max; + var f; + var i; + + min = 1; // 10^min + max = 6; // 10^max + + for (i = min; i <= max; i++) { + len = pow(10, i); + f = createBenchmark(len); + bench(format('%s::native:len=%d', pkg, len), opts, f); + } +} + +main(); diff --git a/lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.ndarray.js b/lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.ndarray.js new file mode 100644 index 000000000000..30fd9495f57c --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.ndarray.js @@ -0,0 +1,108 @@ +/** +* @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. +*/ + +'use strict'; + +// MODULES // + +var bench = require( '@stdlib/bench' ); +var uniform = require( '@stdlib/random/array/uniform' ); +var isnanf = require( '@stdlib/math/base/assert/is-nanf' ); +var pow = require( '@stdlib/math/base/special/pow' ); +var format = require( '@stdlib/string/format' ); +var Float32Array = require( '@stdlib/array/float32' ); +var pkg = require( './../package.json' ).name; +var srotg = require( './../lib/assign.js' ); + + +// VARIABLES // + +var options = { + 'dtype': 'float32' +}; + + +// FUNCTIONS // + +/** +* Creates a benchmark function. +* +* @private +* @param {PositiveInteger} len - array length +* @returns {Function} benchmark function +*/ +function createBenchmark(len) { + var va = uniform(len, -100.0, 100.0, options); + var vb = uniform(len, -100.0, 100.0, options); + return benchmark; + + /** + * Benchmark function. + * + * @private + * @param {Benchmark} b - benchmark instance + */ + function benchmark(b) { + var out; + var z; + var i; + + out = new Float32Array(4); + + b.tic(); + for (i = 0; i < b.iterations; i++) { + z = srotg(va[i % len], vb[i % len], out, 1, 0); + if (isnanf(z[i % 4])) { + b.fail('should not return NaN'); + } + } + b.toc(); + if (isnanf(z[i % 4])) { + b.fail('should not return NaN'); + } + b.pass('benchmark finished'); + b.end(); + } +} + + +// MAIN // + +/** +* Main execution sequence. +* +* @private +*/ +function main() { + var len; + var min; + var max; + var f; + var i; + + min = 1; // 10^min + max = 6; // 10^max + + for (i = min; i <= max; i++) { + len = pow(10, i); + f = createBenchmark(len); + bench(format('%s:assign:len=%d', pkg, len), f); + } +} + +main(); diff --git a/lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.ndarray.native.js b/lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.ndarray.native.js new file mode 100644 index 000000000000..d2f64cfab21f --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.ndarray.native.js @@ -0,0 +1,113 @@ +/** +* @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. +*/ + +'use strict'; + +// MODULES // + +var resolve = require( 'path' ).resolve; +var bench = require( '@stdlib/bench' ); +var uniform = require( '@stdlib/random/array/uniform' ); +var isnanf = require( '@stdlib/math/base/assert/is-nanf' ); +var pow = require( '@stdlib/math/base/special/pow' ); +var format = require( '@stdlib/string/format' ); +var tryRequire = require( '@stdlib/utils/try-require' ); +var Float32Array = require( '@stdlib/array/float32' ); +var pkg = require( './../package.json' ).name; + + +// VARIABLES // + +var srotg = tryRequire(resolve(__dirname, './../lib/assign.native.js')); +var opts = { + 'skip': (srotg instanceof Error) +}; +var options = { + 'dtype': 'float32' +}; + + +// FUNCTIONS // + +/** +* Creates a benchmark function. +* +* @private +* @param {PositiveInteger} len - array length +* @returns {Function} benchmark function +*/ +function createBenchmark(len) { + var va = uniform(len, -100.0, 100.0, options); + var vb = uniform(len, -100.0, 100.0, options); + return benchmark; + + /** + * Benchmark function. + * + * @private + * @param {Benchmark} b - benchmark instance + */ + function benchmark(b) { + var out; + var z; + var i; + + out = new Float32Array(4); + + b.tic(); + for (i = 0; i < b.iterations; i++) { + z = srotg(va[i % len], vb[i % len], out, 1, 0); + if (isnanf(z[i % 4])) { + b.fail('should not return NaN'); + } + } + b.toc(); + if (isnanf(z[i % 4])) { + b.fail('should not return NaN'); + } + b.pass('benchmark finished'); + b.end(); + } +} + + +// MAIN // + +/** +* Main execution sequence. +* +* @private +*/ +function main() { + var len; + var min; + var max; + var f; + var i; + + min = 1; // 10^min + max = 6; // 10^max + + for (i = min; i <= max; i++) { + len = pow(10, i); + f = createBenchmark(len); + bench(format('%s::native:len=%d', pkg, len), opts, f); + } +} + +main(); diff --git a/lib/node_modules/@stdlib/blas/base/srotg/benchmark/c/Makefile b/lib/node_modules/@stdlib/blas/base/srotg/benchmark/c/Makefile new file mode 100644 index 000000000000..9f97140e7cb0 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/srotg/benchmark/c/Makefile @@ -0,0 +1,146 @@ +#/ +# @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. +#/ + +# VARIABLES # + +ifndef VERBOSE + QUIET := @ +else + QUIET := +endif + +# Determine the OS ([1][1], [2][2]). +# +# [1]: https://en.wikipedia.org/wiki/Uname#Examples +# [2]: http://stackoverflow.com/a/27776822/2225624 +OS ?= $(shell uname) +ifneq (, $(findstring MINGW,$(OS))) + OS := WINNT +else +ifneq (, $(findstring MSYS,$(OS))) + OS := WINNT +else +ifneq (, $(findstring CYGWIN,$(OS))) + OS := WINNT +else +ifneq (, $(findstring Windows_NT,$(OS))) + OS := WINNT +endif +endif +endif +endif + +# Define the program used for compiling C source files: +ifdef C_COMPILER + CC := $(C_COMPILER) +else + CC := gcc +endif + +# Define the command-line options when compiling C files: +CFLAGS ?= \ + -std=c99 \ + -O3 \ + -Wall \ + -pedantic + +# Determine whether to generate position independent code ([1][1], [2][2]). +# +# [1]: https://gcc.gnu.org/onlinedocs/gcc/Code-Gen-Options.html#Code-Gen-Options +# [2]: http://stackoverflow.com/questions/5311515/gcc-fpic-option +ifeq ($(OS), WINNT) + fPIC ?= +else + fPIC ?= -fPIC +endif + +# List of includes (e.g., `-I /foo/bar -I /beep/boop/include`): +INCLUDE ?= + +# List of source files: +SOURCE_FILES ?= + +# List of libraries (e.g., `-lopenblas -lpthread`): +LIBRARIES ?= + +# List of library paths (e.g., `-L /foo/bar -L /beep/boop`): +LIBPATH ?= + +# List of C targets: +c_targets := benchmark.length.out + + +# RULES # + +#/ +# Compiles source files. +# +# @param {string} [C_COMPILER] - C compiler (e.g., `gcc`) +# @param {string} [CFLAGS] - C compiler options +# @param {(string|void)} [fPIC] - compiler flag determining whether to generate position independent code (e.g., `-fPIC`) +# @param {string} [INCLUDE] - list of includes (e.g., `-I /foo/bar -I /beep/boop/include`) +# @param {string} [SOURCE_FILES] - list of source files +# @param {string} [LIBPATH] - list of library paths (e.g., `-L /foo/bar -L /beep/boop`) +# @param {string} [LIBRARIES] - list of libraries (e.g., `-lopenblas -lpthread`) +# +# @example +# make +# +# @example +# make all +#/ +all: $(c_targets) + +.PHONY: all + +#/ +# Compiles C source files. +# +# @private +# @param {string} CC - C compiler (e.g., `gcc`) +# @param {string} CFLAGS - C compiler options +# @param {(string|void)} fPIC - compiler flag determining whether to generate position independent code (e.g., `-fPIC`) +# @param {string} INCLUDE - list of includes (e.g., `-I /foo/bar`) +# @param {string} SOURCE_FILES - list of source files +# @param {string} LIBPATH - list of library paths (e.g., `-L /foo/bar`) +# @param {string} LIBRARIES - list of libraries (e.g., `-lopenblas`) +#/ +$(c_targets): %.out: %.c + $(QUIET) $(CC) $(CFLAGS) $(fPIC) $(INCLUDE) -o $@ $(SOURCE_FILES) $< $(LIBPATH) -lm $(LIBRARIES) + +#/ +# Runs compiled benchmarks. +# +# @example +# make run +#/ +run: $(c_targets) + $(QUIET) ./$< + +.PHONY: run + +#/ +# Removes generated files. +# +# @example +# make clean +#/ +clean: + $(QUIET) -rm -f *.o *.out + +.PHONY: clean diff --git a/lib/node_modules/@stdlib/blas/base/srotg/benchmark/c/benchmark.length.c b/lib/node_modules/@stdlib/blas/base/srotg/benchmark/c/benchmark.length.c new file mode 100644 index 000000000000..529aef50eb47 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/srotg/benchmark/c/benchmark.length.c @@ -0,0 +1,193 @@ +/** +* @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/blas/base/srotg.h" +#include +#include +#include +#include +#include + +#define NAME "srotg" +#define ITERATIONS 10000000 +#define REPEATS 3 +#define MIN 1 +#define MAX 6 + +/** +* Prints the TAP version. +*/ +static void print_version( void ) { + printf( "TAP version 13\n" ); +} + +/** +* Prints the TAP summary. +* +* @param total total number of tests +* @param passing total number of passing tests +*/ +static void print_summary( int total, int passing ) { + printf( "#\n" ); + printf( "1..%d\n", total ); // TAP plan + printf( "# total %d\n", total ); + printf( "# pass %d\n", passing ); + printf( "#\n" ); + printf( "# ok\n" ); +} + +/** +* Prints benchmarks results. +* +* @param iterations number of iterations +* @param elapsed elapsed time in seconds +*/ +static void print_results( int iterations, double elapsed ) { + double rate = (double)iterations / elapsed; + printf( " ---\n" ); + printf( " iterations: %d\n", iterations ); + printf( " elapsed: %0.9f\n", elapsed ); + printf( " rate: %0.9f\n", rate ); + printf( " ...\n" ); +} + +/** +* Returns a clock time. +* +* @return clock time +*/ +static double tic( void ) { + struct timeval now; + gettimeofday( &now, NULL ); + return (double)now.tv_sec + (double)now.tv_usec/1.0e6; +} + +/** +* Generates a random number on the interval [0,1). +* +* @return random number +*/ +static float rand_float( void ) { + int r = rand(); + return (float)r / ( (float)RAND_MAX + 1.0f ); +} + +/** +* Runs a benchmark. +* +* @param iterations number of iterations +* @param len array length +* @return elapsed time in seconds +*/ +static double benchmark1( int iterations, int len ) { + double elapsed; + float out[ 4 ]; + float a[ len ]; + float b[ len ]; + double t; + int i; + + for ( i = 0; i < len; i++ ) { + a[ i ] = ( rand_float()*200.0f ) - 100.0f; + b[ i ] = ( rand_float()*200.0f ) - 100.0f; + } + t = tic(); + for ( i = 0; i < iterations; i++ ) { + c_srotg( a[ i%len ], b[ i%len ], out, 1 ); + if ( out[ 0 ] != out[ 0 ] ) { + printf( "should not return NaN\n" ); + break; + } + } + elapsed = tic() - t; + if ( out[ 0 ] != out[ 0 ] ) { + printf( "should not return NaN\n" ); + } + 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 out[ 4 ]; + float a[ len ]; + float b[ len ]; + double t; + int i; + + for ( i = 0; i < len; i++ ) { + a[ i ] = ( rand_float()*200.0f ) - 100.0f; + b[ i ] = ( rand_float()*200.0f ) - 100.0f; + } + t = tic(); + for ( i = 0; i < iterations; i++ ) { + c_srotg_assign( a[ i%len ], b[ i%len ], out, 1, 0 ); + if ( out[ 0 ] != out[ 0 ] ) { + printf( "should not return NaN\n" ); + break; + } + } + elapsed = tic() - t; + if ( out[ 0 ] != out[ 0 ] ) { + printf( "should not return NaN\n" ); + } + return elapsed; +} + +/** +* Main execution sequence. +*/ +int main( void ) { + double elapsed; + int count; + int iter; + int len; + int i; + int j; + + // Use the current time to seed the random number generator: + srand( time( NULL ) ); + + print_version(); + count = 0; + 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:len=%d\n", NAME, len ); + elapsed = benchmark1( iter, len ); + print_results( iter, elapsed ); + printf( "ok %d benchmark finished\n", count ); + } + for ( j = 0; j < REPEATS; j++ ) { + count += 1; + printf( "# c::%s:assign:len=%d\n", NAME, len ); + elapsed = benchmark2( iter, len ); + print_results( iter, elapsed ); + printf( "ok %d benchmark finished\n", count ); + } + } + print_summary( count, count ); +} diff --git a/lib/node_modules/@stdlib/blas/base/srotg/benchmark/fortran/Makefile b/lib/node_modules/@stdlib/blas/base/srotg/benchmark/fortran/Makefile new file mode 100644 index 000000000000..f60039b39cfe --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/srotg/benchmark/fortran/Makefile @@ -0,0 +1,141 @@ +#/ +# @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. +#/ + +# VARIABLES # + +ifndef VERBOSE + QUIET := @ +else + QUIET := +endif + +# Determine the OS ([1][1], [2][2]). +# +# [1]: https://en.wikipedia.org/wiki/Uname#Examples +# [2]: http://stackoverflow.com/a/27776822/2225624 +OS ?= $(shell uname) +ifneq (, $(findstring MINGW,$(OS))) + OS := WINNT +else +ifneq (, $(findstring MSYS,$(OS))) + OS := WINNT +else +ifneq (, $(findstring CYGWIN,$(OS))) + OS := WINNT +else +ifneq (, $(findstring Windows_NT,$(OS))) + OS := WINNT +endif +endif +endif +endif + +# Define the program used for compiling Fortran source files: +ifdef FORTRAN_COMPILER + FC := $(FORTRAN_COMPILER) +else + FC := gfortran +endif + +# Define the command-line options when compiling Fortran files: +FFLAGS ?= \ + -std=f95 \ + -ffree-form \ + -O3 \ + -Wall \ + -Wextra \ + -Wno-compare-reals \ + -Wimplicit-interface \ + -fno-underscoring \ + -pedantic + +# Determine whether to generate position independent code ([1][1], [2][2]). +# +# [1]: https://gcc.gnu.org/onlinedocs/gcc/Code-Gen-Options.html#Code-Gen-Options +# [2]: http://stackoverflow.com/questions/5311515/gcc-fpic-option +ifeq ($(OS), WINNT) + fPIC ?= +else + fPIC ?= -fPIC +endif + +# List of includes (e.g., `-I /foo/bar -I /beep/boop`): +INCLUDE ?= + +# List of Fortran source files: +SOURCE_FILES ?= ../../src/srotg.f + +# List of Fortran targets: +f_targets := benchmark.length.out + + +# RULES # + +#/ +# Compiles Fortran source files. +# +# @param {string} SOURCE_FILES - list of Fortran source files +# @param {string} [INCLUDE] - list of includes (e.g., `-I /foo/bar -I /beep/boop`) +# @param {string} [FORTRAN_COMPILER] - Fortran compiler +# @param {string} [FFLAGS] - Fortran compiler flags +# @param {(string|void)} [fPIC] - compiler flag indicating whether to generate position independent code +# +# @example +# make +# +# @example +# make all +#/ +all: $(f_targets) + +.PHONY: all + +#/ +# Compiles Fortran source files. +# +# @private +# @param {string} SOURCE_FILES - list of Fortran source files +# @param {(string|void)} INCLUDE - list of includes (e.g., `-I /foo/bar -I /beep/boop`) +# @param {string} FC - Fortran compiler +# @param {string} FFLAGS - Fortran compiler flags +# @param {(string|void)} fPIC - compiler flag indicating whether to generate position independent code +#/ +$(f_targets): %.out: %.f + $(QUIET) $(FC) $(FFLAGS) $(fPIC) $(INCLUDE) -o $@ $(SOURCE_FILES) $< + +#/ +# Runs compiled benchmarks. +# +# @example +# make run +#/ +run: $(f_targets) + $(QUIET) ./$< + +.PHONY: run + +#/ +# Removes generated files. +# +# @example +# make clean +#/ +clean: + $(QUIET) -rm -f *.o *.out + +.PHONY: clean diff --git a/lib/node_modules/@stdlib/blas/base/srotg/benchmark/fortran/benchmark.length.f b/lib/node_modules/@stdlib/blas/base/srotg/benchmark/fortran/benchmark.length.f new file mode 100644 index 000000000000..b713d7dd1d9b --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/srotg/benchmark/fortran/benchmark.length.f @@ -0,0 +1,213 @@ +!> +! @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. +!< + +program bench + implicit none + ! .. + ! Local constants: + character(5), parameter :: name = 'srotg' ! if changed, be sure to adjust length + integer, parameter :: iterations = 10000000 + integer, parameter :: repeats = 3 + integer, parameter :: min = 1 + integer, parameter :: max = 6 + ! .. + ! Run the benchmarks: + call main() + ! .. + ! Functions: +contains + ! .. + ! Prints the TAP version. + ! .. + subroutine print_version() + print '(A)', 'TAP version 13' + end subroutine print_version + ! .. + ! Prints the TAP summary. + ! + ! @param {integer} total - total number of tests + ! @param {integer} passing - total number of passing tests + ! .. + subroutine print_summary( total, passing ) + ! .. + ! Scalar arguments: + integer, intent(in) :: total, passing + ! .. + ! Local variables: + character(len=999) :: str, tmp + ! .. + ! Intrinsic functions: + intrinsic adjustl, trim + ! .. + print '(A)', '#' + ! .. + write (str, '(I15)') total ! TAP plan + tmp = adjustl( str ) + print '(A,A)', '1..', trim( tmp ) + ! .. + print '(A,A)', '# total ', trim( tmp ) + ! .. + write (str, '(I15)') passing + tmp = adjustl( str ) + print '(A,A)', '# pass ', trim( tmp ) + ! .. + print '(A)', '#' + print '(A)', '# ok' + end subroutine print_summary + ! .. + ! Prints benchmarks results. + ! + ! @param {integer} iterations - number of iterations + ! @param {double} elapsed - elapsed time in seconds + ! .. + subroutine print_results( iterations, elapsed ) + ! .. + ! Scalar arguments: + double precision, intent(in) :: elapsed + integer, intent(in) :: iterations + ! .. + ! Local variables: + double precision :: rate + character(len=999) :: str, tmp + ! .. + ! Intrinsic functions: + intrinsic dble, adjustl, trim + ! .. + rate = dble( iterations ) / elapsed + ! .. + print '(A)', ' ---' + ! .. + write (str, '(I15)') iterations + tmp = adjustl( str ) + print '(A,A)', ' iterations: ', trim( tmp ) + ! .. + write (str, '(f100.9)') elapsed + tmp = adjustl( str ) + print '(A,A)', ' elapsed: ', trim( tmp ) + ! .. + write( str, '(f100.9)') rate + tmp = adjustl( str ) + print '(A,A)', ' rate: ', trim( tmp ) + ! .. + print '(A)', ' ...' + end subroutine print_results + ! .. + ! Runs a benchmark. + ! + ! @param {integer} iterations - number of iterations + ! @param {integer} len - array length + ! @return {double} elapsed time in seconds + ! .. + double precision function benchmark( iterations, len ) + ! .. + ! External functions: + interface + subroutine srotg( a, b, c, s ) + real :: a, b, c, s + end subroutine srotg + end interface + ! .. + ! Scalar arguments: + integer, intent(in) :: iterations, len + ! .. + ! Local scalars: + double precision :: elapsed, rand_val + real :: t1, t2 + real :: a, b, c, s + integer :: i, idx + ! .. + ! Local arrays: + real, allocatable :: va(:), vb(:) + ! .. + ! Intrinsic functions: + intrinsic random_number, cpu_time, mod + ! .. + ! Allocate arrays: + allocate( va(len), vb(len) ) + ! .. + do i = 1, len + call random_number( rand_val ) + va( i ) = ( real(rand_val)*200.0 ) - 100.0 + call random_number( rand_val ) + vb( i ) = ( real(rand_val)*200.0 ) - 100.0 + end do + ! .. + call cpu_time( t1 ) + ! .. + do i = 1, iterations + idx = mod( i-1, len ) + 1 + a = va( idx ) + b = vb( idx ) + call srotg( a, b, c, s ) + if ( a /= a ) then + print '(A)', 'should not return NaN' + exit + end if + end do + ! .. + call cpu_time( t2 ) + ! .. + elapsed = t2 - t1 + ! .. + if ( a /= a ) then + print '(A)', 'should not return NaN' + end if + ! .. + ! Deallocate arrays: + deallocate( va, vb ) + ! .. + benchmark = elapsed + return + end function benchmark + ! .. + ! Main execution sequence. + ! .. + subroutine main() + ! .. + ! Local variables: + integer :: count, iter, len, i, j + double precision :: elapsed + character(len=999) :: str, tmp + ! .. + ! Intrinsic functions: + intrinsic adjustl, trim + ! .. + call print_version() + count = 0 + do i = min, max + len = 10**i + iter = iterations / 10**(i-1) + do j = 1, repeats + count = count + 1 + ! .. + write (str, '(I15)') len + tmp = adjustl( str ) + print '(A,A,A,A)', '# fortran::', name, ':len=', trim( tmp ) + ! .. + elapsed = benchmark( iter, len ) + ! .. + call print_results( iter, elapsed ) + ! .. + write (str, '(I15)') count + tmp = adjustl( str ) + print '(A,A,A)', 'ok ', trim( tmp ), ' benchmark finished' + end do + end do + call print_summary( count, count ) + end subroutine main +end program bench diff --git a/lib/node_modules/@stdlib/blas/base/srotg/binding.gyp b/lib/node_modules/@stdlib/blas/base/srotg/binding.gyp new file mode 100644 index 000000000000..02a2799da097 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/srotg/binding.gyp @@ -0,0 +1,265 @@ +# @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. + +# A `.gyp` file for building a Node.js native add-on. +# +# [1]: https://gyp.gsrc.io/docs/InputFormatReference.md +# [2]: https://gyp.gsrc.io/docs/UserDocumentation.md +{ + # List of files to include in this file: + 'includes': [ + './include.gypi', + ], + + # Define variables to be used throughout the configuration for all targets: + 'variables': { + # Target name should match the add-on export name: + 'addon_target_name%': 'addon', + + # Fortran compiler (to override -Dfortran_compiler=): + 'fortran_compiler%': 'gfortran', + + # Fortran compiler flags: + 'fflags': [ + # Specify the Fortran standard to which a program is expected to conform: + '-std=f95', + + # Indicate that the layout is free-form source code: + '-ffree-form', + + # Aggressive optimization: + '-O3', + + # Enable commonly used warning options: + '-Wall', + + # Warn if source code contains problematic language features: + '-Wextra', + + # Warn if a procedure is called without an explicit interface: + '-Wimplicit-interface', + + # Do not transform names of entities specified in Fortran source files by appending underscores (i.e., don't mangle names, thus allowing easier usage in C wrappers): + '-fno-underscoring', + + # Warn if source code contains Fortran 95 extensions and C-language constructs: + '-pedantic', + + # Compile but do not link (output is an object file): + '-c', + ], + + # Set variables based on the host OS: + 'conditions': [ + [ + 'OS=="win"', + { + # Define the object file suffix: + 'obj': 'obj', + }, + { + # Define the object file suffix: + 'obj': 'o', + } + ], # end condition (OS=="win") + ], # end conditions + }, # end variables + + # Define compile targets: + 'targets': [ + + # Target to generate an add-on: + { + # The target name should match the add-on export name: + 'target_name': '<(addon_target_name)', + + # Define dependencies: + 'dependencies': [], + + # Define directories which contain relevant include headers: + 'include_dirs': [ + # Local include directory: + '<@(include_dirs)', + ], + + # List of source files: + 'sources': [ + '<@(src_files)', + ], + + # Settings which should be applied when a target's object files are used as linker input: + 'link_settings': { + # Define libraries: + 'libraries': [ + '<@(libraries)', + ], + + # Define library directories: + 'library_dirs': [ + '<@(library_dirs)', + ], + }, + + # C/C++ compiler flags: + 'cflags': [ + # Enable commonly used warning options: + '-Wall', + + # Aggressive optimization: + '-O3', + ], + + # C specific compiler flags: + 'cflags_c': [ + # Specify the C standard to which a program is expected to conform: + '-std=c99', + ], + + # C++ specific compiler flags: + 'cflags_cpp': [ + # Specify the C++ standard to which a program is expected to conform: + '-std=c++11', + ], + + # Linker flags: + 'ldflags': [], + + # Apply conditions based on the host OS: + 'conditions': [ + [ + 'OS=="mac"', + { + # Linker flags: + 'ldflags': [ + '-undefined dynamic_lookup', + '-Wl,-no-pie', + '-Wl,-search_paths_first', + ], + }, + ], # end condition (OS=="mac") + [ + 'OS!="win"', + { + # C/C++ flags: + 'cflags': [ + # Generate platform-independent code: + '-fPIC', + ], + }, + ], # end condition (OS!="win") + ], # end conditions + + # Define custom build actions for particular inputs: + 'rules': [ + { + # Define a rule for processing Fortran files: + 'extension': 'f', + + # Define the pathnames to be used as inputs when performing processing: + 'inputs': [ + # Full path of the current input: + '<(RULE_INPUT_PATH)' + ], + + # Define the outputs produced during processing: + 'outputs': [ + # Store an output object file in a directory for placing intermediate results (only accessible within a single target): + '<(INTERMEDIATE_DIR)/<(RULE_INPUT_ROOT).<(obj)' + ], + + # Define the rule for compiling Fortran based on the host OS: + 'conditions': [ + [ + 'OS=="win"', + + # Rule to compile Fortran on Windows: + { + 'rule_name': 'compile_fortran_windows', + 'message': 'Compiling Fortran file <(RULE_INPUT_PATH) on Windows...', + + 'process_outputs_as_sources': 0, + + # Define the command-line invocation: + 'action': [ + '<(fortran_compiler)', + '<@(fflags)', + '<@(_inputs)', + '-o', + '<@(_outputs)', + ], + }, + + # Rule to compile Fortran on non-Windows: + { + 'rule_name': 'compile_fortran_linux', + 'message': 'Compiling Fortran file <(RULE_INPUT_PATH) on Linux...', + + 'process_outputs_as_sources': 1, + + # Define the command-line invocation: + 'action': [ + '<(fortran_compiler)', + '<@(fflags)', + '-fPIC', # generate platform-independent code + '<@(_inputs)', + '-o', + '<@(_outputs)', + ], + } + ], # end condition (OS=="win") + ], # end conditions + }, # end rule (extension=="f") + ], # end rules + }, # end target <(addon_target_name) + + # Target to copy a generated add-on to a standard location: + { + 'target_name': 'copy_addon', + + # Declare that the output of this target is not linked: + 'type': 'none', + + # Define dependencies: + 'dependencies': [ + # Require that the add-on be generated before building this target: + '<(addon_target_name)', + ], + + # Define a list of actions: + 'actions': [ + { + 'action_name': 'copy_addon', + 'message': 'Copying addon...', + + # Explicitly list the inputs in the command-line invocation below: + 'inputs': [], + + # Declare the expected outputs: + 'outputs': [ + '<(addon_output_dir)/<(addon_target_name).node', + ], + + # Define the command-line invocation: + 'action': [ + 'cp', + '<(PRODUCT_DIR)/<(addon_target_name).node', + '<(addon_output_dir)/<(addon_target_name).node', + ], + }, + ], # end actions + }, # end target copy_addon + ], # end targets +} diff --git a/lib/node_modules/@stdlib/blas/base/srotg/docs/repl.txt b/lib/node_modules/@stdlib/blas/base/srotg/docs/repl.txt index f9dbbc249883..15f45d01b96a 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/docs/repl.txt +++ b/lib/node_modules/@stdlib/blas/base/srotg/docs/repl.txt @@ -7,7 +7,7 @@ ---------- a: float Rotational elimination parameter. - + b: float Rotational elimination parameter. @@ -33,13 +33,13 @@ b: float Rotational elimination parameter. - + out: Float32Array Output array. - + stride: integer Output array stride. - + offset: integer Output array index offset. @@ -47,7 +47,7 @@ ------- out: Float32Array Output array. - + Examples -------- > var out = new {{alias:@stdlib/array/float32}}( 4 ); @@ -55,6 +55,6 @@ [ 2.0, 1.0, 0.0, 1.0 ] > var bool = ( y === out ) true - + See Also -------- diff --git a/lib/node_modules/@stdlib/blas/base/srotg/examples/c/Makefile b/lib/node_modules/@stdlib/blas/base/srotg/examples/c/Makefile new file mode 100644 index 000000000000..6aed70daf167 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/srotg/examples/c/Makefile @@ -0,0 +1,146 @@ +#/ +# @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. +#/ + +# VARIABLES # + +ifndef VERBOSE + QUIET := @ +else + QUIET := +endif + +# Determine the OS ([1][1], [2][2]). +# +# [1]: https://en.wikipedia.org/wiki/Uname#Examples +# [2]: http://stackoverflow.com/a/27776822/2225624 +OS ?= $(shell uname) +ifneq (, $(findstring MINGW,$(OS))) + OS := WINNT +else +ifneq (, $(findstring MSYS,$(OS))) + OS := WINNT +else +ifneq (, $(findstring CYGWIN,$(OS))) + OS := WINNT +else +ifneq (, $(findstring Windows_NT,$(OS))) + OS := WINNT +endif +endif +endif +endif + +# Define the program used for compiling C source files: +ifdef C_COMPILER + CC := $(C_COMPILER) +else + CC := gcc +endif + +# Define the command-line options when compiling C files: +CFLAGS ?= \ + -std=c99 \ + -O3 \ + -Wall \ + -pedantic + +# Determine whether to generate position independent code ([1][1], [2][2]). +# +# [1]: https://gcc.gnu.org/onlinedocs/gcc/Code-Gen-Options.html#Code-Gen-Options +# [2]: http://stackoverflow.com/questions/5311515/gcc-fpic-option +ifeq ($(OS), WINNT) + fPIC ?= +else + fPIC ?= -fPIC +endif + +# List of includes (e.g., `-I /foo/bar -I /beep/boop/include`): +INCLUDE ?= + +# List of source files: +SOURCE_FILES ?= + +# List of libraries (e.g., `-lopenblas -lpthread`): +LIBRARIES ?= + +# List of library paths (e.g., `-L /foo/bar -L /beep/boop`): +LIBPATH ?= + +# List of C targets: +c_targets := example.out + + +# RULES # + +#/ +# Compiles source files. +# +# @param {string} [C_COMPILER] - C compiler (e.g., `gcc`) +# @param {string} [CFLAGS] - C compiler options +# @param {(string|void)} [fPIC] - compiler flag determining whether to generate position independent code (e.g., `-fPIC`) +# @param {string} [INCLUDE] - list of includes (e.g., `-I /foo/bar -I /beep/boop/include`) +# @param {string} [SOURCE_FILES] - list of source files +# @param {string} [LIBPATH] - list of library paths (e.g., `-L /foo/bar -L /beep/boop`) +# @param {string} [LIBRARIES] - list of libraries (e.g., `-lopenblas -lpthread`) +# +# @example +# make +# +# @example +# make all +#/ +all: $(c_targets) + +.PHONY: all + +#/ +# Compiles C source files. +# +# @private +# @param {string} CC - C compiler (e.g., `gcc`) +# @param {string} CFLAGS - C compiler options +# @param {(string|void)} fPIC - compiler flag determining whether to generate position independent code (e.g., `-fPIC`) +# @param {string} INCLUDE - list of includes (e.g., `-I /foo/bar`) +# @param {string} SOURCE_FILES - list of source files +# @param {string} LIBPATH - list of library paths (e.g., `-L /foo/bar`) +# @param {string} LIBRARIES - list of libraries (e.g., `-lopenblas`) +#/ +$(c_targets): %.out: %.c + $(QUIET) $(CC) $(CFLAGS) $(fPIC) $(INCLUDE) -o $@ $(SOURCE_FILES) $< $(LIBPATH) -lm $(LIBRARIES) + +#/ +# Runs compiled examples. +# +# @example +# make run +#/ +run: $(c_targets) + $(QUIET) ./$< + +.PHONY: run + +#/ +# Removes generated files. +# +# @example +# make clean +#/ +clean: + $(QUIET) -rm -f *.o *.out + +.PHONY: clean diff --git a/lib/node_modules/@stdlib/blas/base/srotg/examples/c/example.c b/lib/node_modules/@stdlib/blas/base/srotg/examples/c/example.c new file mode 100644 index 000000000000..ac6e1930c2fd --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/srotg/examples/c/example.c @@ -0,0 +1,49 @@ +/** +* @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/blas/base/srotg.h" +#include + +int main( void ) { + // Specify rotational elimination parameter: + const float a = 0.0; + const float b = 2.0; + int i; + + // Create strided arrays: + float Out[ 4 ]; + + // Specify stride lengths: + const int strideOut = 1; + + // Apply plane rotation: + c_srotg( a, b, Out, strideOut ); + + // Print the result: + for ( i = 0; i < 4; i++ ) { + printf( "Out[%d] = %f\n", i, Out[ i ] ); + } + + // Apply plane rotation + c_srotg_assign( a, b, Out, strideOut, 0 ); + + // Print the result: + for ( i = 0; i < 4; i++ ) { + printf( "Out[%d] = %f\n", i, Out[ i ] ); + } +} diff --git a/lib/node_modules/@stdlib/blas/base/srotg/include.gypi b/lib/node_modules/@stdlib/blas/base/srotg/include.gypi new file mode 100644 index 000000000000..497aeca15320 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/srotg/include.gypi @@ -0,0 +1,70 @@ +# @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. + +# A GYP include file for building a Node.js native add-on. +# +# Note that nesting variables is required due to how GYP processes a configuration. Any variables defined within a nested 'variables' section is defined in the outer scope. Thus, conditions in the outer variable scope are free to use these variables without running into "variable undefined" errors. +# +# Main documentation: +# +# [1]: https://gyp.gsrc.io/docs/InputFormatReference.md +# [2]: https://gyp.gsrc.io/docs/UserDocumentation.md +# +# Variable nesting hacks: +# +# [3]: https://chromium.googlesource.com/external/skia/gyp/+/master/common_variables.gypi +# [4]: https://src.chromium.org/viewvc/chrome/trunk/src/build/common.gypi?revision=127004 +{ + # Define variables to be used throughout the configuration for all targets: + 'variables': { + 'variables': { + # Host BLAS library (to override -Dblas=): + 'blas%': '', + + # Path to BLAS library (to override -Dblas_dir=): + 'blas_dir%': '', + }, # end variables + + # Source directory: + 'src_dir': './src', + + # Include directories: + 'include_dirs': [ + '<@(blas_dir)', + '[ 2.0, 1.0, 0.0, 1.0 ] +*/ +function srotg(a, b, out, stride, offset) { + addon.assign(a, b, out, stride, offset); + return out; +} + + +// EXPORTS // + +module.exports = srotg; diff --git a/lib/node_modules/@stdlib/blas/base/srotg/lib/index.js b/lib/node_modules/@stdlib/blas/base/srotg/lib/index.js index 2fdcd02becc8..3fa033ef2b8c 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/lib/index.js +++ b/lib/node_modules/@stdlib/blas/base/srotg/lib/index.js @@ -47,18 +47,25 @@ // MODULES // -var setReadOnly = require( '@stdlib/utils/define-nonenumerable-read-only-property' ); +var join = require( 'path' ).join; +var tryRequire = require( '@stdlib/utils/try-require' ); +var isError = require( '@stdlib/assert/is-error' ); var main = require( './main.js' ); -var assign = require( './assign.js' ); // MAIN // -setReadOnly( main, 'assign', assign ); +var srotg; +var tmp = tryRequire(join(__dirname, './native.js')); +if (isError(tmp)) { + srotg = main; +} else { + srotg = tmp; +} // EXPORTS // -module.exports = main; +module.exports = srotg; // exports: { "assign": "main.assign" } diff --git a/lib/node_modules/@stdlib/blas/base/srotg/lib/main.js b/lib/node_modules/@stdlib/blas/base/srotg/lib/main.js index 8a027554647a..a7c939b27cd7 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/lib/main.js +++ b/lib/node_modules/@stdlib/blas/base/srotg/lib/main.js @@ -1,7 +1,7 @@ /** * @license Apache-2.0 * -* Copyright (c) 2023 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. @@ -20,27 +20,14 @@ // MODULES // -var Float32Array = require( '@stdlib/array/float32' ); -var fcn = require( './assign.js' ); +var setReadOnly = require( '@stdlib/utils/define-nonenumerable-read-only-property' ); +var srotg = require( './srotg.js' ); +var assign = require( './assign.js' ); // MAIN // -/** -* Constructs a Givens plane rotation. -* -* @param {number} a - rotational elimination parameter -* @param {number} b - rotational elimination parameter -* @returns {Float32Array} output array -* -* @example -* var out = srotg( 0.0, 2.0 ); -* // returns [ 2.0, 1.0, 0.0, 1.0 ] -*/ -function srotg( a, b ) { - var out = new Float32Array( 4 ); - return fcn( a, b, out, 1, 0 ); -} +setReadOnly(srotg, 'assign', assign); // EXPORTS // diff --git a/lib/node_modules/@stdlib/blas/base/srotg/lib/native.js b/lib/node_modules/@stdlib/blas/base/srotg/lib/native.js new file mode 100644 index 000000000000..4269736b4ad3 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/srotg/lib/native.js @@ -0,0 +1,35 @@ +/** +* @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. +*/ + +'use strict'; + +// MODULES // + +var setReadOnly = require( '@stdlib/utils/define-nonenumerable-read-only-property' ); +var srotg = require( './srotg.native.js' ); +var assign = require( './assign.native.js' ); + + +// MAIN // + +setReadOnly(srotg, 'assign', assign); + + +// EXPORTS // + +module.exports = srotg; diff --git a/lib/node_modules/@stdlib/blas/base/srotg/lib/srotg.js b/lib/node_modules/@stdlib/blas/base/srotg/lib/srotg.js new file mode 100644 index 000000000000..de69654d34ba --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/srotg/lib/srotg.js @@ -0,0 +1,48 @@ +/** +* @license Apache-2.0 +* +* Copyright (c) 2023 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. +*/ + +'use strict'; + +// MODULES // + +var Float32Array = require( '@stdlib/array/float32' ); +var fcn = require( './assign.js' ); + + +// MAIN // + +/** +* Constructs a Givens plane rotation. +* +* @param {number} a - rotational elimination parameter +* @param {number} b - rotational elimination parameter +* @returns {Float32Array} output array +* +* @example +* var out = srotg( 0.0, 2.0 ); +* // returns [ 2.0, 1.0, 0.0, 1.0 ] +*/ +function srotg(a, b) { + var out = new Float32Array(4); + return fcn(a, b, out, 1, 0); +} + + +// EXPORTS // + +module.exports = srotg; diff --git a/lib/node_modules/@stdlib/blas/base/srotg/lib/srotg.native.js b/lib/node_modules/@stdlib/blas/base/srotg/lib/srotg.native.js new file mode 100644 index 000000000000..ea212668d3bd --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/srotg/lib/srotg.native.js @@ -0,0 +1,51 @@ +/** +* @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. +*/ + +'use strict'; + +// MODULES // + +var Float32Array = require( '@stdlib/array/float32' ); +var addon = require( './../src/addon.node' ); + + +// MAIN // + +/** +* Applies a plane rotation. +* +* @param {number} a - first input value +* @param {number} b - second input value +* @returns {Float32Array} output array +* +* @example +* var Float32Array = require( '@stdlib/array/float32' ); +* +* var out = srotg( 0.0, 2.0 ); +* // returns [ 2.0, 1.0, 0.0, 1.0 ] +*/ +function srotg(a, b) { + var out = new Float32Array(4); + addon(a, b, out, 1); + return out; +} + + +// EXPORTS // + +module.exports = srotg; diff --git a/lib/node_modules/@stdlib/blas/base/srotg/manifest.json b/lib/node_modules/@stdlib/blas/base/srotg/manifest.json new file mode 100644 index 000000000000..def5dc74a33b --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/srotg/manifest.json @@ -0,0 +1,486 @@ +{ + "options": { + "task": "build", + "os": "linux", + "blas": "", + "wasm": false + }, + "fields": [ + { + "field": "src", + "resolve": true, + "relative": true + }, + { + "field": "include", + "resolve": true, + "relative": true + }, + { + "field": "libraries", + "resolve": false, + "relative": false + }, + { + "field": "libpath", + "resolve": true, + "relative": false + } + ], + "confs": [ + { + "task": "build", + "os": "linux", + "blas": "", + "wasm": false, + "src": [ + "./src/srotg.f", + "./src/srotg_f.c" + ], + "include": [ + "./include" + ], + "libraries": [], + "libpath": [], + "dependencies": [ + "@stdlib/blas/base/shared", + "@stdlib/strided/base/min-view-buffer-index", + "@stdlib/napi/export", + "@stdlib/napi/argv", + "@stdlib/napi/argv-float", + "@stdlib/napi/argv-int64", + "@stdlib/napi/argv-strided-float32array" + ] + }, + { + "task": "benchmark", + "os": "linux", + "blas": "", + "wasm": false, + "src": [ + "./src/srotg.c", + "./src/srotg_assign.c" + ], + "include": [ + "./include" + ], + "libraries": [ + "-lm" + ], + "libpath": [], + "dependencies": [ + "@stdlib/blas/base/shared", + "@stdlib/math/base/special/absf", + "@stdlib/math/base/special/copysignf", + "@stdlib/math/base/special/sqrtf", + "@stdlib/math/base/special/abs2f", + "@stdlib/strided/base/stride2offset" + ] + }, + { + "task": "examples", + "os": "linux", + "blas": "", + "wasm": false, + "src": [ + "./src/srotg.c", + "./src/srotg_assign.c" + ], + "include": [ + "./include" + ], + "libraries": [ + "-lm" + ], + "libpath": [], + "dependencies": [ + "@stdlib/blas/base/shared", + "@stdlib/math/base/special/absf", + "@stdlib/math/base/special/copysignf", + "@stdlib/math/base/special/sqrtf", + "@stdlib/math/base/special/abs2f", + "@stdlib/strided/base/stride2offset" + ] + }, + { + "task": "build", + "os": "linux", + "blas": "openblas", + "wasm": false, + "src": [ + "./src/srotg_cblas.c" + ], + "include": [ + "./include" + ], + "libraries": [ + "-lopenblas", + "-lpthread" + ], + "libpath": [], + "dependencies": [ + "@stdlib/blas/base/shared", + "@stdlib/strided/base/min-view-buffer-index", + "@stdlib/napi/export", + "@stdlib/napi/argv", + "@stdlib/napi/argv-float", + "@stdlib/napi/argv-int64", + "@stdlib/napi/argv-strided-float32array" + ] + }, + { + "task": "benchmark", + "os": "linux", + "blas": "openblas", + "wasm": false, + "src": [ + "./src/srotg_cblas.c" + ], + "include": [ + "./include" + ], + "libraries": [ + "-lopenblas", + "-lpthread" + ], + "libpath": [], + "dependencies": [ + "@stdlib/blas/base/shared", + "@stdlib/strided/base/min-view-buffer-index" + ] + }, + { + "task": "examples", + "os": "linux", + "blas": "openblas", + "wasm": false, + "src": [ + "./src/srotg_cblas.c" + ], + "include": [ + "./include" + ], + "libraries": [ + "-lopenblas", + "-lpthread" + ], + "libpath": [], + "dependencies": [ + "@stdlib/blas/base/shared", + "@stdlib/strided/base/min-view-buffer-index" + ] + }, + { + "task": "build", + "os": "mac", + "blas": "", + "wasm": false, + "src": [ + "./src/srotg.f", + "./src/srotg_f.c" + ], + "include": [ + "./include" + ], + "libraries": [], + "libpath": [], + "dependencies": [ + "@stdlib/blas/base/shared", + "@stdlib/strided/base/min-view-buffer-index", + "@stdlib/napi/export", + "@stdlib/napi/argv", + "@stdlib/napi/argv-float", + "@stdlib/napi/argv-int64", + "@stdlib/napi/argv-strided-float32array" + ] + }, + { + "task": "benchmark", + "os": "mac", + "blas": "", + "wasm": false, + "src": [ + "./src/srotg.c", + "./src/srotg_assign.c" + ], + "include": [ + "./include" + ], + "libraries": [ + "-lm" + ], + "libpath": [], + "dependencies": [ + "@stdlib/blas/base/shared", + "@stdlib/math/base/special/absf", + "@stdlib/math/base/special/copysignf", + "@stdlib/math/base/special/sqrtf", + "@stdlib/math/base/special/abs2f", + "@stdlib/strided/base/stride2offset" + ] + }, + { + "task": "examples", + "os": "mac", + "blas": "", + "wasm": false, + "src": [ + "./src/srotg.c", + "./src/srotg_assign.c" + ], + "include": [ + "./include" + ], + "libraries": [ + "-lm" + ], + "libpath": [], + "dependencies": [ + "@stdlib/blas/base/shared", + "@stdlib/math/base/special/absf", + "@stdlib/math/base/special/copysignf", + "@stdlib/math/base/special/sqrtf", + "@stdlib/math/base/special/abs2f", + "@stdlib/strided/base/stride2offset" + ] + }, + { + "task": "build", + "os": "mac", + "blas": "apple_accelerate_framework", + "wasm": false, + "src": [ + "./src/srotg_cblas.c" + ], + "include": [ + "./include" + ], + "libraries": [ + "-lblas" + ], + "libpath": [], + "dependencies": [ + "@stdlib/blas/base/shared", + "@stdlib/strided/base/min-view-buffer-index", + "@stdlib/napi/export", + "@stdlib/napi/argv", + "@stdlib/napi/argv-float", + "@stdlib/napi/argv-int64", + "@stdlib/napi/argv-strided-float32array" + ] + }, + { + "task": "benchmark", + "os": "mac", + "blas": "apple_accelerate_framework", + "wasm": false, + "src": [ + "./src/srotg_cblas.c" + ], + "include": [ + "./include" + ], + "libraries": [ + "-lblas" + ], + "libpath": [], + "dependencies": [ + "@stdlib/blas/base/shared", + "@stdlib/strided/base/min-view-buffer-index" + ] + }, + { + "task": "examples", + "os": "mac", + "blas": "apple_accelerate_framework", + "wasm": false, + "src": [ + "./src/srotg_cblas.c" + ], + "include": [ + "./include" + ], + "libraries": [ + "-lblas" + ], + "libpath": [], + "dependencies": [ + "@stdlib/blas/base/shared", + "@stdlib/strided/base/min-view-buffer-index" + ] + }, + { + "task": "build", + "os": "mac", + "blas": "openblas", + "wasm": false, + "src": [ + "./src/srotg_cblas.c" + ], + "include": [ + "./include" + ], + "libraries": [ + "-lopenblas", + "-lpthread" + ], + "libpath": [], + "dependencies": [ + "@stdlib/blas/base/shared", + "@stdlib/strided/base/min-view-buffer-index", + "@stdlib/napi/export", + "@stdlib/napi/argv", + "@stdlib/napi/argv-float", + "@stdlib/napi/argv-int64", + "@stdlib/napi/argv-strided-float32array" + ] + }, + { + "task": "benchmark", + "os": "mac", + "blas": "openblas", + "wasm": false, + "src": [ + "./src/srotg_cblas.c" + ], + "include": [ + "./include" + ], + "libraries": [ + "-lopenblas", + "-lpthread" + ], + "libpath": [], + "dependencies": [ + "@stdlib/blas/base/shared", + "@stdlib/strided/base/min-view-buffer-index" + ] + }, + { + "task": "examples", + "os": "mac", + "blas": "openblas", + "wasm": false, + "src": [ + "./src/srotg_cblas.c" + ], + "include": [ + "./include" + ], + "libraries": [ + "-lopenblas", + "-lpthread" + ], + "libpath": [], + "dependencies": [ + "@stdlib/blas/base/shared", + "@stdlib/strided/base/min-view-buffer-index" + ] + }, + { + "task": "build", + "os": "win", + "blas": "", + "wasm": false, + "src": [ + "./src/srotg.c", + "./src/srotg_assign.c" + ], + "include": [ + "./include" + ], + "libraries": [ + "-lm" + ], + "libpath": [], + "dependencies": [ + "@stdlib/blas/base/shared", + "@stdlib/math/base/special/absf", + "@stdlib/math/base/special/copysignf", + "@stdlib/math/base/special/sqrtf", + "@stdlib/math/base/special/abs2f", + "@stdlib/strided/base/stride2offset", + "@stdlib/napi/export", + "@stdlib/napi/argv", + "@stdlib/napi/argv-float", + "@stdlib/napi/argv-int64", + "@stdlib/napi/argv-strided-float32array" + ] + }, + { + "task": "benchmark", + "os": "win", + "blas": "", + "wasm": false, + "src": [ + "./src/srotg.c", + "./src/srotg_assign.c" + ], + "include": [ + "./include" + ], + "libraries": [ + "-lm" + ], + "libpath": [], + "dependencies": [ + "@stdlib/blas/base/shared", + "@stdlib/math/base/special/absf", + "@stdlib/math/base/special/copysignf", + "@stdlib/math/base/special/sqrtf", + "@stdlib/math/base/special/abs2f", + "@stdlib/strided/base/stride2offset" + ] + }, + { + "task": "examples", + "os": "win", + "blas": "", + "wasm": false, + "src": [ + "./src/srotg.c", + "./src/srotg_assign.c" + ], + "include": [ + "./include" + ], + "libraries": [ + "-lm" + ], + "libpath": [], + "dependencies": [ + "@stdlib/blas/base/shared", + "@stdlib/math/base/special/absf", + "@stdlib/math/base/special/copysignf", + "@stdlib/math/base/special/sqrtf", + "@stdlib/math/base/special/abs2f", + "@stdlib/strided/base/stride2offset" + ] + }, + { + "task": "build", + "os": "", + "blas": "", + "wasm": true, + "src": [ + "./src/srotg.c", + "./src/srotg_assign.c" + ], + "include": [ + "./include" + ], + "libraries": [ + "-lm" + ], + "libpath": [], + "dependencies": [ + "@stdlib/blas/base/shared", + "@stdlib/math/base/special/absf", + "@stdlib/math/base/special/copysignf", + "@stdlib/math/base/special/sqrtf", + "@stdlib/math/base/special/abs2f", + "@stdlib/strided/base/stride2offset" + ] + } + ] +} diff --git a/lib/node_modules/@stdlib/blas/base/srotg/package.json b/lib/node_modules/@stdlib/blas/base/srotg/package.json index b1ede45f37c6..c7e8651f41a3 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/package.json +++ b/lib/node_modules/@stdlib/blas/base/srotg/package.json @@ -14,11 +14,15 @@ } ], "main": "./lib", + "browser": "./lib/main.js", + "gypfile": true, "directories": { "benchmark": "./benchmark", "doc": "./docs", "example": "./examples", + "include": "./include", "lib": "./lib", + "src": "./src", "test": "./test" }, "types": "./docs/types", diff --git a/lib/node_modules/@stdlib/blas/base/srotg/src/Makefile b/lib/node_modules/@stdlib/blas/base/srotg/src/Makefile new file mode 100644 index 000000000000..bcf18aa46655 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/srotg/src/Makefile @@ -0,0 +1,70 @@ +#/ +# @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. +#/ + +# VARIABLES # + +ifndef VERBOSE + QUIET := @ +else + QUIET := +endif + +# Determine the OS ([1][1], [2][2]). +# +# [1]: https://en.wikipedia.org/wiki/Uname#Examples +# [2]: http://stackoverflow.com/a/27776822/2225624 +OS ?= $(shell uname) +ifneq (, $(findstring MINGW,$(OS))) + OS := WINNT +else +ifneq (, $(findstring MSYS,$(OS))) + OS := WINNT +else +ifneq (, $(findstring CYGWIN,$(OS))) + OS := WINNT +else +ifneq (, $(findstring Windows_NT,$(OS))) + OS := WINNT +endif +endif +endif +endif + + +# RULES # + +#/ +# Removes generated files for building an add-on. +# +# @example +# make clean-addon +#/ +clean-addon: + $(QUIET) -rm -f *.o *.node + +.PHONY: clean-addon + +#/ +# Removes generated files. +# +# @example +# make clean +#/ +clean: clean-addon + +.PHONY: clean diff --git a/lib/node_modules/@stdlib/blas/base/srotg/src/addon.c b/lib/node_modules/@stdlib/blas/base/srotg/src/addon.c new file mode 100644 index 000000000000..1d1a071c18fc --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/srotg/src/addon.c @@ -0,0 +1,63 @@ +/** +* @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/blas/base/srotg.h" +#include "stdlib/blas/base/shared.h" +#include "stdlib/napi/export.h" +#include "stdlib/napi/argv.h" +#include "stdlib/napi/argv_int64.h" +#include "stdlib/napi/argv_float.h" +#include "stdlib/napi/argv_strided_float32array.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, 4 ); + STDLIB_NAPI_ARGV_INT64( env, strideOut, argv, 3 ); + STDLIB_NAPI_ARGV_FLOAT( env, a, argv, 0 ); + STDLIB_NAPI_ARGV_FLOAT( env, b, argv, 1 ); + STDLIB_NAPI_ARGV_STRIDED_FLOAT32ARRAY( env, Out, 4, strideOut, argv, 2 ); + API_SUFFIX(c_srotg)( a, b, Out, strideOut ); + return NULL; +} + +/** +* 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, 5 ); + STDLIB_NAPI_ARGV_INT64( env, strideOut, argv, 3 ); + STDLIB_NAPI_ARGV_INT64( env, offsetOut, argv, 4 ); + STDLIB_NAPI_ARGV_FLOAT( env, a, argv, 0 ); + STDLIB_NAPI_ARGV_FLOAT( env, b, argv, 1 ); + STDLIB_NAPI_ARGV_STRIDED_FLOAT32ARRAY( env, Out, 4, strideOut, argv, 2 ); + API_SUFFIX(c_srotg_assign)( a, b, Out, strideOut, offsetOut ); + return NULL; +} + +STDLIB_NAPI_MODULE_EXPORT_FCN_WITH_METHOD( addon, "assign", addon_method ) diff --git a/lib/node_modules/@stdlib/blas/base/srotg/src/srotg.c b/lib/node_modules/@stdlib/blas/base/srotg/src/srotg.c new file mode 100644 index 000000000000..0ee4b75347b9 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/srotg/src/srotg.c @@ -0,0 +1,34 @@ +/** +* @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/blas/base/srotg.h" +#include "stdlib/blas/base/shared.h" +#include "stdlib/strided/base/stride2offset.h" + +/** +* Applies a plane rotation. +* +* @param a first input value +* @param b second input value +* @param Out output array +* @param strideOut output stride length +*/ +void API_SUFFIX(c_srotg)( const float a, const float b, float *Out, const CBLAS_INT strideOut ) { + API_SUFFIX(c_srotg_assign)( a, b, Out, strideOut, 0 ); + return; +} diff --git a/lib/node_modules/@stdlib/blas/base/srotg/src/srotg.f b/lib/node_modules/@stdlib/blas/base/srotg/src/srotg.f new file mode 100644 index 000000000000..1ec24b7e3be7 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/srotg/src/srotg.f @@ -0,0 +1,105 @@ +!> +! @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. +!< + +!> Constructs a Givens plane rotation. +! +! ## Notes +! +! * Modified version of reference BLAS level1 routine (version 3.7.0). Updated to "free form" Fortran 95. +! +! ## Authors +! +! * Univ. of Tennessee +! * Univ. of California Berkeley +! * Univ. of Colorado Denver +! * NAG Ltd. +! +! ## References +! +! * Anderson E. (2017) Algorithm 978: Safe Scaling in the Level 1 BLAS. ACM Trans Math Softw 44:1--28. doi:[10.1145/3061665](https://doi.org/10.1145/3061665) +! +! ## License +! +! From : +! +! > The reference BLAS is a freely-available software package. It is available from netlib via anonymous ftp and the World Wide Web. Thus, it can be included in commercial software packages (and has been). We only ask that proper credit be given to the authors. +! > +! > Like all software, it is copyrighted. It is not trademarked, but we do ask the following: +! > +! > * If you modify the source for these routines we ask that you change the name of the routine and comment the changes made to the original. +! > +! > * We will gladly answer any questions regarding the software. If a modification is done, however, it is the responsibility of the person who modified the routine to provide support. +! +! @param {real} a - rotational elimination parameter +! @param {real} b - rotational elimination parameter +! @param {real} c - cosine of the angle of rotation +! @param {real} s - sine of the angle of rotation +!< +subroutine srotg( a, b, c, s ) + implicit none + ! .. + ! Internal parameters: + integer, parameter :: wp = kind(1.e0) + ! .. + ! Constants: + real(wp), parameter :: zero = 0.0_wp + real(wp), parameter :: one = 1.0_wp + ! .. + ! Scalar Arguments: + real(wp) :: a, b, c, s + ! .. + ! Local Scalars: + real(wp) :: anorm, bnorm, scl, sigma, r, z, safmin, safmax + ! .. + ! Compute safe scaling constants using F95-compatible intrinsics: + safmin = tiny( 1.0_wp ) * ( 1.0_wp / epsilon( 1.0_wp ) ) + safmax = huge( 1.0_wp ) * epsilon( 1.0_wp ) + ! .. + anorm = abs(a) + bnorm = abs(b) + if( bnorm == zero ) then + c = one + s = zero + b = zero + else if( anorm == zero ) then + c = zero + s = one + a = b + b = one + else + scl = min( safmax, max( safmin, anorm, bnorm ) ) + if( anorm > bnorm ) then + sigma = sign(one,a) + else + sigma = sign(one,b) + end if + r = sigma*( scl*sqrt((a/scl)**2 + (b/scl)**2) ) + c = a/r + s = b/r + if( anorm > bnorm ) then + z = s + else if( c /= zero ) then + z = one/c + else + z = one + end if + a = r + b = z + end if + return +end subroutine srotg diff --git a/lib/node_modules/@stdlib/blas/base/srotg/src/srotg_assign.c b/lib/node_modules/@stdlib/blas/base/srotg/src/srotg_assign.c new file mode 100644 index 000000000000..767bbaecd9e2 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/srotg/src/srotg_assign.c @@ -0,0 +1,75 @@ +/** +* @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/blas/base/srotg.h" +#include "stdlib/blas/base/shared.h" +#include "stdlib/math/base/special/absf.h" +#include "stdlib/math/base/special/copysignf.h" +#include "stdlib/math/base/special/sqrtf.h" +#include "stdlib/math/base/special/abs2f.h" + +/** +* Applies a plane rotation using alternative indexing semantics. +* +* @param a first input value +* @param b second input value +* @param Out output array +* @param strideOut output stride length +* @param offsetOut starting index for `Out` +*/ +void API_SUFFIX(c_srotg_assign)( const float a, const float b, float *Out, const CBLAS_INT strideOut, const CBLAS_INT offsetOut ) { + float scale; + float sign; + float aa; + float ab; + float r; + float c; + float s; + float z; + + aa = stdlib_base_absf( a ); + ab = stdlib_base_absf( b ); + if ( aa > ab ) { + sign = stdlib_base_copysignf( 1.0, a ); + } else { + sign = stdlib_base_copysignf( 1.0, b ); + } + scale = aa + ab; + if ( scale == 0.0 ) { + c = 1.0; + s = 0.0; + r = 0.0; + z = 0.0; + } else { + r = scale * stdlib_base_sqrtf( stdlib_base_abs2f( a/scale ) + stdlib_base_abs2f( b/scale ) ); + r = r * sign; + c = a / r; + s = b / r; + z = 1.0; + if ( aa > ab ) { + z = s; + } else if ( c != 0.0 ) { + z = 1.0 / c; + } + } + Out[ offsetOut ] = r; + Out[ offsetOut + strideOut ] = z; + Out[ offsetOut + ( 2 * strideOut ) ] = c; + Out[ offsetOut + ( 3 * strideOut ) ] = s; + return; +} diff --git a/lib/node_modules/@stdlib/blas/base/srotg/src/srotg_cblas.c b/lib/node_modules/@stdlib/blas/base/srotg/src/srotg_cblas.c new file mode 100644 index 000000000000..84d8d76b04c0 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/srotg/src/srotg_cblas.c @@ -0,0 +1,48 @@ +/** +* @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/blas/base/srotg.h" +#include "stdlib/blas/base/srotg_cblas.h" +#include "stdlib/blas/base/shared.h" +#include "stdlib/strided/base/min_view_buffer_index.h" + +/** +* Applies a plane rotation. +* +* @param a first input value +* @param b second input value +* @param Out output array +* @param strideOut output stride length +*/ +void API_SUFFIX(c_srotg)( const float a, const float b, float *Out, const CBLAS_INT strideOut ) { + API_SUFFIX(cblas_srotg)( a, b, Out, strideOut ); +} + +/** +* Applies a plane rotation using alternative indexing semantics. +* +* @param a first input value +* @param b second input value +* @param Out output array +* @param strideOut output stride length +* @param offsetOut starting index for `Out` +*/ +void API_SUFFIX(c_srotg_assign)( const float a, const float b, float *Out, const CBLAS_INT strideOut, const CBLAS_INT offsetOut ) { + Out += stdlib_strided_min_view_buffer_index( 4, strideOut, offsetOut ); // adjust array pointer + API_SUFFIX(cblas_srotg)( a, b, Out, strideOut ); +} diff --git a/lib/node_modules/@stdlib/blas/base/srotg/src/srotg_f.c b/lib/node_modules/@stdlib/blas/base/srotg/src/srotg_f.c new file mode 100644 index 000000000000..ee9d12bd2f90 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/srotg/src/srotg_f.c @@ -0,0 +1,72 @@ +/** +* @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/blas/base/srotg.h" +#include "stdlib/blas/base/srotg_fortran.h" +#include "stdlib/blas/base/shared.h" +#include "stdlib/strided/base/min_view_buffer_index.h" + +/** +* Constructs a Givens plane rotation. +* +* @param a first input value +* @param b second input value +* @param Out output array +* @param strideOut output stride length +*/ +void API_SUFFIX(c_srotg)( const float a, const float b, float *Out, const CBLAS_INT strideOut ) { + float ta = a; + float tb = b; + float c, s; + + srotg( &ta, &tb, &c, &s ); + + Out[ 0 ] = ta; // r + Out[ strideOut ] = tb; // z + Out[ 2*strideOut ] = c; + Out[ 3*strideOut ] = s; +} + +/** +* Constructs a Givens plane rotation using alternative indexing semantics. +* +* @param a first input value +* @param b second input value +* @param Out output array +* @param strideOut output stride length +* @param offsetOut starting index for `Out` +*/ +void API_SUFFIX(c_srotg_assign)( const float a, const float b, float *Out, const CBLAS_INT strideOut, const CBLAS_INT offsetOut ) { + CBLAS_INT minIndex; + CBLAS_INT relOffset; + float ta = a; + float tb = b; + float c, s; + + minIndex = stdlib_strided_min_view_buffer_index( 4, strideOut, offsetOut ); + Out += minIndex; + + relOffset = offsetOut - minIndex; + + srotg( &ta, &tb, &c, &s ); + + Out[ relOffset ] = ta; // r + Out[ relOffset + strideOut ] = tb; // z + Out[ relOffset + ( 2 * strideOut ) ] = c; + Out[ relOffset + ( 3 * strideOut ) ] = s; +} diff --git a/lib/node_modules/@stdlib/blas/base/srotg/test/test.assign.native.js b/lib/node_modules/@stdlib/blas/base/srotg/test/test.assign.native.js new file mode 100644 index 000000000000..b0d8d1df22bb --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/srotg/test/test.assign.native.js @@ -0,0 +1,163 @@ +/** +* @license Apache-2.0 +* +* Copyright (c) 2023 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. +*/ + +'use strict'; + +// MODULES // + +var resolve = require( 'path' ).resolve; +var tape = require( 'tape' ); +var Float32Array = require( '@stdlib/array/float32' ); +var f32 = require( '@stdlib/number/float64/base/to-float32' ); +var isnanf = require( '@stdlib/math/base/assert/is-nanf' ); +var tryRequire = require( '@stdlib/utils/try-require' ); + + +// VARIABLES // + +var srotg = tryRequire(resolve(__dirname, './../lib/assign.native.js')); +var opts = { + 'skip': (srotg instanceof Error) +}; + + +// TESTS // + +tape('main export is a function', opts, function test(t) { + t.ok(true, __filename); + t.strictEqual(typeof srotg, 'function', 'main export is a function'); + t.end(); +}); + +tape('the function has an arity of 5', opts, function test(t) { + t.strictEqual(srotg.length, 5, 'returns expected value'); + t.end(); +}); + +tape('the function computes a Givens plane rotation', opts, function test(t) { + var expected; + var values; + var out; + var i; + + expected = [ + [0.5, 1.6666666, 0.6, 0.8], + [0.5, 0.6, 0.8, 0.6], + [0.5, -1.6666666, -0.6, 0.8], + [-0.5, -0.6, 0.8, -0.6], + [-0.5, 1.6666666, 0.6, 0.8], + [0.0, 0.0, 1.0, 0.0], + [1.0, 1.0, 0.0, 1.0], + [1.0, 0.0, 1.0, 0.0] + ]; + values = [ + [0.3, 0.4], + [0.4, 0.3], + [-0.3, 0.4], + [-0.4, 0.3], + [-0.3, -0.4], + [0.0, 0.0], + [0.0, 1.0], + [1.0, 0.0] + ]; + + for (i = 0; i < values.length; i++) { + expected[i] = new Float32Array(expected[i]); + out = new Float32Array(4); + srotg(f32(values[i][0]), f32(values[i][1]), out, 1, 0); + t.deepEqual(out, expected[i], 'returns expected value'); + } + t.end(); +}); + +tape('the function returns an array of NaNs if provided a rotation elimination parameter equal to NaN', opts, function test(t) { + var actual; + var i; + + actual = srotg(NaN, 1.0, new Float32Array(4), 1, 0); + for (i = 0; i < actual.length; i++) { + t.strictEqual(isnanf(actual[i]), true, 'returns expected value'); + } + + actual = srotg(1.0, NaN, new Float32Array(4), 1, 0); + for (i = 0; i < actual.length; i++) { + t.strictEqual(isnanf(actual[i]), true, 'returns expected value'); + } + + actual = srotg(NaN, NaN, new Float32Array(4), 1, 0); + for (i = 0; i < actual.length; i++) { + t.strictEqual(isnanf(actual[i]), true, 'returns expected value'); + } + t.end(); +}); + +tape('the function supports providing a positive stride', opts, function test(t) { + var expected; + var actual; + var out; + + expected = new Float32Array([0.5, 0.0, 1.6666666, 0.0, 0.6, 0.0, 0.8]); + out = new Float32Array([0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0]); + + actual = srotg(0.3, 0.4, out, 2, 0); + t.strictEqual(actual, out, 'returns expected value'); + t.deepEqual(actual, expected, 'returns expected value'); + t.end(); +}); + +tape('the function supports providing a negative stride', opts, function test(t) { + var expected; + var actual; + var out; + + expected = new Float32Array([0.8, 0.0, 0.6, 0.0, 1.6666666, 0.0, 0.5]); + out = new Float32Array([0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0]); + + actual = srotg(0.3, 0.4, out, -2, 6); + t.strictEqual(actual, out, 'returns expected value'); + t.deepEqual(actual, expected, 'returns expected value'); + t.end(); +}); + +tape('the function supports providing an offset', opts, function test(t) { + var expected; + var actual; + var out; + + expected = new Float32Array([0.0, 0.5, 1.6666666, 0.6, 0.8]); + out = new Float32Array([0.0, 0.0, 0.0, 0.0, 0.0]); + + actual = srotg(0.3, 0.4, out, 1, 1); + t.strictEqual(actual, out, 'returns expected value'); + t.deepEqual(actual, expected, 'returns expected value'); + t.end(); +}); + +tape('the function supports providing both a stride and offset', opts, function test(t) { + var expected; + var actual; + var out; + + expected = new Float32Array([0.0, 0.0, 0.5, 0.0, 1.6666666, 0.0, 0.6, 0.0, 0.8]); // eslint-disable-line max-len + out = new Float32Array([0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0]); + + actual = srotg(0.3, 0.4, out, 2, 2); + t.strictEqual(actual, out, 'returns expected value'); + t.deepEqual(actual, expected, 'returns expected value'); + t.end(); +}); diff --git a/lib/node_modules/@stdlib/blas/base/srotg/test/test.js b/lib/node_modules/@stdlib/blas/base/srotg/test/test.js index 5413762e6b99..8faafdb7ce02 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/test/test.js +++ b/lib/node_modules/@stdlib/blas/base/srotg/test/test.js @@ -21,20 +21,64 @@ // MODULES // var tape = require( 'tape' ); +var proxyquire = require( 'proxyquire' ); var hasOwnProp = require( '@stdlib/assert/has-own-property' ); +var isBrowser = require( '@stdlib/assert/is-browser' ); var srotg = require( './../lib' ); +// VARIABLES // + +var opts = { + 'skip': isBrowser +}; + + // TESTS // -tape( 'main export is a function', function test( t ) { - t.ok( true, __filename ); - t.strictEqual( typeof srotg, 'function', 'main export is a function' ); +tape('main export is a function', function test(t) { + t.ok(true, __filename); + t.strictEqual(typeof srotg, 'function', 'main export is a function'); + t.end(); +}); + +tape('attached to the main export is an `assign` method', function test(t) { + t.strictEqual(hasOwnProp(srotg, 'assign'), true, 'has property'); + t.strictEqual(typeof srotg.assign, 'function', 'has method'); + t.end(); +}); + +tape('if a native implementation is available, the main export is the native implementation', opts, function test(t) { + var srotg = proxyquire('./../lib', { + '@stdlib/utils/try-require': tryRequire + }); + + t.strictEqual(srotg, mock, 'returns expected value'); t.end(); + + function tryRequire() { + return mock; + } + + function mock() { + // Mock... + } }); -tape( 'attached to the main export is an `assign` method', function test( t ) { - t.strictEqual( hasOwnProp( srotg, 'assign' ), true, 'has property' ); - t.strictEqual( typeof srotg.assign, 'function', 'has method' ); +tape('if a native implementation is not available, the main export is a JavaScript implementation', opts, function test(t) { + var srotg; + var main; + + main = require( './../lib/srotg.js' ); + + srotg = proxyquire('./../lib', { + '@stdlib/utils/try-require': tryRequire + }); + + t.strictEqual(srotg, main, 'returns expected value'); t.end(); + + function tryRequire() { + return new Error('Cannot find module'); + } }); diff --git a/lib/node_modules/@stdlib/blas/base/srotg/test/test.main.js b/lib/node_modules/@stdlib/blas/base/srotg/test/test.main.js deleted file mode 100644 index baa6502fe345..000000000000 --- a/lib/node_modules/@stdlib/blas/base/srotg/test/test.main.js +++ /dev/null @@ -1,97 +0,0 @@ -/** -* @license Apache-2.0 -* -* Copyright (c) 2023 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. -*/ - -'use strict'; - -// MODULES // - -var tape = require( 'tape' ); -var Float32Array = require( '@stdlib/array/float32' ); -var f32 = require( '@stdlib/number/float64/base/to-float32' ); -var isnanf = require( '@stdlib/math/base/assert/is-nanf' ); -var srotg = require( './../lib/main.js' ); - - -// TESTS // - -tape( 'main export is a function', function test( t ) { - t.ok( true, __filename ); - t.strictEqual( typeof srotg, 'function', 'main export is a function' ); - t.end(); -}); - -tape( 'the function has an arity of 2', function test( t ) { - t.strictEqual( srotg.length, 2, 'returns expected value' ); - t.end(); -}); - -tape( 'the function computes a Givens plane rotation', function test( t ) { - var expected; - var values; - var out; - var i; - - expected = [ - [ 0.5, 1.6666666, 0.6, 0.8 ], - [ 0.5, 0.6, 0.8, 0.6 ], - [ 0.5, -1.6666666, -0.6, 0.8 ], - [ -0.5, -0.6, 0.8, -0.6 ], - [ -0.5, 1.6666666, 0.6, 0.8 ], - [ 0.0, 0.0, 1.0, 0.0 ], - [ 1.0, 1.0, 0.0, 1.0 ], - [ 1.0, 0.0, 1.0, 0.0 ] - ]; - values = [ - [ 0.3, 0.4 ], - [ 0.4, 0.3 ], - [ -0.3, 0.4 ], - [ -0.4, 0.3 ], - [ -0.3, -0.4 ], - [ 0.0, 0.0 ], - [ 0.0, 1.0 ], - [ 1.0, 0.0 ] - ]; - - for ( i = 0; i < values.length; i++ ) { - expected[i] = new Float32Array( expected[i] ); - out = srotg( f32( values[i][0] ), f32( values[i][1] ) ); - t.deepEqual( out, expected[i], 'returns expected value' ); - } - t.end(); -}); - -tape( 'the function returns an array of NaNs if provided a rotational elimination parameter equal to NaN', function test( t ) { - var actual; - var i; - - actual = srotg( NaN, 1.0 ); - for ( i = 0; i < actual.length; i++ ) { - t.strictEqual( isnanf( actual[i] ), true, 'returns expected value' ); - } - - actual = srotg( 1.0, NaN ); - for ( i = 0; i < actual.length; i++ ) { - t.strictEqual( isnanf( actual[i] ), true, 'returns expected value' ); - } - - actual = srotg( NaN, NaN ); - for ( i = 0; i < actual.length; i++ ) { - t.strictEqual( isnanf( actual[i] ), true, 'returns expected value' ); - } - t.end(); -}); diff --git a/lib/node_modules/@stdlib/blas/base/srotg/test/test.srotg.js b/lib/node_modules/@stdlib/blas/base/srotg/test/test.srotg.js new file mode 100644 index 000000000000..7952801ed225 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/srotg/test/test.srotg.js @@ -0,0 +1,97 @@ +/** +* @license Apache-2.0 +* +* Copyright (c) 2023 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. +*/ + +'use strict'; + +// MODULES // + +var tape = require( 'tape' ); +var Float32Array = require( '@stdlib/array/float32' ); +var f32 = require( '@stdlib/number/float64/base/to-float32' ); +var isnanf = require( '@stdlib/math/base/assert/is-nanf' ); +var srotg = require( './../lib/srotg.js' ); + + +// TESTS // + +tape('main export is a function', function test(t) { + t.ok(true, __filename); + t.strictEqual(typeof srotg, 'function', 'main export is a function'); + t.end(); +}); + +tape('the function has an arity of 2', function test(t) { + t.strictEqual(srotg.length, 2, 'returns expected value'); + t.end(); +}); + +tape('the function computes a Givens plane rotation', function test(t) { + var expected; + var values; + var out; + var i; + + expected = [ + [0.5, 1.6666666, 0.6, 0.8], + [0.5, 0.6, 0.8, 0.6], + [0.5, -1.6666666, -0.6, 0.8], + [-0.5, -0.6, 0.8, -0.6], + [-0.5, 1.6666666, 0.6, 0.8], + [0.0, 0.0, 1.0, 0.0], + [1.0, 1.0, 0.0, 1.0], + [1.0, 0.0, 1.0, 0.0] + ]; + values = [ + [0.3, 0.4], + [0.4, 0.3], + [-0.3, 0.4], + [-0.4, 0.3], + [-0.3, -0.4], + [0.0, 0.0], + [0.0, 1.0], + [1.0, 0.0] + ]; + + for (i = 0; i < values.length; i++) { + expected[i] = new Float32Array(expected[i]); + out = srotg(f32(values[i][0]), f32(values[i][1])); + t.deepEqual(out, expected[i], 'returns expected value'); + } + t.end(); +}); + +tape('the function returns an array of NaNs if provided a rotational elimination parameter equal to NaN', function test(t) { + var actual; + var i; + + actual = srotg(NaN, 1.0); + for (i = 0; i < actual.length; i++) { + t.strictEqual(isnanf(actual[i]), true, 'returns expected value'); + } + + actual = srotg(1.0, NaN); + for (i = 0; i < actual.length; i++) { + t.strictEqual(isnanf(actual[i]), true, 'returns expected value'); + } + + actual = srotg(NaN, NaN); + for (i = 0; i < actual.length; i++) { + t.strictEqual(isnanf(actual[i]), true, 'returns expected value'); + } + t.end(); +}); diff --git a/lib/node_modules/@stdlib/blas/base/srotg/test/test.srotg.native.js b/lib/node_modules/@stdlib/blas/base/srotg/test/test.srotg.native.js new file mode 100644 index 000000000000..1af58b8f9736 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/srotg/test/test.srotg.native.js @@ -0,0 +1,106 @@ +/** +* @license Apache-2.0 +* +* Copyright (c) 2023 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. +*/ + +'use strict'; + +// MODULES // + +var resolve = require( 'path' ).resolve; +var tape = require( 'tape' ); +var Float32Array = require( '@stdlib/array/float32' ); +var f32 = require( '@stdlib/number/float64/base/to-float32' ); +var isnanf = require( '@stdlib/math/base/assert/is-nanf' ); +var tryRequire = require( '@stdlib/utils/try-require' ); + + +// VARIABLES // + +var srotg = tryRequire(resolve(__dirname, './../lib/srotg.native.js')); +var opts = { + 'skip': (srotg instanceof Error) +}; + + +// TESTS // + +tape('main export is a function', opts, function test(t) { + t.ok(true, __filename); + t.strictEqual(typeof srotg, 'function', 'main export is a function'); + t.end(); +}); + +tape('the function has an arity of 2', opts, function test(t) { + t.strictEqual(srotg.length, 2, 'returns expected value'); + t.end(); +}); + +tape('the function computes a Givens plane rotation', opts, function test(t) { + var expected; + var values; + var out; + var i; + + expected = [ + [0.5, 1.6666666, 0.6, 0.8], + [0.5, 0.6, 0.8, 0.6], + [0.5, -1.6666666, -0.6, 0.8], + [-0.5, -0.6, 0.8, -0.6], + [-0.5, 1.6666666, 0.6, 0.8], + [0.0, 0.0, 1.0, 0.0], + [1.0, 1.0, 0.0, 1.0], + [1.0, 0.0, 1.0, 0.0] + ]; + values = [ + [0.3, 0.4], + [0.4, 0.3], + [-0.3, 0.4], + [-0.4, 0.3], + [-0.3, -0.4], + [0.0, 0.0], + [0.0, 1.0], + [1.0, 0.0] + ]; + + for (i = 0; i < values.length; i++) { + expected[i] = new Float32Array(expected[i]); + out = srotg(f32(values[i][0]), f32(values[i][1])); + t.deepEqual(out, expected[i], 'returns expected value'); + } + t.end(); +}); + +tape('the function returns an array of NaNs if provided a rotational elimination parameter equal to NaN', opts, function test(t) { + var actual; + var i; + + actual = srotg(NaN, 1.0); + for (i = 0; i < actual.length; i++) { + t.strictEqual(isnanf(actual[i]), true, 'returns expected value'); + } + + actual = srotg(1.0, NaN); + for (i = 0; i < actual.length; i++) { + t.strictEqual(isnanf(actual[i]), true, 'returns expected value'); + } + + actual = srotg(NaN, NaN); + for (i = 0; i < actual.length; i++) { + t.strictEqual(isnanf(actual[i]), true, 'returns expected value'); + } + t.end(); +}); From e9ac39ccbb6d7744a8af7eb57d8179529525381e Mon Sep 17 00:00:00 2001 From: DhruvArvindSingh Date: Sun, 4 Jan 2026 20:36:45 +0530 Subject: [PATCH 2/6] chore: updated copyright years --- 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: na - 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: missing_dependencies - task: lint_c_examples status: na - task: lint_c_benchmarks status: na - task: lint_c_tests_fixtures status: na - task: lint_shell status: na - task: lint_typescript_declarations status: passed - task: lint_typescript_tests status: na - task: lint_license_headers status: passed --- --- .../@stdlib/blas/base/srotg/README.md | 2 +- ...nchmark.ndarray.js => benchmark.assign.js} | 0 ...y.native.js => benchmark.assign.native.js} | 2 +- .../blas/base/srotg/benchmark/benchmark.js | 2 +- .../@stdlib/blas/base/srotg/binding.gyp | 2 +- .../@stdlib/blas/base/srotg/include.gypi | 2 +- .../srotg/include/stdlib/blas/base/srotg.h | 6 +- .../include/stdlib/blas/base/srotg_cblas.h | 4 +- .../include/stdlib/blas/base/srotg_fortran.h | 2 +- .../blas/base/srotg/lib/assign.native.js | 2 +- .../@stdlib/blas/base/srotg/lib/main.js | 2 +- .../@stdlib/blas/base/srotg/lib/native.js | 2 +- .../@stdlib/blas/base/srotg/lib/srotg.js | 2 +- .../blas/base/srotg/lib/srotg.native.js | 2 +- .../@stdlib/blas/base/srotg/manifest.json | 32 ++--- .../@stdlib/blas/base/srotg/src/Makefile | 2 +- .../@stdlib/blas/base/srotg/src/addon.c | 14 +- .../@stdlib/blas/base/srotg/src/srotg.c | 6 +- .../@stdlib/blas/base/srotg/src/srotg.f | 2 +- .../blas/base/srotg/src/srotg_assign.c | 10 +- .../@stdlib/blas/base/srotg/src/srotg_cblas.c | 12 +- .../@stdlib/blas/base/srotg/src/srotg_f.c | 12 +- .../blas/base/srotg/test/test.assign.js | 122 +++++++++--------- .../base/srotg/test/test.assign.native.js | 2 +- .../@stdlib/blas/base/srotg/test/test.js | 2 +- .../blas/base/srotg/test/test.srotg.js | 2 +- .../blas/base/srotg/test/test.srotg.native.js | 2 +- 27 files changed, 118 insertions(+), 134 deletions(-) rename lib/node_modules/@stdlib/blas/base/srotg/benchmark/{benchmark.ndarray.js => benchmark.assign.js} (100%) rename lib/node_modules/@stdlib/blas/base/srotg/benchmark/{benchmark.ndarray.native.js => benchmark.assign.native.js} (98%) diff --git a/lib/node_modules/@stdlib/blas/base/srotg/README.md b/lib/node_modules/@stdlib/blas/base/srotg/README.md index 604b75f0eece..21cb3452c53f 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/README.md +++ b/lib/node_modules/@stdlib/blas/base/srotg/README.md @@ -2,7 +2,7 @@ @license Apache-2.0 -Copyright (c) 2023 The Stdlib Authors. +Copyright (c) 2026 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. diff --git a/lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.ndarray.js b/lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.assign.js similarity index 100% rename from lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.ndarray.js rename to lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.assign.js diff --git a/lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.ndarray.native.js b/lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.assign.native.js similarity index 98% rename from lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.ndarray.native.js rename to lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.assign.native.js index d2f64cfab21f..aff3060fdeb2 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.ndarray.native.js +++ b/lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.assign.native.js @@ -1,7 +1,7 @@ /** * @license Apache-2.0 * -* Copyright (c) 2024 The Stdlib Authors. +* Copyright (c) 2026 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. diff --git a/lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.js b/lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.js index 95c7759d0df3..35766ab4ad56 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.js +++ b/lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.js @@ -1,7 +1,7 @@ /** * @license Apache-2.0 * -* Copyright (c) 2024 The Stdlib Authors. +* Copyright (c) 2026 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. diff --git a/lib/node_modules/@stdlib/blas/base/srotg/binding.gyp b/lib/node_modules/@stdlib/blas/base/srotg/binding.gyp index 02a2799da097..60dce9d0b31a 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/binding.gyp +++ b/lib/node_modules/@stdlib/blas/base/srotg/binding.gyp @@ -1,6 +1,6 @@ # @license Apache-2.0 # -# Copyright (c) 2024 The Stdlib Authors. +# Copyright (c) 2026 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. diff --git a/lib/node_modules/@stdlib/blas/base/srotg/include.gypi b/lib/node_modules/@stdlib/blas/base/srotg/include.gypi index 497aeca15320..d8703753076f 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/include.gypi +++ b/lib/node_modules/@stdlib/blas/base/srotg/include.gypi @@ -16,7 +16,7 @@ # A GYP include file for building a Node.js native add-on. # -# Note that nesting variables is required due to how GYP processes a configuration. Any variables defined within a nested 'variables' section is defined in the outer scope. Thus, conditions in the outer variable scope are free to use these variables without running into "variable undefined" errors. +# Note that nestingz variables is required due to how GYP processes a configuration. Any variables defined within a nested 'variables' section is defined in the outer scope. Thus, conditions in the outer variable scope are free to use these variables without running into "variable undefined" errors. # # Main documentation: # diff --git a/lib/node_modules/@stdlib/blas/base/srotg/include/stdlib/blas/base/srotg.h b/lib/node_modules/@stdlib/blas/base/srotg/include/stdlib/blas/base/srotg.h index a4a1254ff11e..1104d7da7116 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/include/stdlib/blas/base/srotg.h +++ b/lib/node_modules/@stdlib/blas/base/srotg/include/stdlib/blas/base/srotg.h @@ -1,7 +1,7 @@ /** * @license Apache-2.0 * -* Copyright (c) 2024 The Stdlib Authors. +* Copyright (c) 2026 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. @@ -34,12 +34,12 @@ extern "C" { /** * Applies a plane rotation. */ -void API_SUFFIX(c_srotg)( const float a, const float b, float *Out, const CBLAS_INT strideOut ); +void API_SUFFIX( c_srotg )( const float a, const float b, float *Out, const CBLAS_INT strideOut ); /** * Applies a plane rotation using alternative indexing semantics. */ -void API_SUFFIX(c_srotg_assign)( const float a, const float b, float *Out, const CBLAS_INT strideOut, const CBLAS_INT offsetOut ); +void API_SUFFIX( c_srotg_assign )( const float a, const float b, float *Out, const CBLAS_INT strideOut, const CBLAS_INT offsetOut ); #ifdef __cplusplus } diff --git a/lib/node_modules/@stdlib/blas/base/srotg/include/stdlib/blas/base/srotg_cblas.h b/lib/node_modules/@stdlib/blas/base/srotg/include/stdlib/blas/base/srotg_cblas.h index 31e12cd75963..4788c7b07538 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/include/stdlib/blas/base/srotg_cblas.h +++ b/lib/node_modules/@stdlib/blas/base/srotg/include/stdlib/blas/base/srotg_cblas.h @@ -1,7 +1,7 @@ /** * @license Apache-2.0 * -* Copyright (c) 2024 The Stdlib Authors. +* Copyright (c) 2026 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. @@ -34,7 +34,7 @@ extern "C" { /** * Applies a plane rotation. */ -void API_SUFFIX(cblas_srotg)( const float a, const float b, float *Out, const CBLAS_INT strideOut ); +void API_SUFFIX( cblas_srotg )( const float a, const float b, float *Out, const CBLAS_INT strideOut ); #ifdef __cplusplus } diff --git a/lib/node_modules/@stdlib/blas/base/srotg/include/stdlib/blas/base/srotg_fortran.h b/lib/node_modules/@stdlib/blas/base/srotg/include/stdlib/blas/base/srotg_fortran.h index 72ac9face5dc..dfbfe12dbb7d 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/include/stdlib/blas/base/srotg_fortran.h +++ b/lib/node_modules/@stdlib/blas/base/srotg/include/stdlib/blas/base/srotg_fortran.h @@ -1,7 +1,7 @@ /** * @license Apache-2.0 * -* Copyright (c) 2024 The Stdlib Authors. +* Copyright (c) 2026 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. diff --git a/lib/node_modules/@stdlib/blas/base/srotg/lib/assign.native.js b/lib/node_modules/@stdlib/blas/base/srotg/lib/assign.native.js index 2f47b3492221..cd9c25fcf11c 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/lib/assign.native.js +++ b/lib/node_modules/@stdlib/blas/base/srotg/lib/assign.native.js @@ -1,7 +1,7 @@ /** * @license Apache-2.0 * -* Copyright (c) 2024 The Stdlib Authors. +* Copyright (c) 2026 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. diff --git a/lib/node_modules/@stdlib/blas/base/srotg/lib/main.js b/lib/node_modules/@stdlib/blas/base/srotg/lib/main.js index a7c939b27cd7..fa17d3d6c092 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/lib/main.js +++ b/lib/node_modules/@stdlib/blas/base/srotg/lib/main.js @@ -1,7 +1,7 @@ /** * @license Apache-2.0 * -* Copyright (c) 2024 The Stdlib Authors. +* Copyright (c) 2026 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. diff --git a/lib/node_modules/@stdlib/blas/base/srotg/lib/native.js b/lib/node_modules/@stdlib/blas/base/srotg/lib/native.js index 4269736b4ad3..50076fc601c3 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/lib/native.js +++ b/lib/node_modules/@stdlib/blas/base/srotg/lib/native.js @@ -1,7 +1,7 @@ /** * @license Apache-2.0 * -* Copyright (c) 2024 The Stdlib Authors. +* Copyright (c) 2026 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. diff --git a/lib/node_modules/@stdlib/blas/base/srotg/lib/srotg.js b/lib/node_modules/@stdlib/blas/base/srotg/lib/srotg.js index de69654d34ba..fbb318c1a37b 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/lib/srotg.js +++ b/lib/node_modules/@stdlib/blas/base/srotg/lib/srotg.js @@ -1,7 +1,7 @@ /** * @license Apache-2.0 * -* Copyright (c) 2023 The Stdlib Authors. +* Copyright (c) 2026 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. diff --git a/lib/node_modules/@stdlib/blas/base/srotg/lib/srotg.native.js b/lib/node_modules/@stdlib/blas/base/srotg/lib/srotg.native.js index ea212668d3bd..3d90ebacd81a 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/lib/srotg.native.js +++ b/lib/node_modules/@stdlib/blas/base/srotg/lib/srotg.native.js @@ -1,7 +1,7 @@ /** * @license Apache-2.0 * -* Copyright (c) 2024 The Stdlib Authors. +* Copyright (c) 2026 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. diff --git a/lib/node_modules/@stdlib/blas/base/srotg/manifest.json b/lib/node_modules/@stdlib/blas/base/srotg/manifest.json index def5dc74a33b..c87fae7dc962 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/manifest.json +++ b/lib/node_modules/@stdlib/blas/base/srotg/manifest.json @@ -64,9 +64,7 @@ "include": [ "./include" ], - "libraries": [ - "-lm" - ], + "libraries": [], "libpath": [], "dependencies": [ "@stdlib/blas/base/shared", @@ -89,9 +87,7 @@ "include": [ "./include" ], - "libraries": [ - "-lm" - ], + "libraries": [], "libpath": [], "dependencies": [ "@stdlib/blas/base/shared", @@ -206,9 +202,7 @@ "include": [ "./include" ], - "libraries": [ - "-lm" - ], + "libraries": [], "libpath": [], "dependencies": [ "@stdlib/blas/base/shared", @@ -231,9 +225,7 @@ "include": [ "./include" ], - "libraries": [ - "-lm" - ], + "libraries": [], "libpath": [], "dependencies": [ "@stdlib/blas/base/shared", @@ -389,9 +381,7 @@ "include": [ "./include" ], - "libraries": [ - "-lm" - ], + "libraries": [], "libpath": [], "dependencies": [ "@stdlib/blas/base/shared", @@ -419,9 +409,7 @@ "include": [ "./include" ], - "libraries": [ - "-lm" - ], + "libraries": [], "libpath": [], "dependencies": [ "@stdlib/blas/base/shared", @@ -444,9 +432,7 @@ "include": [ "./include" ], - "libraries": [ - "-lm" - ], + "libraries": [], "libpath": [], "dependencies": [ "@stdlib/blas/base/shared", @@ -469,9 +455,7 @@ "include": [ "./include" ], - "libraries": [ - "-lm" - ], + "libraries": [], "libpath": [], "dependencies": [ "@stdlib/blas/base/shared", diff --git a/lib/node_modules/@stdlib/blas/base/srotg/src/Makefile b/lib/node_modules/@stdlib/blas/base/srotg/src/Makefile index bcf18aa46655..2caf905cedbe 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/src/Makefile +++ b/lib/node_modules/@stdlib/blas/base/srotg/src/Makefile @@ -1,7 +1,7 @@ #/ # @license Apache-2.0 # -# Copyright (c) 2024 The Stdlib Authors. +# Copyright (c) 2026 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. diff --git a/lib/node_modules/@stdlib/blas/base/srotg/src/addon.c b/lib/node_modules/@stdlib/blas/base/srotg/src/addon.c index 1d1a071c18fc..6d3e268437f1 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/src/addon.c +++ b/lib/node_modules/@stdlib/blas/base/srotg/src/addon.c @@ -1,7 +1,7 @@ /** * @license Apache-2.0 * -* Copyright (c) 2024 The Stdlib Authors. +* Copyright (c) 2026 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. @@ -16,14 +16,14 @@ * limitations under the License. */ -#include "stdlib/blas/base/srotg.h" +#include #include "stdlib/blas/base/shared.h" -#include "stdlib/napi/export.h" +#include "stdlib/blas/base/srotg.h" #include "stdlib/napi/argv.h" -#include "stdlib/napi/argv_int64.h" #include "stdlib/napi/argv_float.h" +#include "stdlib/napi/argv_int64.h" #include "stdlib/napi/argv_strided_float32array.h" -#include +#include "stdlib/napi/export.h" /** * Receives JavaScript callback invocation data. @@ -38,7 +38,7 @@ static napi_value addon( napi_env env, napi_callback_info info ) { STDLIB_NAPI_ARGV_FLOAT( env, a, argv, 0 ); STDLIB_NAPI_ARGV_FLOAT( env, b, argv, 1 ); STDLIB_NAPI_ARGV_STRIDED_FLOAT32ARRAY( env, Out, 4, strideOut, argv, 2 ); - API_SUFFIX(c_srotg)( a, b, Out, strideOut ); + API_SUFFIX( c_srotg )( a, b, Out, strideOut ); return NULL; } @@ -56,7 +56,7 @@ static napi_value addon_method( napi_env env, napi_callback_info info ) { STDLIB_NAPI_ARGV_FLOAT( env, a, argv, 0 ); STDLIB_NAPI_ARGV_FLOAT( env, b, argv, 1 ); STDLIB_NAPI_ARGV_STRIDED_FLOAT32ARRAY( env, Out, 4, strideOut, argv, 2 ); - API_SUFFIX(c_srotg_assign)( a, b, Out, strideOut, offsetOut ); + API_SUFFIX( c_srotg_assign )( a, b, Out, strideOut, offsetOut ); return NULL; } diff --git a/lib/node_modules/@stdlib/blas/base/srotg/src/srotg.c b/lib/node_modules/@stdlib/blas/base/srotg/src/srotg.c index 0ee4b75347b9..869c37898841 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/src/srotg.c +++ b/lib/node_modules/@stdlib/blas/base/srotg/src/srotg.c @@ -1,7 +1,7 @@ /** * @license Apache-2.0 * -* Copyright (c) 2024 The Stdlib Authors. +* Copyright (c) 2026 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. @@ -28,7 +28,7 @@ * @param Out output array * @param strideOut output stride length */ -void API_SUFFIX(c_srotg)( const float a, const float b, float *Out, const CBLAS_INT strideOut ) { - API_SUFFIX(c_srotg_assign)( a, b, Out, strideOut, 0 ); +void API_SUFFIX( c_srotg )( const float a, const float b, float *Out, const CBLAS_INT strideOut ) { + API_SUFFIX( c_srotg_assign )( a, b, Out, strideOut, 0 ); return; } diff --git a/lib/node_modules/@stdlib/blas/base/srotg/src/srotg.f b/lib/node_modules/@stdlib/blas/base/srotg/src/srotg.f index 1ec24b7e3be7..c23bdf3787da 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/src/srotg.f +++ b/lib/node_modules/@stdlib/blas/base/srotg/src/srotg.f @@ -1,7 +1,7 @@ !> ! @license Apache-2.0 ! -! Copyright (c) 2024 The Stdlib Authors. +! Copyright (c) 2026 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. diff --git a/lib/node_modules/@stdlib/blas/base/srotg/src/srotg_assign.c b/lib/node_modules/@stdlib/blas/base/srotg/src/srotg_assign.c index 767bbaecd9e2..c37efcb0c4db 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/src/srotg_assign.c +++ b/lib/node_modules/@stdlib/blas/base/srotg/src/srotg_assign.c @@ -1,7 +1,7 @@ /** * @license Apache-2.0 * -* Copyright (c) 2024 The Stdlib Authors. +* Copyright (c) 2026 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. @@ -16,12 +16,12 @@ * limitations under the License. */ -#include "stdlib/blas/base/srotg.h" #include "stdlib/blas/base/shared.h" +#include "stdlib/blas/base/srotg.h" +#include "stdlib/math/base/special/abs2f.h" #include "stdlib/math/base/special/absf.h" #include "stdlib/math/base/special/copysignf.h" #include "stdlib/math/base/special/sqrtf.h" -#include "stdlib/math/base/special/abs2f.h" /** * Applies a plane rotation using alternative indexing semantics. @@ -32,7 +32,7 @@ * @param strideOut output stride length * @param offsetOut starting index for `Out` */ -void API_SUFFIX(c_srotg_assign)( const float a, const float b, float *Out, const CBLAS_INT strideOut, const CBLAS_INT offsetOut ) { +void API_SUFFIX( c_srotg_assign )( const float a, const float b, float *Out, const CBLAS_INT strideOut, const CBLAS_INT offsetOut ) { float scale; float sign; float aa; @@ -56,7 +56,7 @@ void API_SUFFIX(c_srotg_assign)( const float a, const float b, float *Out, const r = 0.0; z = 0.0; } else { - r = scale * stdlib_base_sqrtf( stdlib_base_abs2f( a/scale ) + stdlib_base_abs2f( b/scale ) ); + r = scale * stdlib_base_sqrtf( stdlib_base_abs2f( a / scale ) + stdlib_base_abs2f( b / scale ) ); r = r * sign; c = a / r; s = b / r; diff --git a/lib/node_modules/@stdlib/blas/base/srotg/src/srotg_cblas.c b/lib/node_modules/@stdlib/blas/base/srotg/src/srotg_cblas.c index 84d8d76b04c0..c092eb6a1e07 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/src/srotg_cblas.c +++ b/lib/node_modules/@stdlib/blas/base/srotg/src/srotg_cblas.c @@ -1,7 +1,7 @@ /** * @license Apache-2.0 * -* Copyright (c) 2024 The Stdlib Authors. +* Copyright (c) 2026 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. @@ -16,9 +16,9 @@ * limitations under the License. */ -#include "stdlib/blas/base/srotg.h" #include "stdlib/blas/base/srotg_cblas.h" #include "stdlib/blas/base/shared.h" +#include "stdlib/blas/base/srotg.h" #include "stdlib/strided/base/min_view_buffer_index.h" /** @@ -29,8 +29,8 @@ * @param Out output array * @param strideOut output stride length */ -void API_SUFFIX(c_srotg)( const float a, const float b, float *Out, const CBLAS_INT strideOut ) { - API_SUFFIX(cblas_srotg)( a, b, Out, strideOut ); +void API_SUFFIX( c_srotg )( const float a, const float b, float *Out, const CBLAS_INT strideOut ) { + API_SUFFIX( cblas_srotg )( a, b, Out, strideOut ); } /** @@ -42,7 +42,7 @@ void API_SUFFIX(c_srotg)( const float a, const float b, float *Out, const CBLAS_ * @param strideOut output stride length * @param offsetOut starting index for `Out` */ -void API_SUFFIX(c_srotg_assign)( const float a, const float b, float *Out, const CBLAS_INT strideOut, const CBLAS_INT offsetOut ) { +void API_SUFFIX( c_srotg_assign )( const float a, const float b, float *Out, const CBLAS_INT strideOut, const CBLAS_INT offsetOut ) { Out += stdlib_strided_min_view_buffer_index( 4, strideOut, offsetOut ); // adjust array pointer - API_SUFFIX(cblas_srotg)( a, b, Out, strideOut ); + API_SUFFIX( cblas_srotg )( a, b, Out, strideOut ); } diff --git a/lib/node_modules/@stdlib/blas/base/srotg/src/srotg_f.c b/lib/node_modules/@stdlib/blas/base/srotg/src/srotg_f.c index ee9d12bd2f90..b66772af2159 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/src/srotg_f.c +++ b/lib/node_modules/@stdlib/blas/base/srotg/src/srotg_f.c @@ -1,7 +1,7 @@ /** * @license Apache-2.0 * -* Copyright (c) 2024 The Stdlib Authors. +* Copyright (c) 2026 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. @@ -16,9 +16,9 @@ * limitations under the License. */ +#include "stdlib/blas/base/shared.h" #include "stdlib/blas/base/srotg.h" #include "stdlib/blas/base/srotg_fortran.h" -#include "stdlib/blas/base/shared.h" #include "stdlib/strided/base/min_view_buffer_index.h" /** @@ -29,7 +29,7 @@ * @param Out output array * @param strideOut output stride length */ -void API_SUFFIX(c_srotg)( const float a, const float b, float *Out, const CBLAS_INT strideOut ) { +void API_SUFFIX( c_srotg )( const float a, const float b, float *Out, const CBLAS_INT strideOut ) { float ta = a; float tb = b; float c, s; @@ -38,8 +38,8 @@ void API_SUFFIX(c_srotg)( const float a, const float b, float *Out, const CBLAS_ Out[ 0 ] = ta; // r Out[ strideOut ] = tb; // z - Out[ 2*strideOut ] = c; - Out[ 3*strideOut ] = s; + Out[ 2 * strideOut ] = c; + Out[ 3 * strideOut ] = s; } /** @@ -51,7 +51,7 @@ void API_SUFFIX(c_srotg)( const float a, const float b, float *Out, const CBLAS_ * @param strideOut output stride length * @param offsetOut starting index for `Out` */ -void API_SUFFIX(c_srotg_assign)( const float a, const float b, float *Out, const CBLAS_INT strideOut, const CBLAS_INT offsetOut ) { +void API_SUFFIX( c_srotg_assign )( const float a, const float b, float *Out, const CBLAS_INT strideOut, const CBLAS_INT offsetOut ) { CBLAS_INT minIndex; CBLAS_INT relOffset; float ta = a; diff --git a/lib/node_modules/@stdlib/blas/base/srotg/test/test.assign.js b/lib/node_modules/@stdlib/blas/base/srotg/test/test.assign.js index 4d398cf3b5da..38b00d710eec 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/test/test.assign.js +++ b/lib/node_modules/@stdlib/blas/base/srotg/test/test.assign.js @@ -29,126 +29,126 @@ var srotg = require( './../lib/assign.js' ); // TESTS // -tape( 'main export is a function', function test( t ) { - t.ok( true, __filename ); - t.strictEqual( typeof srotg, 'function', 'main export is a function' ); +tape('main export is a function', function test(t) { + t.ok(true, __filename); + t.strictEqual(typeof srotg, 'function', 'main export is a function'); t.end(); }); -tape( 'the function has an arity of 5', function test( t ) { - t.strictEqual( srotg.length, 5, 'returns expected value' ); +tape('the function has an arity of 5', function test(t) { + t.strictEqual(srotg.length, 5, 'returns expected value'); t.end(); }); -tape( 'the function computes a Givens plane rotation', function test( t ) { +tape('the function computes a Givens plane rotation', function test(t) { var expected; var values; var out; var i; expected = [ - [ 0.5, 1.6666666, 0.6, 0.8 ], - [ 0.5, 0.6, 0.8, 0.6 ], - [ 0.5, -1.6666666, -0.6, 0.8 ], - [ -0.5, -0.6, 0.8, -0.6 ], - [ -0.5, 1.6666666, 0.6, 0.8 ], - [ 0.0, 0.0, 1.0, 0.0 ], - [ 1.0, 1.0, 0.0, 1.0 ], - [ 1.0, 0.0, 1.0, 0.0 ] + [0.5, 1.6666666, 0.6, 0.8], + [0.5, 0.6, 0.8, 0.6], + [0.5, -1.6666666, -0.6, 0.8], + [-0.5, -0.6, 0.8, -0.6], + [-0.5, 1.6666666, 0.6, 0.8], + [0.0, 0.0, 1.0, 0.0], + [1.0, 1.0, 0.0, 1.0], + [1.0, 0.0, 1.0, 0.0] ]; values = [ - [ 0.3, 0.4 ], - [ 0.4, 0.3 ], - [ -0.3, 0.4 ], - [ -0.4, 0.3 ], - [ -0.3, -0.4 ], - [ 0.0, 0.0 ], - [ 0.0, 1.0 ], - [ 1.0, 0.0 ] + [0.3, 0.4], + [0.4, 0.3], + [-0.3, 0.4], + [-0.4, 0.3], + [-0.3, -0.4], + [0.0, 0.0], + [0.0, 1.0], + [1.0, 0.0] ]; - for ( i = 0; i < values.length; i++ ) { - expected[i] = new Float32Array( expected[i] ); - out = new Float32Array( 4 ); - srotg( f32( values[i][0] ), f32( values[i][1] ), out, 1, 0 ); - t.deepEqual( out, expected[i], 'returns expected value' ); + for (i = 0; i < values.length; i++) { + expected[i] = new Float32Array(expected[i]); + out = new Float32Array(4); + srotg(f32(values[i][0]), f32(values[i][1]), out, 1, 0); + t.deepEqual(out, expected[i], 'returns expected value'); } t.end(); }); -tape( 'the function returns an array of NaNs if provided a rotation elimination parameter equal to NaN', function test( t ) { +tape('the function returns an array of NaNs if provided a rotation elimination parameter equal to NaN', function test(t) { var actual; var i; - actual = srotg( NaN, 1.0, new Float32Array( 4 ), 1, 0 ); - for ( i = 0; i < actual.length; i++ ) { - t.strictEqual( isnanf( actual[i] ), true, 'returns expected value' ); + actual = srotg(NaN, 1.0, new Float32Array(4), 1, 0); + for (i = 0; i < actual.length; i++) { + t.strictEqual(isnanf(actual[i]), true, 'returns expected value'); } - actual = srotg( 1.0, NaN, new Float32Array( 4 ), 1, 0 ); - for ( i = 0; i < actual.length; i++ ) { - t.strictEqual( isnanf( actual[i] ), true, 'returns expected value' ); + actual = srotg(1.0, NaN, new Float32Array(4), 1, 0); + for (i = 0; i < actual.length; i++) { + t.strictEqual(isnanf(actual[i]), true, 'returns expected value'); } - actual = srotg( NaN, NaN, new Float32Array( 4 ), 1, 0 ); - for ( i = 0; i < actual.length; i++ ) { - t.strictEqual( isnanf( actual[i] ), true, 'returns expected value' ); + actual = srotg(NaN, NaN, new Float32Array(4), 1, 0); + for (i = 0; i < actual.length; i++) { + t.strictEqual(isnanf(actual[i]), true, 'returns expected value'); } t.end(); }); -tape( 'the function supports providing a positive stride', function test( t ) { +tape('the function supports providing a positive stride', function test(t) { var expected; var actual; var out; - expected = new Float32Array( [ 0.5, 0.0, 1.6666666, 0.0, 0.6, 0.0, 0.8 ] ); - out = new Float32Array( [ 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0 ] ); + expected = new Float32Array([0.5, 0.0, 1.6666666, 0.0, 0.6, 0.0, 0.8]); + out = new Float32Array([0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0]); - actual = srotg( 0.3, 0.4, out, 2, 0 ); - t.strictEqual( actual, out, 'returns expected value' ); - t.deepEqual( actual, expected, 'returns expected value' ); + actual = srotg(0.3, 0.4, out, 2, 0); + t.strictEqual(actual, out, 'returns expected value'); + t.deepEqual(actual, expected, 'returns expected value'); t.end(); }); -tape( 'the function supports providing a negative stride', function test( t ) { +tape('the function supports providing a negative stride', function test(t) { var expected; var actual; var out; - expected = new Float32Array( [ 0.8, 0.0, 0.6, 0.0, 1.6666666, 0.0, 0.5 ] ); - out = new Float32Array( [ 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0 ] ); + expected = new Float32Array([0.8, 0.0, 0.6, 0.0, 1.6666666, 0.0, 0.5]); + out = new Float32Array([0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0]); - actual = srotg( 0.3, 0.4, out, -2, 6 ); - t.strictEqual( actual, out, 'returns expected value' ); - t.deepEqual( actual, expected, 'returns expected value' ); + actual = srotg(0.3, 0.4, out, -2, 6); + t.strictEqual(actual, out, 'returns expected value'); + t.deepEqual(actual, expected, 'returns expected value'); t.end(); }); -tape( 'the function supports providing an offset', function test( t ) { +tape('the function supports providing an offset', function test(t) { var expected; var actual; var out; - expected = new Float32Array( [ 0.0, 0.5, 1.6666666, 0.6, 0.8 ] ); - out = new Float32Array( [ 0.0, 0.0, 0.0, 0.0, 0.0 ] ); + expected = new Float32Array([0.0, 0.5, 1.6666666, 0.6, 0.8]); + out = new Float32Array([0.0, 0.0, 0.0, 0.0, 0.0]); - actual = srotg( 0.3, 0.4, out, 1, 1 ); - t.strictEqual( actual, out, 'returns expected value' ); - t.deepEqual( actual, expected, 'returns expected value' ); + actual = srotg(0.3, 0.4, out, 1, 1); + t.strictEqual(actual, out, 'returns expected value'); + t.deepEqual(actual, expected, 'returns expected value'); t.end(); }); -tape( 'the function supports providing both a stride and offset', function test( t ) { +tape('the function supports providing both a stride and offset', function test(t) { var expected; var actual; var out; - expected = new Float32Array( [ 0.0, 0.0, 0.5, 0.0, 1.6666666, 0.0, 0.6, 0.0, 0.8 ] ); // eslint-disable-line max-len - out = new Float32Array( [ 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0 ] ); + expected = new Float32Array([0.0, 0.0, 0.5, 0.0, 1.6666666, 0.0, 0.6, 0.0, 0.8]); // eslint-disable-line max-len + out = new Float32Array([0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0]); - actual = srotg( 0.3, 0.4, out, 2, 2 ); - t.strictEqual( actual, out, 'returns expected value' ); - t.deepEqual( actual, expected, 'returns expected value' ); + actual = srotg(0.3, 0.4, out, 2, 2); + t.strictEqual(actual, out, 'returns expected value'); + t.deepEqual(actual, expected, 'returns expected value'); t.end(); }); diff --git a/lib/node_modules/@stdlib/blas/base/srotg/test/test.assign.native.js b/lib/node_modules/@stdlib/blas/base/srotg/test/test.assign.native.js index b0d8d1df22bb..3740ee8d1715 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/test/test.assign.native.js +++ b/lib/node_modules/@stdlib/blas/base/srotg/test/test.assign.native.js @@ -1,7 +1,7 @@ /** * @license Apache-2.0 * -* Copyright (c) 2023 The Stdlib Authors. +* Copyright (c) 2026 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. diff --git a/lib/node_modules/@stdlib/blas/base/srotg/test/test.js b/lib/node_modules/@stdlib/blas/base/srotg/test/test.js index 8faafdb7ce02..6fbea84d5797 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/test/test.js +++ b/lib/node_modules/@stdlib/blas/base/srotg/test/test.js @@ -1,7 +1,7 @@ /** * @license Apache-2.0 * -* Copyright (c) 2023 The Stdlib Authors. +* Copyright (c) 2026 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. diff --git a/lib/node_modules/@stdlib/blas/base/srotg/test/test.srotg.js b/lib/node_modules/@stdlib/blas/base/srotg/test/test.srotg.js index 7952801ed225..582b2e5441ce 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/test/test.srotg.js +++ b/lib/node_modules/@stdlib/blas/base/srotg/test/test.srotg.js @@ -1,7 +1,7 @@ /** * @license Apache-2.0 * -* Copyright (c) 2023 The Stdlib Authors. +* Copyright (c) 2026 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. diff --git a/lib/node_modules/@stdlib/blas/base/srotg/test/test.srotg.native.js b/lib/node_modules/@stdlib/blas/base/srotg/test/test.srotg.native.js index 1af58b8f9736..28487ae3f767 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/test/test.srotg.native.js +++ b/lib/node_modules/@stdlib/blas/base/srotg/test/test.srotg.native.js @@ -1,7 +1,7 @@ /** * @license Apache-2.0 * -* Copyright (c) 2023 The Stdlib Authors. +* Copyright (c) 2026 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. From e686bc9089681c5dae1ab2c57ae826187f25756b Mon Sep 17 00:00:00 2001 From: DhruvArvindSingh Date: Sun, 4 Jan 2026 20:50:56 +0530 Subject: [PATCH 3/6] chore: updated copyright years --- 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: na - task: lint_package_json status: na - task: lint_repl_help status: na - task: lint_javascript_src status: na - task: lint_javascript_cli status: na - task: lint_javascript_examples status: na - task: lint_javascript_tests status: na - task: lint_javascript_benchmarks status: passed - task: lint_python status: na - task: lint_r status: na - task: lint_c_src status: na - task: lint_c_examples status: missing_dependencies - task: lint_c_benchmarks status: missing_dependencies - task: lint_c_tests_fixtures status: na - task: lint_shell status: na - task: lint_typescript_declarations status: passed - task: lint_typescript_tests status: na - task: lint_license_headers status: passed --- --- .../base/srotg/benchmark/benchmark.assign.js | 2 +- .../blas/base/srotg/benchmark/c/Makefile | 2 +- .../base/srotg/benchmark/c/benchmark.length.c | 24 +++++++++---------- .../base/srotg/benchmark/fortran/Makefile | 2 +- .../benchmark/fortran/benchmark.length.f | 2 +- .../blas/base/srotg/examples/c/Makefile | 2 +- .../blas/base/srotg/examples/c/example.c | 2 +- .../@stdlib/blas/base/srotg/include.gypi | 2 +- 8 files changed, 19 insertions(+), 19 deletions(-) diff --git a/lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.assign.js b/lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.assign.js index 30fd9495f57c..e13e43fa4e7c 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.assign.js +++ b/lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.assign.js @@ -1,7 +1,7 @@ /** * @license Apache-2.0 * -* Copyright (c) 2024 The Stdlib Authors. +* Copyright (c) 2026 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. diff --git a/lib/node_modules/@stdlib/blas/base/srotg/benchmark/c/Makefile b/lib/node_modules/@stdlib/blas/base/srotg/benchmark/c/Makefile index 9f97140e7cb0..0756dc7da20a 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/benchmark/c/Makefile +++ b/lib/node_modules/@stdlib/blas/base/srotg/benchmark/c/Makefile @@ -1,7 +1,7 @@ #/ # @license Apache-2.0 # -# Copyright (c) 2024 The Stdlib Authors. +# Copyright (c) 2026 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. diff --git a/lib/node_modules/@stdlib/blas/base/srotg/benchmark/c/benchmark.length.c b/lib/node_modules/@stdlib/blas/base/srotg/benchmark/c/benchmark.length.c index 529aef50eb47..e5203f094ea9 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/benchmark/c/benchmark.length.c +++ b/lib/node_modules/@stdlib/blas/base/srotg/benchmark/c/benchmark.length.c @@ -1,7 +1,7 @@ /** * @license Apache-2.0 * -* Copyright (c) 2024 The Stdlib Authors. +* Copyright (c) 2026 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. @@ -16,12 +16,12 @@ * limitations under the License. */ +#include #include "stdlib/blas/base/srotg.h" -#include -#include #include +#include +#include #include -#include #define NAME "srotg" #define ITERATIONS 10000000 @@ -74,7 +74,7 @@ static void print_results( int iterations, double elapsed ) { static double tic( void ) { struct timeval now; gettimeofday( &now, NULL ); - return (double)now.tv_sec + (double)now.tv_usec/1.0e6; + return (double)now.tv_sec + (double)now.tv_usec / 1.0e6; } /** @@ -103,12 +103,12 @@ static double benchmark1( int iterations, int len ) { int i; for ( i = 0; i < len; i++ ) { - a[ i ] = ( rand_float()*200.0f ) - 100.0f; - b[ i ] = ( rand_float()*200.0f ) - 100.0f; + a[ i ] = ( rand_float() * 200.0f ) - 100.0f; + b[ i ] = ( rand_float() * 200.0f ) - 100.0f; } t = tic(); for ( i = 0; i < iterations; i++ ) { - c_srotg( a[ i%len ], b[ i%len ], out, 1 ); + c_srotg( a[ i % len ], b[ i % len ], out, 1 ); if ( out[ 0 ] != out[ 0 ] ) { printf( "should not return NaN\n" ); break; @@ -137,12 +137,12 @@ static double benchmark2( int iterations, int len ) { int i; for ( i = 0; i < len; i++ ) { - a[ i ] = ( rand_float()*200.0f ) - 100.0f; - b[ i ] = ( rand_float()*200.0f ) - 100.0f; + a[ i ] = ( rand_float() * 200.0f ) - 100.0f; + b[ i ] = ( rand_float() * 200.0f ) - 100.0f; } t = tic(); for ( i = 0; i < iterations; i++ ) { - c_srotg_assign( a[ i%len ], b[ i%len ], out, 1, 0 ); + c_srotg_assign( a[ i % len ], b[ i % len ], out, 1, 0 ); if ( out[ 0 ] != out[ 0 ] ) { printf( "should not return NaN\n" ); break; @@ -173,7 +173,7 @@ int main( void ) { count = 0; for ( i = MIN; i <= MAX; i++ ) { len = pow( 10, i ); - iter = ITERATIONS / pow( 10, i-1 ); + iter = ITERATIONS / pow( 10, i - 1 ); for ( j = 0; j < REPEATS; j++ ) { count += 1; printf( "# c::%s:len=%d\n", NAME, len ); diff --git a/lib/node_modules/@stdlib/blas/base/srotg/benchmark/fortran/Makefile b/lib/node_modules/@stdlib/blas/base/srotg/benchmark/fortran/Makefile index f60039b39cfe..f21d16c0eba3 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/benchmark/fortran/Makefile +++ b/lib/node_modules/@stdlib/blas/base/srotg/benchmark/fortran/Makefile @@ -1,7 +1,7 @@ #/ # @license Apache-2.0 # -# Copyright (c) 2024 The Stdlib Authors. +# Copyright (c) 2026 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. diff --git a/lib/node_modules/@stdlib/blas/base/srotg/benchmark/fortran/benchmark.length.f b/lib/node_modules/@stdlib/blas/base/srotg/benchmark/fortran/benchmark.length.f index b713d7dd1d9b..cba62fe3e2f2 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/benchmark/fortran/benchmark.length.f +++ b/lib/node_modules/@stdlib/blas/base/srotg/benchmark/fortran/benchmark.length.f @@ -1,7 +1,7 @@ !> ! @license Apache-2.0 ! -! Copyright (c) 2024 The Stdlib Authors. +! Copyright (c) 2026 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. diff --git a/lib/node_modules/@stdlib/blas/base/srotg/examples/c/Makefile b/lib/node_modules/@stdlib/blas/base/srotg/examples/c/Makefile index 6aed70daf167..c8f8e9a1517b 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/examples/c/Makefile +++ b/lib/node_modules/@stdlib/blas/base/srotg/examples/c/Makefile @@ -1,7 +1,7 @@ #/ # @license Apache-2.0 # -# Copyright (c) 2024 The Stdlib Authors. +# Copyright (c) 2026 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. diff --git a/lib/node_modules/@stdlib/blas/base/srotg/examples/c/example.c b/lib/node_modules/@stdlib/blas/base/srotg/examples/c/example.c index ac6e1930c2fd..a1408b564f28 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/examples/c/example.c +++ b/lib/node_modules/@stdlib/blas/base/srotg/examples/c/example.c @@ -1,7 +1,7 @@ /** * @license Apache-2.0 * -* Copyright (c) 2024 The Stdlib Authors. +* Copyright (c) 2026 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. diff --git a/lib/node_modules/@stdlib/blas/base/srotg/include.gypi b/lib/node_modules/@stdlib/blas/base/srotg/include.gypi index d8703753076f..cfdf32f2eaa4 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/include.gypi +++ b/lib/node_modules/@stdlib/blas/base/srotg/include.gypi @@ -1,6 +1,6 @@ # @license Apache-2.0 # -# Copyright (c) 2024 The Stdlib Authors. +# Copyright (c) 2026 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. From d43d8bb4c63f7af7d3bc708f65e0267ef288ccc3 Mon Sep 17 00:00:00 2001 From: DhruvArvindSingh Date: Sun, 4 Jan 2026 20:54:58 +0530 Subject: [PATCH 4/6] chore: updated copyright years --- 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: na - task: lint_package_json status: na - task: lint_repl_help status: na - task: lint_javascript_src status: na - task: lint_javascript_cli status: na - task: lint_javascript_examples status: na - task: lint_javascript_tests status: na - task: lint_javascript_benchmarks status: passed - task: lint_python status: na - task: lint_r status: na - task: lint_c_src status: na - task: lint_c_examples status: na - task: lint_c_benchmarks status: na - task: lint_c_tests_fixtures status: na - task: lint_shell status: na - task: lint_typescript_declarations status: passed - task: lint_typescript_tests status: na - task: lint_license_headers status: passed --- --- .../@stdlib/blas/base/srotg/benchmark/benchmark.native.js | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.native.js b/lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.native.js index 0c8be16c3363..05df945ae83e 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.native.js +++ b/lib/node_modules/@stdlib/blas/base/srotg/benchmark/benchmark.native.js @@ -1,7 +1,7 @@ /** * @license Apache-2.0 * -* Copyright (c) 2024 The Stdlib Authors. +* Copyright (c) 2026 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. From 0f768ccbb5d9306979cce25f059dcdffe7e90777 Mon Sep 17 00:00:00 2001 From: DhruvArvindSingh Date: Tue, 6 Jan 2026 20:16:18 +0530 Subject: [PATCH 5/6] fix: fixed src folder --- 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: na - task: lint_package_json status: na - task: lint_repl_help status: na - task: lint_javascript_src status: na - task: lint_javascript_cli status: na - task: lint_javascript_examples status: na - task: lint_javascript_tests status: na - task: lint_javascript_benchmarks status: na - task: lint_python status: na - task: lint_r status: na - task: lint_c_src status: missing_dependencies - task: lint_c_examples status: na - task: lint_c_benchmarks status: na - task: lint_c_tests_fixtures status: na - task: lint_shell status: na - task: lint_typescript_declarations status: passed - task: lint_typescript_tests status: na - task: lint_license_headers status: passed --- --- .../@stdlib/blas/base/srotg/src/srotg.c | 3 ++- .../@stdlib/blas/base/srotg/src/srotg_f.c | 13 +++++++++---- 2 files changed, 11 insertions(+), 5 deletions(-) diff --git a/lib/node_modules/@stdlib/blas/base/srotg/src/srotg.c b/lib/node_modules/@stdlib/blas/base/srotg/src/srotg.c index 869c37898841..e7521ec22f23 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/src/srotg.c +++ b/lib/node_modules/@stdlib/blas/base/srotg/src/srotg.c @@ -29,6 +29,7 @@ * @param strideOut output stride length */ void API_SUFFIX( c_srotg )( const float a, const float b, float *Out, const CBLAS_INT strideOut ) { - API_SUFFIX( c_srotg_assign )( a, b, Out, strideOut, 0 ); + CBLAS_INT offsetOut = stdlib_strided_stride2offset( 4, strideOut ); + API_SUFFIX( c_srotg_assign )( a, b, Out, strideOut, offsetOut ); return; } diff --git a/lib/node_modules/@stdlib/blas/base/srotg/src/srotg_f.c b/lib/node_modules/@stdlib/blas/base/srotg/src/srotg_f.c index b66772af2159..30ef8449768e 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/src/srotg_f.c +++ b/lib/node_modules/@stdlib/blas/base/srotg/src/srotg_f.c @@ -20,6 +20,8 @@ #include "stdlib/blas/base/srotg.h" #include "stdlib/blas/base/srotg_fortran.h" #include "stdlib/strided/base/min_view_buffer_index.h" +#include "stdlib/strided/base/stride2offset.h" + /** * Constructs a Givens plane rotation. @@ -30,16 +32,19 @@ * @param strideOut output stride length */ void API_SUFFIX( c_srotg )( const float a, const float b, float *Out, const CBLAS_INT strideOut ) { + CBLAS_INT relOffset; float ta = a; float tb = b; float c, s; + relOffset = stdlib_strided_stride2offset( 4, strideOut ); + srotg( &ta, &tb, &c, &s ); - Out[ 0 ] = ta; // r - Out[ strideOut ] = tb; // z - Out[ 2 * strideOut ] = c; - Out[ 3 * strideOut ] = s; + Out[ relOffset ] = ta; // r + Out[ relOffset + strideOut ] = tb; // z + Out[ relOffset + ( 2 * strideOut ) ] = c; + Out[ relOffset + ( 3 * strideOut ) ] = s; } /** From aa86dc41dd2fb6ba7652995df5cec8b1963c699f Mon Sep 17 00:00:00 2001 From: DhruvArvindSingh Date: Tue, 6 Jan 2026 20:36:13 +0530 Subject: [PATCH 6/6] fix: manifest.json --- 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: na - task: lint_package_json status: na - task: lint_repl_help status: na - task: lint_javascript_src status: na - task: lint_javascript_cli status: na - task: lint_javascript_examples status: na - task: lint_javascript_tests status: na - task: lint_javascript_benchmarks status: na - task: lint_python status: na - task: lint_r status: na - task: lint_c_src status: na - task: lint_c_examples status: na - task: lint_c_benchmarks status: na - task: lint_c_tests_fixtures status: na - task: lint_shell status: na - task: lint_typescript_declarations status: passed - task: lint_typescript_tests status: na - task: lint_license_headers status: passed --- --- lib/node_modules/@stdlib/blas/base/srotg/manifest.json | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/lib/node_modules/@stdlib/blas/base/srotg/manifest.json b/lib/node_modules/@stdlib/blas/base/srotg/manifest.json index c87fae7dc962..b2eb807fe8a6 100644 --- a/lib/node_modules/@stdlib/blas/base/srotg/manifest.json +++ b/lib/node_modules/@stdlib/blas/base/srotg/manifest.json @@ -49,7 +49,8 @@ "@stdlib/napi/argv", "@stdlib/napi/argv-float", "@stdlib/napi/argv-int64", - "@stdlib/napi/argv-strided-float32array" + "@stdlib/napi/argv-strided-float32array", + "@stdlib/strided/base/stride2offset" ] }, { @@ -187,7 +188,8 @@ "@stdlib/napi/argv", "@stdlib/napi/argv-float", "@stdlib/napi/argv-int64", - "@stdlib/napi/argv-strided-float32array" + "@stdlib/napi/argv-strided-float32array", + "@stdlib/strided/base/stride2offset" ] }, {