diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/README.md b/lib/node_modules/@stdlib/blas/base/cgemv/README.md new file mode 100644 index 000000000000..ade52c326b0b --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/README.md @@ -0,0 +1,295 @@ + + +# cgemv + +> Perform one of the matrix-vector operations `y = α*A*x + β*y` or `y = α*A^T*x + β*y` for complex-valued data. + +
+ +## Usage + +```javascript +var cgemv = require( '@stdlib/blas/base/cgemv' ); +``` + +#### cgemv( order, trans, M, N, α, A, LDA, x, sx, β, y, sy ) + +Performs one of the matrix-vector operations `y = α*A*x + β*y` or `y = α*A^T*x + β*y` where `α` and `β` are complex scalars, `x` and `y` are complex vectors, and `A` is an `M` by `N` complex matrix. + +```javascript +var Complex64Array = require( '@stdlib/array/complex64' ); +var Complex64 = require( '@stdlib/complex/float32/ctor' ); + +var A = new Complex64Array( [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0 ] ); +var x = new Complex64Array( [ 1.0, 0.0, 1.0, 0.0 ] ); +var y = new Complex64Array( [ 1.0, 0.0, 1.0, 0.0 ] ); + +var alpha = new Complex64( 1.0, 0.0 ); +var beta = new Complex64( 1.0, 0.0 ); + +cgemv( 'row-major', 'no-transpose', 2, 2, alpha, A, 2, x, 1, beta, y, 1 ); +// y => [ 4.0, 0.0, 8.0, 0.0 ] +``` + +The function has the following parameters: + +- **order**: storage layout. +- **trans**: specifies whether `A` should be transposed, conjugate-transposed, or not transposed. +- **M**: number of rows in the matrix `A`. +- **N**: number of columns in the matrix `A`. +- **α**: complex scalar constant. +- **A**: input matrix stored in linear memory as a [`Complex64Array`][@stdlib/array/complex64]. +- **LDA**: stride of the first dimension of `A` (a.k.a., leading dimension of the matrix `A`). +- **x**: input [`Complex64Array`][@stdlib/array/complex64]. +- **sx**: stride length for `x`. +- **β**: complex scalar constant. +- **y**: output [`Complex64Array`][@stdlib/array/complex64]. +- **sy**: stride length for `y`. + +The stride parameters determine how elements are accessed. For example, to iterate over every other element in `x` and `y`, + +```javascript +var Complex64Array = require( '@stdlib/array/complex64' ); +var Complex64 = require( '@stdlib/complex/float32/ctor' ); + +var A = new Complex64Array( [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0 ] ); +var x = new Complex64Array( [ 1.0, 0.0, 0.0, 0.0, 1.0, 0.0, 0.0, 0.0 ] ); +var y = new Complex64Array( [ 1.0, 0.0, 0.0, 0.0, 1.0, 0.0, 0.0, 0.0 ] ); + +var alpha = new Complex64( 1.0, 0.0 ); +var beta = new Complex64( 1.0, 0.0 ); + +cgemv( 'row-major', 'no-transpose', 2, 2, alpha, A, 2, x, 2, beta, y, 2 ); +// y => [ 4.0, 0.0, 0.0, 0.0, 8.0, 0.0, 0.0, 0.0 ] +``` + +Note that indexing is relative to the first index. To introduce an offset, use [`typed array`][mdn-typed-array] views. + + + +```javascript +var Complex64Array = require( '@stdlib/array/complex64' ); +var Complex64 = require( '@stdlib/complex/float32/ctor' ); + +// Initial arrays... +var x0 = new Complex64Array( [ 0.0, 0.0, 1.0, 0.0, 1.0, 0.0 ] ); +var y0 = new Complex64Array( [ 0.0, 0.0, 1.0, 0.0, 1.0, 0.0 ] ); +var A = new Complex64Array( [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0, 5.0, 0.0, 6.0, 0.0 ] ); + +var alpha = new Complex64( 1.0, 0.0 ); +var beta = new Complex64( 1.0, 0.0 ); + +// Create offset views... +var x1 = new Complex64Array( x0.buffer, x0.BYTES_PER_ELEMENT*2 ); // start at 2nd complex element +var y1 = new Complex64Array( y0.buffer, y0.BYTES_PER_ELEMENT*2 ); // start at 2nd complex element + +cgemv( 'row-major', 'no-transpose', 2, 2, alpha, A, 2, x1, -1, beta, y1, -1 ); +// y0 => [ 0.0, 0.0, 8.0, 0.0, 4.0, 0.0 ] +``` + + + +#### cgemv.ndarray( trans, M, N, α, A, sa1, sa2, oa, x, sx, ox, β, y, sy, oy ) + +Performs one of the matrix-vector operations `y = α*A*x + β*y` or `y = α*A^T*x + β*y` using alternative indexing semantics and where `α` and `β` are complex scalars, `x` and `y` are complex vectors, and `A` is an `M` by `N` complex matrix. + +```javascript +var Complex64Array = require( '@stdlib/array/complex64' ); +var Complex64 = require( '@stdlib/complex/float32/ctor' ); + +var A = new Complex64Array( [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0, 5.0, 0.0, 6.0, 0.0 ] ); +var x = new Complex64Array( [ 1.0, 0.0, 1.0, 0.0, 1.0, 0.0 ] ); +var y = new Complex64Array( [ 1.0, 0.0, 1.0, 0.0 ] ); + +var alpha = new Complex64( 1.0, 0.0 ); +var beta = new Complex64( 1.0, 0.0 ); + +cgemv.ndarray( 'no-transpose', 2, 3, alpha, A, 3, 1, 0, x, 1, 0, beta, y, 1, 0 ); +// y => [ 7.0, 0.0, 16.0, 0.0 ] +``` + +The function has the following additional parameters: + +- **sa1**: stride of the first dimension of `A`. +- **sa2**: stride of the second dimension of `A`. +- **oa**: starting index for `A`. +- **ox**: starting index for `x`. +- **oy**: starting index for `y`. + +While [`typed array`][mdn-typed-array] views mandate a view offset based on the underlying buffer, the offset parameters support indexing semantics based on starting indices. For example, + +```javascript +var Complex64Array = require( '@stdlib/array/complex64' ); +var Complex64 = require( '@stdlib/complex/float32/ctor' ); + +var A = new Complex64Array( [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0, 5.0, 0.0, 6.0, 0.0 ] ); +var x = new Complex64Array( [ 0.0, 0.0, 1.0, 0.0, 2.0, 0.0, 3.0, 0.0 ] ); +var y = new Complex64Array( [ 7.0, 0.0, 8.0, 0.0, 9.0, 0.0, 10.0, 0.0 ] ); + +var alpha = new Complex64( 1.0, 0.0 ); +var beta = new Complex64( 1.0, 0.0 ); + +cgemv.ndarray( 'no-transpose', 2, 3, alpha, A, 3, 1, 0, x, 1, 1, beta, y, -2, 2 ); +// y => [ 39.0, 0.0, 8.0, 0.0, 23.0, 0.0, 10.0, 0.0 ] +``` + +
+ + + +
+ +## Notes + +- `cgemv()` corresponds to the [BLAS][blas] level 2 function [`cgemv`][cgemv]. + +
+ + + +
+ +## Examples + + + +```javascript +var discreteUniform = require( '@stdlib/random/base/discrete-uniform' ); +var Complex64 = require( '@stdlib/complex/float32/ctor' ); +var filledarrayBy = require( '@stdlib/array/filled-by' ); +var logEach = require( '@stdlib/console/log-each' ); +var cgemv = require( '@stdlib/blas/base/cgemv' ); + +function rand() { + return new Complex64( discreteUniform( 0, 255 ), discreteUniform( -128, 127 ) ); +} + +var M = 3; +var N = 3; + +var A = filledarrayBy( M*N, 'complex64', rand ); +var x = filledarrayBy( N, 'complex64', rand ); +var y = filledarrayBy( M, 'complex64', rand ); + +var alpha = new Complex64( 1.0, 0.0 ); +var beta = new Complex64( 1.0, 0.0 ); + +cgemv( 'row-major', 'no-transpose', M, N, alpha, A, N, x, -1, beta, y, -1 ); +console.log( y ); +``` + +
+ + + + + +* * * + +
+ +## C APIs + + + +
+ +
+ + + + + +
+ +### Usage + +```c +TODO +``` + +#### TODO + +TODO. + +```c +TODO +``` + +TODO + +```c +TODO +``` + +
+ + + + + +
+ +
+ + + + + +
+ +### Examples + +```c +TODO +``` + +
+ + + +
+ + + + + + + + + + + + + + diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/lib/base.js b/lib/node_modules/@stdlib/blas/base/cgemv/lib/base.js new file mode 100644 index 000000000000..57f7353c9d0c --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/lib/base.js @@ -0,0 +1,198 @@ +/** +* @license Apache-2.0 +* +* 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. +* 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 isRowMajor = require( '@stdlib/ndarray/base/assert/is-row-major' ); +var scabs1 = require( '@stdlib/blas/base/scabs1' ); +var cmulf = require( '@stdlib/complex/float32/base/mul' ); +var caddf = require( '@stdlib/complex/float32/base/add' ); +var conjf = require( '@stdlib/complex/float32/conj' ); +var Complex64 = require( '@stdlib/complex/float32/ctor' ); +var cfill = require( '@stdlib/blas/ext/base/cfill' ).ndarray; +var cscal = require( '@stdlib/blas/base/cscal' ).ndarray; + + +// FUNCTIONS // + +/** +* Tests whether a provided string indicates to transpose a matrix. +* +* @private +* @param {string} str - input string +* @returns {boolean} boolean indicating whether to transpose a matrix +* +* @example +* var bool = isTransposed( 'transpose' ); +* // returns true +* +* @example +* var bool = isTransposed( 'conjugate-transpose' ); +* // returns true +* +* @example +* var bool = isTransposed( 'no-transpose' ); +* // returns false +*/ +function isTransposed( str ) { // NOTE: consider moving to a separate helper utility package + return ( str !== 'no-transpose' ); +} + + +// MAIN // + +/** +* Performs one of the matrix-vector operations `y = α*A*x + β*y` or `y = α*A^T*x + β*y`, where `α` and `β` are complex scalars, `x` and `y` are complex vectors, and `A` is an `M` by `N` complex matrix. +* +* @private +* @param {string} trans - specifies whether `A` should be transposed, conjugate-transposed, or not transposed +* @param {NonNegativeInteger} M - number of rows in the matrix `A` +* @param {NonNegativeInteger} N - number of columns in the matrix `A` +* @param {Complex64} alpha - scalar constant +* @param {Complex64Array} A - input matrix +* @param {integer} strideA1 - stride of the first dimension of `A` +* @param {integer} strideA2 - stride of the second dimension of `A` +* @param {NonNegativeInteger} offsetA - starting index for `A` +* @param {Complex64Array} x - first input vector +* @param {integer} strideX - `x` stride length +* @param {NonNegativeInteger} offsetX - starting index for `x` +* @param {Complex64} beta - scalar constant +* @param {Complex64Array} y - second input vector +* @param {integer} strideY - `y` stride length +* @param {NonNegativeInteger} offsetY - starting index for `y` +* @returns {Complex64Array} `y` +* +* @example +* var Complex64Array = require( '@stdlib/array/complex64' ); +* var Complex64 = require( '@stdlib/complex/float32/ctor' ); +* +* var A = new Complex64Array( [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0, 5.0, 0.0, 6.0, 0.0 ] ); +* var x = new Complex64Array( [ 1.0, 0.0, 1.0, 0.0, 1.0, 0.0 ] ); +* var y = new Complex64Array( [ 1.0, 0.0, 1.0, 0.0 ] ); +* var alpha = new Complex64( 1.0, 0.0 ); +* var beta = new Complex64( 1.0, 0.0 ); +* +* cgemv( 'no-transpose', 2, 3, alpha, A, 3, 1, 0, x, 1, 0, beta, y, 1, 0 ); +* // y => [ 7.0, 0.0, 16.0, 0.0 ] +*/ +function cgemv( trans, M, N, alpha, A, strideA1, strideA2, offsetA, x, strideX, offsetX, beta, y, strideY, offsetY ) { // eslint-disable-line max-params, max-len + var isrm; + var xlen; + var ylen; + var tmp; + var da0; + var da1; + var aij; + var ix; + var iy; + var ia; + var i1; + var i0; + + isrm = isRowMajor( [ strideA1, strideA2 ] ); + if ( isTransposed( trans ) ) { + xlen = M; + ylen = N; + } else { + xlen = N; + ylen = M; + } + // y = beta*y + if ( scabs1( beta ) === 0.0 ) { + cfill( ylen, 0.0, y, strideY, offsetY ); + } else if ( scabs1( beta ) !== 1.0 ) { + cscal( ylen, beta, y, strideY, offsetY ); + } + if ( scabs1( alpha ) === 0.0 ) { + return y; + } + // Form: y = α*A*x + y + if ( + ( !isrm && !isTransposed( trans ) ) || + ( isrm && isTransposed( trans ) ) + ) { + if ( isrm ) { + // For row-major matrices, the last dimension has the fastest changing index... + da0 = strideA2; // offset increment for innermost loop + da1 = strideA1 - ( ylen*strideA2 ); // offset increment for outermost loop + } else { // isColMajor + // For column-major matrices, the first dimension has the fastest changing index... + da0 = strideA1; // offset increment for innermost loop + da1 = strideA2 - ( ylen*strideA1 ); // offset increment for outermost loop + } + ia = offsetA; + ix = offsetX; + for ( i1 = 0; i1 < xlen; i1++ ) { + tmp = cmulf( alpha, x.get( ix ) ); + if ( scabs1( tmp ) === 0.0 ) { + ia += da0 * ylen; + } else { + iy = offsetY; + for ( i0 = 0; i0 < ylen; i0++ ) { + aij = A.get( ia ); + if ( trans === 'conjugate-transpose' ) { + aij = conjf( aij ); + } + y.set( caddf( y.get( iy ), cmulf( aij, tmp ) ), iy ); + iy += strideY; + ia += da0; + } + } + ix += strideX; + ia += da1; + } + return y; + } + // Form: y = α*A^T*x + y + + // ( !isrm && isTransposed( trans ) ) || ( isrm && !isTransposed( trans ) ) + if ( isrm ) { + // For row-major matrices, the last dimension has the fastest changing index... + da0 = strideA2; // offset increment for innermost loop + da1 = strideA1 - ( xlen*strideA2 ); // offset increment for outermost loop + } else { // isColMajor + da0 = strideA1; // offset increment for innermost loop + da1 = strideA2 - ( xlen*strideA1 ); // offset increment for outermost loop + } + ia = offsetA; + iy = offsetY; + for ( i1 = 0; i1 < ylen; i1++ ) { + ix = offsetX; + tmp = new Complex64( 0.0, 0.0 ); + for ( i0 = 0; i0 < xlen; i0++ ) { + aij = A.get( ia ); + if ( trans === 'conjugate-transpose' ) { + aij = conjf( aij ); + } + tmp = caddf( tmp, cmulf( aij, x.get( ix ) ) ); + ix += strideX; + ia += da0; + } + y.set( caddf( y.get( iy ), cmulf( alpha, tmp ) ), iy ); + iy += strideY; + ia += da1; + } + return y; +} + + +// EXPORTS // + +module.exports = cgemv; diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/lib/cgemv.js b/lib/node_modules/@stdlib/blas/base/cgemv/lib/cgemv.js new file mode 100644 index 000000000000..3a50d20d197a --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/lib/cgemv.js @@ -0,0 +1,135 @@ +/** +* @license Apache-2.0 +* +* 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. +* 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 isLayout = require( '@stdlib/blas/base/assert/is-layout' ); +var isMatrixTranspose = require( '@stdlib/blas/base/assert/is-transpose-operation' ); +var isColumnMajor = require( '@stdlib/ndarray/base/assert/is-column-major-string' ); +var stride2offset = require( '@stdlib/strided/base/stride2offset' ); +var max = require( '@stdlib/math/base/special/fast/max' ); +var scabs1 = require( '@stdlib/blas/base/scabs1' ); +var format = require( '@stdlib/string/format' ); +var base = require( './base.js' ); + + +// MAIN // + +/** +* Performs one of the matrix-vector operations `y = α*A*x + β*y` or `y = α*A^T*x + β*y`, where `α` and `β` are complex scalars, `x` and `y` are complex vectors, and `A` is an `M` by `N` complex matrix. +* +* @param {string} order - storage layout +* @param {string} trans - specifies whether `A` should be transposed, conjugate-transposed, or not transposed +* @param {NonNegativeInteger} M - number of rows in the matrix `A` +* @param {NonNegativeInteger} N - number of columns in the matrix `A` +* @param {Complex64} alpha - scalar constant +* @param {Complex64Array} A - input matrix +* @param {PositiveInteger} LDA - stride of the first dimension of `A` +* @param {Complex64Array} x - first input vector +* @param {integer} strideX - `x` stride length +* @param {Complex64} beta - scalar constant +* @param {Complex64Array} y - second input vector +* @param {integer} strideY - `y` stride length +* @throws {TypeError} first argument must be a valid order +* @throws {TypeError} second argument must be a valid transpose operation +* @throws {RangeError} third argument must be a nonnegative integer +* @throws {RangeError} fourth argument must be a nonnegative integer +* @throws {RangeError} seventh argument must be a valid stride +* @throws {RangeError} ninth argument must be non-zero +* @throws {RangeError} twelfth argument must be non-zero +* @returns {Complex64Array} `y` +* +* @example +* var Complex64Array = require( '@stdlib/array/complex64' ); +* var Complex64 = require( '@stdlib/complex/float32/ctor' ); +* +* var A = new Complex64Array( [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0, 5.0, 0.0, 6.0, 0.0 ] ); +* var x = new Complex64Array( [ 1.0, 0.0, 1.0, 0.0, 1.0, 0.0 ] ); +* var y = new Complex64Array( [ 1.0, 0.0, 1.0, 0.0 ] ); +* var alpha = new Complex64( 1.0, 0.0 ); +* var beta = new Complex64( 1.0, 0.0 ); +* +* cgemv( 'row-major', 'no-transpose', 2, 3, alpha, A, 3, x, 1, beta, y, 1 ); +* // y => [ 7.0, 0.0, 16.0, 0.0 ] +*/ +function cgemv( order, trans, M, N, alpha, A, LDA, x, strideX, beta, y, strideY ) { // eslint-disable-line max-params, max-len + var iscm; + var vala; + var xlen; + var ylen; + var sa1; + var sa2; + var ox; + var oy; + + if ( !isLayout( order ) ) { + throw new TypeError( format( 'invalid argument. First argument must be a valid order. Value: `%s`.', order ) ); + } + if ( !isMatrixTranspose( trans ) ) { + throw new TypeError( format( 'invalid argument. Second argument must be a valid transpose operation. Value: `%s`.', trans ) ); + } + if ( M < 0 ) { + throw new RangeError( format( 'invalid argument. Third argument must be a nonnegative integer. Value: `%d`.', M ) ); + } + if ( N < 0 ) { + throw new RangeError( format( 'invalid argument. Fourth argument must be a nonnegative integer. Value: `%d`.', N ) ); + } + iscm = isColumnMajor( order ); + if ( iscm ) { + vala = M; + } else { + vala = N; + } + if ( LDA < max( 1, vala ) ) { + throw new RangeError( format( 'invalid argument. Seventh argument must be greater than or equal to max(1,%d). Value: `%d`.', vala, LDA ) ); + } + if ( strideX === 0 ) { + throw new RangeError( format( 'invalid argument. Ninth argument must be non-zero. Value: `%d`.', strideX ) ); + } + if ( strideY === 0 ) { + throw new RangeError( format( 'invalid argument. Twelfth argument must be non-zero. Value: `%d`.', strideY ) ); + } + // Check if we can early return... + if ( M === 0 || N === 0 || ( scabs1( alpha ) === 0.0 && scabs1( beta ) === 1.0 ) ) { // eslint-disable-line max-len + return y; + } + if ( trans === 'no-transpose' ) { + xlen = N; + ylen = M; + } else { + xlen = M; + ylen = N; + } + ox = stride2offset( xlen, strideX ); + oy = stride2offset( ylen, strideY ); + if ( iscm ) { + sa1 = 1; + sa2 = LDA; + } else { // order === 'row-major' + sa1 = LDA; + sa2 = 1; + } + return base( trans, M, N, alpha, A, sa1, sa2, 0, x, strideX, ox, beta, y, strideY, oy ); // eslint-disable-line max-len +} + + +// EXPORTS // + +module.exports = cgemv; diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/lib/index.js b/lib/node_modules/@stdlib/blas/base/cgemv/lib/index.js new file mode 100644 index 000000000000..8b351353ce47 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/lib/index.js @@ -0,0 +1,79 @@ +/** +* @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'; + +/** +* BLAS level 2 routine to perform one of the matrix-vector operations `y = α*A*x + β*y` or `y = α*A^T*x + β*y`, where `α` and `β` are complex scalars, `x` and `y` are complex vectors, and `A` is an `M` by `N` complex matrix. +* +* @module @stdlib/blas/base/cgemv +* +* @example +* var Complex64Array = require( '@stdlib/array/complex64' ); +* var Complex64 = require( '@stdlib/complex/float32/ctor' ); +* var cgemv = require( '@stdlib/blas/base/cgemv' ); +* +* var A = new Complex64Array( [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0, 5.0, 0.0, 6.0, 0.0 ] ); +* var x = new Complex64Array( [ 1.0, 0.0, 1.0, 0.0, 1.0, 0.0 ] ); +* var y = new Complex64Array( [ 1.0, 0.0, 1.0, 0.0 ] ); +* var alpha = new Complex64( 1.0, 0.0 ); +* var beta = new Complex64( 1.0, 0.0 ); +* +* cgemv( 'row-major', 'no-transpose', 2, 3, alpha, A, 3, x, 1, beta, y, 1 ); +* // y => [ 7.0, 0.0, 16.0, 0.0 ] +* +* @example +* var Complex64Array = require( '@stdlib/array/complex64' ); +* var Complex64 = require( '@stdlib/complex/float32/ctor' ); +* var cgemv = require( '@stdlib/blas/base/cgemv' ); +* +* var A = new Complex64Array( [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0, 5.0, 0.0, 6.0, 0.0 ] ); +* var x = new Complex64Array( [ 1.0, 0.0, 1.0, 0.0, 1.0, 0.0 ] ); +* var y = new Complex64Array( [ 1.0, 0.0, 1.0, 0.0 ] ); +* var alpha = new Complex64( 1.0, 0.0 ); +* var beta = new Complex64( 1.0, 0.0 ); +* +* cgemv.ndarray( 'no-transpose', 2, 3, alpha, A, 3, 1, 0, x, 1, 0, beta, y, 1, 0 ); +* // y => [ 7.0, 0.0, 16.0, 0.0 ] +*/ + +// MODULES // + +var join = require( 'path' ).join; +var tryRequire = require( '@stdlib/utils/try-require' ); +var isError = require( '@stdlib/assert/is-error' ); +var main = require( './main.js' ); + + +// MAIN // + +var cgemv; +var tmp = tryRequire( join( __dirname, './native.js' ) ); + +if ( isError( tmp ) ) { + cgemv = main; +} else { + cgemv = tmp; +} + + +// EXPORTS // + +module.exports = cgemv; + +// exports: { "ndarray": "cgemv.ndarray" } diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/lib/main.js b/lib/node_modules/@stdlib/blas/base/cgemv/lib/main.js new file mode 100644 index 000000000000..21143e9f32e7 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/lib/main.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 cgemv = require( './cgemv.js' ); +var ndarray = require( './ndarray.js' ); + + +// MAIN // + +setReadOnly( cgemv, 'ndarray', ndarray ); + + +// EXPORTS // + +module.exports = cgemv; diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/lib/ndarray.js b/lib/node_modules/@stdlib/blas/base/cgemv/lib/ndarray.js new file mode 100644 index 000000000000..85a2bc4927c2 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/lib/ndarray.js @@ -0,0 +1,92 @@ +/** +* @license Apache-2.0 +* +* 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. +* 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 isMatrixTranspose = require( '@stdlib/blas/base/assert/is-transpose-operation' ); +var format = require( '@stdlib/string/format' ); +var base = require( './base.js' ); + +/** +* Performs one of the matrix-vector operations `y = α*A*x + β*y` or `y = α*A^T*x + β*y`, where `α` and `β` are complex scalars, `x` and `y` are complex vectors, and `A` is an `M` by `N` complex matrix. +* +* @param {string} trans - specifies whether `A` should be transposed, conjugate-transposed, or not transposed +* @param {NonNegativeInteger} M - number of rows in the matrix `A` +* @param {NonNegativeInteger} N - number of columns in the matrix `A` +* @param {Complex64} alpha - scalar constant +* @param {Complex64Array} A - input matrix +* @param {integer} strideA1 - stride of the first dimension of `A` +* @param {integer} strideA2 - stride of the second dimension of `A` +* @param {NonNegativeInteger} offsetA - starting index for `A` +* @param {Complex64Array} x - first input vector +* @param {integer} strideX - `x` stride length +* @param {NonNegativeInteger} offsetX - starting index for `x` +* @param {Complex64} beta - scalar constant +* @param {Complex64Array} y - second input vector +* @param {integer} strideY - `y` stride length +* @param {NonNegativeInteger} offsetY - starting index for `y` +* @throws {TypeError} first argument must be a valid transpose operation +* @throws {RangeError} second argument must be a nonnegative integer +* @throws {RangeError} third argument must be a nonnegative integer +* @throws {RangeError} tenth argument must be non-zero +* @throws {RangeError} fourteenth argument must be non-zero +* @returns {Complex64Array} `y` +* +* @example +* var Complex64Array = require( '@stdlib/array/complex64' ); +* var Complex64 = require( '@stdlib/complex/float32/ctor' ); +* +* var A = new Complex64Array( [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0, 5.0, 0.0, 6.0, 0.0 ] ); +* var x = new Complex64Array( [ 1.0, 0.0, 1.0, 0.0, 1.0, 0.0 ] ); +* var y = new Complex64Array( [ 1.0, 0.0, 1.0, 0.0 ] ); +* var alpha = new Complex64( 1.0, 0.0 ); +* var beta = new Complex64( 1.0, 0.0 ); +* +* cgemv( 'no-transpose', 2, 3, alpha, A, 3, 1, 0, x, 1, 0, beta, y, 1, 0 ); +* // y => [ 7.0, 0.0, 16.0, 0.0 ] +*/ +function cgemv(trans, M, N, alpha, A, strideA1, strideA2, offsetA, x, strideX, offsetX, beta, y, strideY, offsetY) { // eslint-disable-line max-params, max-len + if (!isMatrixTranspose(trans)) { + throw new TypeError( format( 'invalid argument. First argument must be a valid transpose operation. Value: `%s`.', trans ) ); + } + if (M < 0) { + throw new RangeError( format( 'invalid argument. Second argument must be a nonnegative integer. Value: `%d`.', M ) ); + } + if (N < 0) { + throw new RangeError( format( 'invalid argument. Third argument must be a nonnegative integer. Value: `%d`.', N ) ); + } + if (strideX === 0) { + throw new RangeError( format( 'invalid argument. Tenth argument must be non-zero. Value: `%d`.', strideX ) ); + } + if (strideY === 0) { + throw new RangeError( format( 'invalid argument. Fourteenth argument must be non-zero. Value: `%d`.', strideY ) ); + } + // Check if we can early return... + if (M === 0 || N === 0) { + return y; + } + + return base( trans, M, N, alpha, A, strideA1, strideA2, offsetA, x, strideX, offsetX, beta, y, strideY, offsetY ); // eslint-disable-line max-len +} + + +// EXPORTS // + +module.exports = cgemv; diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/manifest.json b/lib/node_modules/@stdlib/blas/base/cgemv/manifest.json new file mode 100644 index 000000000000..1dc10c0fab64 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/manifest.json @@ -0,0 +1,43 @@ +{ + "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": [], + "include": [], + "libraries": [], + "libpath": [], + "dependencies": [] + } + ] +} diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/package.json b/lib/node_modules/@stdlib/blas/base/cgemv/package.json new file mode 100644 index 000000000000..351c0f1fcb0f --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/package.json @@ -0,0 +1,72 @@ +{ + "name": "@stdlib/blas/base/cgemv", + "version": "0.0.0", + "description": "Perform one of the complex matrix-vector operations `y = α*A*x + β*y` or `y = α*A^T*x + β*y`.", + "license": "Apache-2.0", + "author": { + "name": "The Stdlib Authors", + "url": "https://github.com/stdlib-js/stdlib/graphs/contributors" + }, + "contributors": [ + { + "name": "The Stdlib Authors", + "url": "https://github.com/stdlib-js/stdlib/graphs/contributors" + } + ], + "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", + "scripts": {}, + "homepage": "https://github.com/stdlib-js/stdlib", + "repository": { + "type": "git", + "url": "git://github.com/stdlib-js/stdlib.git" + }, + "bugs": { + "url": "https://github.com/stdlib-js/stdlib/issues" + }, + "dependencies": {}, + "devDependencies": {}, + "engines": { + "node": ">=0.10.0", + "npm": ">2.7.0" + }, + "os": [ + "aix", + "darwin", + "freebsd", + "linux", + "macos", + "openbsd", + "sunos", + "win32", + "windows" + ], + "keywords": [ + "stdlib", + "stdmath", + "mathematics", + "math", + "blas", + "level 2", + "cgemv", + "linear", + "algebra", + "subroutines", + "array", + "ndarray", + "complex", + "complex64", + "complex64array" + ] +} diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_alpha_zero.json b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_alpha_zero.json new file mode 100644 index 000000000000..a7e2860d643e --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_alpha_zero.json @@ -0,0 +1,20 @@ +{ + "order": "column-major", + "trans": "no-transpose", + "M": 4, + "N": 2, + "alpha": [ 0.0, 0.0 ], + "beta": [ 0.5, 0.0 ], + "lda": 4, + "A": [ 1.0, 0.0, 3.0, 0.0, 5.0, 0.0, 7.0, 0.0, 2.0, 0.0, 4.0, 0.0, 6.0, 0.0, 8.0, 0.0 ], + "x": [ 1.0, 0.0, 2.0, 0.0 ], + "y": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0 ], + "strideA1": 1, + "strideA2": 4, + "offsetA": 0, + "strideX": 1, + "offsetX": 0, + "strideY": 1, + "offsetY": 0, + "y_out": [ 0.5, 0.0, 1.0, 0.0, 1.5, 0.0, 2.0, 0.0 ] +} diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_complex_access_pattern.json b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_complex_access_pattern.json new file mode 100644 index 000000000000..1cbffaba0731 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_complex_access_pattern.json @@ -0,0 +1,18 @@ +{ + "trans": "no-transpose", + "strideA1": -2, + "strideA2": -5, + "offsetA": 14, + "strideX": -1, + "offsetX": 2, + "strideY": -1, + "offsetY": 2, + "M": 3, + "N": 3, + "alpha": [ 0.5, 0.0 ], + "beta": [ 0.5, 0.0 ], + "A": [ 6.0, 0.0, 999.0, 0.0, 0.0, 0.0, 999.0, 0.0, 0.0, 0.0, 5.0, 0.0, 999.0, 0.0, 4.0, 0.0, 999.0, 0.0, 0.0, 0.0, 3.0, 0.0, 999.0, 0.0, 2.0, 0.0, 999.0, 0.0, 1.0, 0.0 ], + "x": [ 3.0, 0.0, 2.0, 0.0, 1.0, 0.0 ], + "y": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0 ], + "y_out": [ 16.0, 0.0, 6.0, 0.0, 2.0, 0.0 ] +} diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_nt.json b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_nt.json new file mode 100644 index 000000000000..de5e27c57665 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_nt.json @@ -0,0 +1,20 @@ +{ + "order": "column-major", + "trans": "no-transpose", + "M": 4, + "N": 2, + "alpha": [ 0.5, 0.0 ], + "beta": [ 0.5, 0.0 ], + "lda": 4, + "A": [ 1.0, 0.0, 3.0, 0.0, 5.0, 0.0, 7.0, 0.0, 2.0, 0.0, 4.0, 0.0, 6.0, 0.0, 8.0, 0.0 ], + "x": [ 1.0, 0.0, 2.0, 0.0 ], + "y": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0 ], + "strideA1": 1, + "strideA2": 4, + "offsetA": 0, + "strideX": 1, + "offsetX": 0, + "strideY": 1, + "offsetY": 0, + "y_out": [ 3.0, 0.0, 6.5, 0.0, 10.0, 0.0, 13.5, 0.0 ] +} diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_oa.json b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_oa.json new file mode 100644 index 000000000000..03991309644c --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_oa.json @@ -0,0 +1,18 @@ +{ + "trans": "no-transpose", + "M": 3, + "N": 2, + "alpha": [ 0.5, 0.0 ], + "beta": [ 0.5, 0.0 ], + "A": [ 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 1.0, 0.0, 999.0, 0.0, 3.0, 0.0, 999.0, 0.0, 5.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 2.0, 0.0, 999.0, 0.0, 4.0, 0.0, 999.0, 0.0, 6.0, 0.0 ], + "x": [ 1.0, 0.0, 2.0, 0.0 ], + "y": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0 ], + "strideA1": 2, + "strideA2": 10, + "offsetA": 5, + "strideX": 1, + "offsetX": 0, + "strideY": 1, + "offsetY": 0, + "y_out": [ 3.0, 0.0, 6.5, 0.0, 10.0, 0.0 ] +} diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_sa1_sa2.json b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_sa1_sa2.json new file mode 100644 index 000000000000..1bf9c87bd9d6 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_sa1_sa2.json @@ -0,0 +1,18 @@ +{ + "trans": "no-transpose", + "M": 3, + "N": 2, + "alpha": [ 0.5, 0.0 ], + "beta": [ 0.5, 0.0 ], + "A": [ 1.0, 0.0, 999.0, 0.0, 3.0, 0.0, 999.0, 0.0, 5.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 2.0, 0.0, 999.0, 0.0, 4.0, 0.0, 999.0, 0.0, 6.0, 0.0 ], + "x": [ 1.0, 0.0, 2.0, 0.0 ], + "y": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0 ], + "strideA1": 2, + "strideA2": 10, + "offsetA": 0, + "strideX": 1, + "offsetX": 0, + "strideY": 1, + "offsetY": 0, + "y_out": [ 3.0, 0.0, 6.5, 0.0, 10.0, 0.0 ] +} diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_sa1_sa2n.json b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_sa1_sa2n.json new file mode 100644 index 000000000000..d65389232af8 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_sa1_sa2n.json @@ -0,0 +1,18 @@ +{ + "trans": "no-transpose", + "M": 3, + "N": 2, + "alpha": [ 0.5, 0.0 ], + "beta": [ 0.5, 0.0 ], + "A": [ 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 2.0, 0.0, 999.0, 0.0, 4.0, 0.0, 999.0, 0.0, 6.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 1.0, 0.0, 999.0, 0.0, 3.0, 0.0, 999.0, 0.0, 5.0, 0.0 ], + "x": [ 1.0, 0.0, 2.0, 0.0 ], + "y": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0 ], + "strideA1": 2, + "strideA2": -10, + "offsetA": 15, + "strideX": 1, + "offsetX": 0, + "strideY": 1, + "offsetY": 0, + "y_out": [ 3.0, 0.0, 6.5, 0.0, 10.0, 0.0 ] +} diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_sa1n_sa2.json b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_sa1n_sa2.json new file mode 100644 index 000000000000..8867bcdedf32 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_sa1n_sa2.json @@ -0,0 +1,18 @@ +{ + "trans": "no-transpose", + "M": 3, + "N": 2, + "alpha": [ 0.5, 0.0 ], + "beta": [ 0.5, 0.0 ], + "A": [ 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 5.0, 0.0, 999.0, 0.0, 3.0, 0.0, 999.0, 0.0, 1.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 6.0, 0.0, 999.0, 0.0, 4.0, 0.0, 999.0, 0.0, 2.0, 0.0 ], + "x": [ 1.0, 0.0, 2.0, 0.0 ], + "y": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0 ], + "strideA1": -2, + "strideA2": 10, + "offsetA": 9, + "strideX": 1, + "offsetX": 0, + "strideY": 1, + "offsetY": 0, + "y_out": [ 3.0, 0.0, 6.5, 0.0, 10.0, 0.0 ] +} diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_sa1n_sa2n.json b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_sa1n_sa2n.json new file mode 100644 index 000000000000..03866eff146a --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_sa1n_sa2n.json @@ -0,0 +1,18 @@ +{ + "trans": "no-transpose", + "M": 3, + "N": 2, + "alpha": [ 0.5, 0.0 ], + "beta": [ 0.5, 0.0 ], + "A": [ 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 6.0, 0.0, 999.0, 0.0, 4.0, 0.0, 999.0, 0.0, 2.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 5.0, 0.0, 999.0, 0.0, 3.0, 0.0, 999.0, 0.0, 1.0, 0.0 ], + "x": [ 1.0, 0.0, 2.0, 0.0 ], + "y": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0 ], + "strideA1": -2, + "strideA2": -10, + "offsetA": 19, + "strideX": 1, + "offsetX": 0, + "strideY": 1, + "offsetY": 0, + "y_out": [ 3.0, 0.0, 6.5, 0.0, 10.0, 0.0 ] +} diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_t.json b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_t.json new file mode 100644 index 000000000000..a0f71dfaec5c --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_t.json @@ -0,0 +1,20 @@ +{ + "order": "column-major", + "trans": "transpose", + "M": 4, + "N": 2, + "alpha": [ 0.5, 0.0 ], + "beta": [ 0.5, 0.0 ], + "lda": 4, + "A": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0, 5.0, 0.0, 6.0, 0.0, 7.0, 0.0, 8.0, 0.0 ], + "x": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0 ], + "y": [ 1.0, 0.0, 2.0, 0.0 ], + "strideA1": 1, + "strideA2": 4, + "offsetA": 0, + "strideX": 1, + "offsetX": 0, + "strideY": 1, + "offsetY": 0, + "y_out": [ 15.5, 0.0, 36.0, 0.0 ] +} diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_x_zeros.json b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_x_zeros.json new file mode 100644 index 000000000000..0f08147742e3 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_x_zeros.json @@ -0,0 +1,20 @@ +{ + "order": "column-major", + "trans": "no-transpose", + "M": 4, + "N": 2, + "alpha": [ 0.5, 0.0 ], + "beta": [ 0.5, 0.0 ], + "lda": 4, + "A": [ 1.0, 0.0, 3.0, 0.0, 5.0, 0.0, 7.0, 0.0, 2.0, 0.0, 4.0, 0.0, 6.0, 0.0, 8.0, 0.0 ], + "x": [ 0.0, 0.0, 0.0, 0.0 ], + "y": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0 ], + "strideA1": 1, + "strideA2": 4, + "offsetA": 0, + "strideX": 1, + "offsetX": 0, + "strideY": 1, + "offsetY": 0, + "y_out": [ 0.5, 0.0, 1.0, 0.0, 1.5, 0.0, 2.0, 0.0 ] +} diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_x_zeros_beta_one.json b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_x_zeros_beta_one.json new file mode 100644 index 000000000000..cc1924a6f1fa --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_x_zeros_beta_one.json @@ -0,0 +1,20 @@ +{ + "order": "column-major", + "trans": "no-transpose", + "M": 4, + "N": 2, + "alpha": [ 0.5, 0.0 ], + "beta": [ 1.0, 0.0 ], + "lda": 4, + "A": [ 1.0, 0.0, 3.0, 0.0, 5.0, 0.0, 7.0, 0.0, 2.0, 0.0, 4.0, 0.0, 6.0, 0.0, 8.0, 0.0 ], + "x": [ 0.0, 0.0, 0.0, 0.0 ], + "y": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0 ], + "strideA1": 1, + "strideA2": 4, + "offsetA": 0, + "strideX": 1, + "offsetX": 0, + "strideY": 1, + "offsetY": 0, + "y_out": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0 ] +} diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_xnyn.json b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_xnyn.json new file mode 100644 index 000000000000..8348002575c9 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_xnyn.json @@ -0,0 +1,20 @@ +{ + "order": "column-major", + "trans": "no-transpose", + "M": 4, + "N": 2, + "alpha": [ 0.5, 0.0 ], + "beta": [ 0.5, 0.0 ], + "lda": 4, + "A": [ 1.0, 0.0, 3.0, 0.0, 5.0, 0.0, 7.0, 0.0, 2.0, 0.0, 4.0, 0.0, 6.0, 0.0, 8.0, 0.0 ], + "x": [ 2.0, 0.0, 1.0, 0.0 ], + "y": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0 ], + "strideA1": 1, + "strideA2": 4, + "offsetA": 0, + "strideX": -1, + "offsetX": 1, + "strideY": -1, + "offsetY": 3, + "y_out": [ 12.0, 0.0, 9.5, 0.0, 7.0, 0.0, 4.5, 0.0 ] +} diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_xnyp.json b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_xnyp.json new file mode 100644 index 000000000000..025e0b632ead --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_xnyp.json @@ -0,0 +1,20 @@ +{ + "order": "column-major", + "trans": "no-transpose", + "M": 4, + "N": 2, + "alpha": [ 0.5, 0.0 ], + "beta": [ 0.5, 0.0 ], + "lda": 4, + "A": [ 1.0, 0.0, 3.0, 0.0, 5.0, 0.0, 7.0, 0.0, 2.0, 0.0, 4.0, 0.0, 6.0, 0.0, 8.0, 0.0 ], + "x": [ 2.0, 0.0, 1.0, 0.0 ], + "y": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0 ], + "strideA1": 1, + "strideA2": 4, + "offsetA": 0, + "strideX": -1, + "offsetX": 1, + "strideY": 1, + "offsetY": 0, + "y_out": [ 3.0, 0.0, 6.5, 0.0, 10.0, 0.0, 13.5, 0.0 ] +} diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_xpyn.json b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_xpyn.json new file mode 100644 index 000000000000..628549b76503 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_xpyn.json @@ -0,0 +1,20 @@ +{ + "order": "column-major", + "trans": "no-transpose", + "M": 4, + "N": 2, + "alpha": [ 0.5, 0.0 ], + "beta": [ 0.5, 0.0 ], + "lda": 4, + "A": [ 1.0, 0.0, 3.0, 0.0, 5.0, 0.0, 7.0, 0.0, 2.0, 0.0, 4.0, 0.0, 6.0, 0.0, 8.0, 0.0 ], + "x": [ 2.0, 0.0, 1.0, 0.0 ], + "y": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0 ], + "strideA1": 1, + "strideA2": 4, + "offsetA": 0, + "strideX": 1, + "offsetX": 0, + "strideY": -1, + "offsetY": 3, + "y_out": [ 11.5, 0.0, 9.0, 0.0, 6.5, 0.0, 4.0, 0.0 ] +} diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_xpyp.json b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_xpyp.json new file mode 100644 index 000000000000..aff255579744 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/column_major_xpyp.json @@ -0,0 +1,20 @@ +{ + "order": "column-major", + "trans": "no-transpose", + "M": 4, + "N": 2, + "alpha": [ 0.5, 0.0 ], + "beta": [ 0.5, 0.0 ], + "lda": 4, + "A": [ 1.0, 0.0, 3.0, 0.0, 5.0, 0.0, 7.0, 0.0, 2.0, 0.0, 4.0, 0.0, 6.0, 0.0, 8.0, 0.0 ], + "x": [ 2.0, 0.0, 1.0, 0.0 ], + "y": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0 ], + "strideA1": 1, + "strideA2": 4, + "offsetA": 0, + "strideX": 1, + "offsetX": 0, + "strideY": 1, + "offsetY": 0, + "y_out": [ 2.5, 0.0, 6.0, 0.0, 9.5, 0.0, 13.0, 0.0 ] +} diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_alpha_zero.json b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_alpha_zero.json new file mode 100644 index 000000000000..84935d9abe2c --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_alpha_zero.json @@ -0,0 +1,20 @@ +{ + "order": "row-major", + "trans": "no-transpose", + "M": 4, + "N": 2, + "alpha": [ 0.0, 0.0 ], + "beta": [ 0.5, 0.0 ], + "lda": 2, + "A": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0, 5.0, 0.0, 6.0, 0.0, 7.0, 0.0, 8.0, 0.0 ], + "x": [ 1.0, 0.0, 2.0, 0.0 ], + "y": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0 ], + "strideA1": 2, + "strideA2": 1, + "offsetA": 0, + "strideX": 1, + "offsetX": 0, + "strideY": 1, + "offsetY": 0, + "y_out": [ 0.5, 0.0, 1.0, 0.0, 1.5, 0.0, 2.0, 0.0 ] +} diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_complex_access_pattern.json b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_complex_access_pattern.json new file mode 100644 index 000000000000..12d55991302a --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_complex_access_pattern.json @@ -0,0 +1,18 @@ +{ + "trans": "no-transpose", + "strideA1": -6, + "strideA2": -1, + "offsetA": 14, + "strideX": -1, + "offsetX": 2, + "strideY": -1, + "offsetY": 2, + "alpha": [ 0.5, 0.0 ], + "beta": [ 0.5, 0.0 ], + "M": 3, + "N": 3, + "A": [ 6.0, 0.0, 5.0, 0.0, 3.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 0.0, 0.0, 4.0, 0.0, 2.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 0.0, 0.0, 0.0, 0.0, 1.0, 0.0 ], + "x": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0 ], + "y": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0 ], + "y_out": [ 13.0, 0.0, 8.0, 0.0, 3.0, 0.0 ] +} diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_nt.json b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_nt.json new file mode 100644 index 000000000000..737915d3911b --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_nt.json @@ -0,0 +1,20 @@ +{ + "order": "row-major", + "trans": "no-transpose", + "M": 4, + "N": 2, + "alpha": [ 0.5, 0.0 ], + "beta": [ 0.5, 0.0 ], + "lda": 2, + "A": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0, 5.0, 0.0, 6.0, 0.0, 7.0, 0.0, 8.0, 0.0 ], + "x": [ 1.0, 0.0, 2.0, 0.0 ], + "y": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0 ], + "strideA1": 2, + "strideA2": 1, + "offsetA": 0, + "strideX": 1, + "offsetX": 0, + "strideY": 1, + "offsetY": 0, + "y_out": [ 3.0, 0.0, 6.5, 0.0, 10.0, 0.0, 13.5, 0.0 ] +} diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_oa.json b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_oa.json new file mode 100644 index 000000000000..30f73882888e --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_oa.json @@ -0,0 +1,18 @@ +{ + "trans": "no-transpose", + "M": 3, + "N": 2, + "alpha": [ 0.5, 0.0 ], + "beta": [ 0.5, 0.0 ], + "A": [ 999.0, 0.0, 1.0, 0.0, 999.0, 0.0, 2.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 3.0, 0.0, 999.0, 0.0, 4.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 5.0, 0.0, 999.0, 0.0, 6.0, 0.0, 999.0, 0.0 ], + "x": [ 1.0, 0.0, 2.0, 0.0 ], + "y": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0 ], + "strideA1": 10, + "strideA2": 2, + "offsetA": 1, + "strideX": 1, + "offsetX": 0, + "strideY": 1, + "offsetY": 0, + "y_out": [ 3.0, 0.0, 6.5, 0.0, 10.0, 0.0 ] +} diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_sa1_sa2.json b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_sa1_sa2.json new file mode 100644 index 000000000000..aeda497999c9 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_sa1_sa2.json @@ -0,0 +1,18 @@ +{ + "trans": "no-transpose", + "M": 3, + "N": 2, + "alpha": [ 0.5, 0.0 ], + "beta": [ 0.5, 0.0 ], + "A": [ 1.0, 0.0, 999.0, 0.0, 2.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 3.0, 0.0, 999.0, 0.0, 4.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 5.0, 0.0, 999.0, 0.0, 6.0, 0.0, 999.0, 0.0 ], + "x": [ 1.0, 0.0, 2.0, 0.0 ], + "y": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0 ], + "strideA1": 8, + "strideA2": 2, + "offsetA": 0, + "strideX": 1, + "offsetX": 0, + "strideY": 1, + "offsetY": 0, + "y_out": [ 3.0, 0.0, 6.5, 0.0, 10.0, 0.0 ] +} diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_sa1_sa2n.json b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_sa1_sa2n.json new file mode 100644 index 000000000000..e0530ace7b3b --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_sa1_sa2n.json @@ -0,0 +1,18 @@ +{ + "trans": "no-transpose", + "M": 3, + "N": 2, + "alpha": [ 0.5, 0.0 ], + "beta": [ 0.5, 0.0 ], + "A": [ 999.0, 0.0, 2.0, 0.0, 999.0, 0.0, 1.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 4.0, 0.0, 999.0, 0.0, 3.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 6.0, 0.0, 999.0, 0.0, 5.0, 0.0, 999.0, 0.0 ], + "x": [ 1.0, 0.0, 2.0, 0.0 ], + "y": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0 ], + "strideA1": 10, + "strideA2": -2, + "offsetA": 3, + "strideX": 1, + "offsetX": 0, + "strideY": 1, + "offsetY": 0, + "y_out": [ 3.0, 0.0, 6.5, 0.0, 10.0, 0.0 ] +} diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_sa1n_sa2.json b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_sa1n_sa2.json new file mode 100644 index 000000000000..7c4da0481324 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_sa1n_sa2.json @@ -0,0 +1,18 @@ +{ + "trans": "no-transpose", + "M": 3, + "N": 2, + "alpha": [ 0.5, 0.0 ], + "beta": [ 0.5, 0.0 ], + "A": [ 999.0, 0.0, 5.0, 0.0, 999.0, 0.0, 6.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 3.0, 0.0, 999.0, 0.0, 4.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 1.0, 0.0, 999.0, 0.0, 2.0, 0.0, 999.0, 0.0 ], + "x": [ 1.0, 0.0, 2.0, 0.0 ], + "y": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0 ], + "strideA1": -10, + "strideA2": 2, + "offsetA": 21, + "strideX": 1, + "offsetX": 0, + "strideY": 1, + "offsetY": 0, + "y_out": [ 3.0, 0.0, 6.5, 0.0, 10.0, 0.0 ] +} diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_sa1n_sa2n.json b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_sa1n_sa2n.json new file mode 100644 index 000000000000..0cf4269aa9eb --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_sa1n_sa2n.json @@ -0,0 +1,18 @@ +{ + "trans": "no-transpose", + "M": 3, + "N": 2, + "alpha": [ 0.5, 0.0 ], + "beta": [ 0.5, 0.0 ], + "A": [ 999.0, 0.0, 6.0, 0.0, 999.0, 0.0, 5.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 4.0, 0.0, 999.0, 0.0, 3.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 999.0, 0.0, 2.0, 0.0, 999.0, 0.0, 1.0, 0.0, 999.0, 0.0 ], + "x": [ 1.0, 0.0, 2.0, 0.0 ], + "y": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0 ], + "strideA1": -10, + "strideA2": -2, + "offsetA": 23, + "strideX": 1, + "offsetX": 0, + "strideY": 1, + "offsetY": 0, + "y_out": [ 3.0, 0.0, 6.5, 0.0, 10.0, 0.0 ] +} diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_t.json b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_t.json new file mode 100644 index 000000000000..d3e76ba30bbb --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_t.json @@ -0,0 +1,20 @@ +{ + "order": "row-major", + "trans": "transpose", + "M": 4, + "N": 2, + "alpha": [ 0.5, 0.0 ], + "beta": [ 0.5, 0.0 ], + "lda": 2, + "A": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0, 5.0, 0.0, 6.0, 0.0, 7.0, 0.0, 8.0, 0.0 ], + "x": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0 ], + "y": [ 1.0, 0.0, 2.0, 0.0 ], + "strideA1": 2, + "strideA2": 1, + "offsetA": 0, + "strideX": 1, + "offsetX": 0, + "strideY": 1, + "offsetY": 0, + "y_out": [ 25.5, 0.0, 31.0, 0.0 ] +} diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_x_zeros.json b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_x_zeros.json new file mode 100644 index 000000000000..2a8a60073252 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_x_zeros.json @@ -0,0 +1,20 @@ +{ + "order": "row-major", + "trans": "no-transpose", + "M": 4, + "N": 2, + "alpha": [ 0.5, 0.0 ], + "beta": [ 0.5, 0.0 ], + "lda": 2, + "A": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0, 5.0, 0.0, 6.0, 0.0, 7.0, 0.0, 8.0, 0.0 ], + "x": [ 0.0, 0.0, 0.0, 0.0 ], + "y": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0 ], + "strideA1": 2, + "strideA2": 1, + "offsetA": 0, + "strideX": 1, + "offsetX": 0, + "strideY": 1, + "offsetY": 0, + "y_out": [ 0.5, 0.0, 1.0, 0.0, 1.5, 0.0, 2.0, 0.0 ] +} diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_x_zeros_beta_one.json b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_x_zeros_beta_one.json new file mode 100644 index 000000000000..d7dcf43f82c7 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_x_zeros_beta_one.json @@ -0,0 +1,20 @@ +{ + "order": "row-major", + "trans": "no-transpose", + "M": 4, + "N": 2, + "alpha": [ 0.5, 0.0 ], + "beta": [ 1.0, 0.0 ], + "lda": 2, + "A": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0, 5.0, 0.0, 6.0, 0.0, 7.0, 0.0, 8.0, 0.0 ], + "x": [ 0.0, 0.0, 0.0, 0.0 ], + "y": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0 ], + "strideA1": 2, + "strideA2": 1, + "offsetA": 0, + "strideX": 1, + "offsetX": 0, + "strideY": 1, + "offsetY": 0, + "y_out": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0 ] +} diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_xnyn.json b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_xnyn.json new file mode 100644 index 000000000000..0d84f3dbff5a --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_xnyn.json @@ -0,0 +1,20 @@ +{ + "order": "row-major", + "trans": "no-transpose", + "M": 4, + "N": 2, + "alpha": [ 0.5, 0.0 ], + "beta": [ 0.5, 0.0 ], + "lda": 2, + "A": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0, 5.0, 0.0, 6.0, 0.0, 7.0, 0.0, 8.0, 0.0 ], + "x": [ 2.0, 0.0, 1.0, 0.0 ], + "y": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0 ], + "strideA1": 2, + "strideA2": 1, + "offsetA": 0, + "strideX": -1, + "offsetX": 1, + "strideY": -1, + "offsetY": 3, + "y_out": [ 12.0, 0.0, 9.5, 0.0, 7.0, 0.0, 4.5, 0.0 ] +} diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_xnyp.json b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_xnyp.json new file mode 100644 index 000000000000..e92f7770f8fb --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_xnyp.json @@ -0,0 +1,20 @@ +{ + "order": "row-major", + "trans": "no-transpose", + "M": 4, + "N": 2, + "alpha": [ 0.5, 0.0 ], + "beta": [ 0.5, 0.0 ], + "lda": 2, + "A": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0, 5.0, 0.0, 6.0, 0.0, 7.0, 0.0, 8.0, 0.0 ], + "x": [ 2.0, 0.0, 1.0, 0.0 ], + "y": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0 ], + "strideA1": 2, + "strideA2": 1, + "offsetA": 0, + "strideX": -1, + "offsetX": 1, + "strideY": 1, + "offsetY": 0, + "y_out": [ 3.0, 0.0, 6.5, 0.0, 10.0, 0.0, 13.5, 0.0 ] +} diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_xpyn.json b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_xpyn.json new file mode 100644 index 000000000000..a2d9d610b45b --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_xpyn.json @@ -0,0 +1,20 @@ +{ + "order": "row-major", + "trans": "no-transpose", + "M": 4, + "N": 2, + "alpha": [ 0.5, 0.0 ], + "beta": [ 0.5, 0.0 ], + "lda": 2, + "A": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0, 5.0, 0.0, 6.0, 0.0, 7.0, 0.0, 8.0, 0.0 ], + "x": [ 2.0, 0.0, 1.0, 0.0 ], + "y": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0 ], + "strideA1": 2, + "strideA2": 1, + "offsetA": 0, + "strideX": 1, + "offsetX": 0, + "strideY": -1, + "offsetY": 3, + "y_out": [ 11.5, 0.0, 9.0, 0.0, 6.5, 0.0, 4.0, 0.0 ] +} diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_xpyp.json b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_xpyp.json new file mode 100644 index 000000000000..ee1d0e1d0ec2 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/test/fixtures/row_major_xpyp.json @@ -0,0 +1,20 @@ +{ + "order": "row-major", + "trans": "no-transpose", + "M": 4, + "N": 2, + "alpha": [ 0.5, 0.0 ], + "beta": [ 0.5, 0.0 ], + "lda": 2, + "A": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0, 5.0, 0.0, 6.0, 0.0, 7.0, 0.0, 8.0, 0.0 ], + "x": [ 2.0, 0.0, 1.0, 0.0 ], + "y": [ 1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0 ], + "strideA1": 2, + "strideA2": 1, + "offsetA": 0, + "strideX": 1, + "offsetX": 0, + "strideY": 1, + "offsetY": 0, + "y_out": [ 2.5, 0.0, 6.0, 0.0, 9.5, 0.0, 13.0, 0.0 ] +} diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/test/test.cgemv.js b/lib/node_modules/@stdlib/blas/base/cgemv/test/test.cgemv.js new file mode 100644 index 000000000000..c66efbd77f6d --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/test/test.cgemv.js @@ -0,0 +1,886 @@ +/** +* @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. +*/ + +/* eslint-disable max-len */ + +'use strict'; + +// MODULES // + +var tape = require( 'tape' ); +var isSameComplex64Array = require( '@stdlib/assert/is-same-complex64array' ); +var Complex64Array = require( '@stdlib/array/complex64' ); +var Complex64 = require( '@stdlib/complex/float32/ctor' ); +var cgemv = require( './../lib/cgemv.js' ); + + +// FIXTURES // + +var cnt = require( './fixtures/column_major_nt.json' ); +var ct = require( './fixtures/column_major_t.json' ); +var cxnyn = require( './fixtures/column_major_xnyn.json' ); +var cxpyn = require( './fixtures/column_major_xpyn.json' ); +var cxnyp = require( './fixtures/column_major_xnyp.json' ); +var cxpyp = require( './fixtures/column_major_xpyp.json' ); +var cx = require( './fixtures/column_major_x_zeros.json' ); +var cxb = require( './fixtures/column_major_x_zeros_beta_one.json' ); +var ca = require( './fixtures/column_major_alpha_zero.json' ); +var rnt = require( './fixtures/row_major_nt.json' ); +var rt = require( './fixtures/row_major_t.json' ); +var rxnyn = require( './fixtures/row_major_xnyn.json' ); +var rxpyn = require( './fixtures/row_major_xpyn.json' ); +var rxnyp = require( './fixtures/row_major_xnyp.json' ); +var rxpyp = require( './fixtures/row_major_xpyp.json' ); +var rx = require( './fixtures/row_major_x_zeros.json' ); +var rxb = require( './fixtures/row_major_x_zeros_beta_one.json' ); +var ra = require( './fixtures/row_major_alpha_zero.json' ); + + +// TESTS // + +tape( 'main export is a function', function test( t ) { + t.ok( true, __filename ); + t.strictEqual( typeof cgemv, 'function', 'main export is a function' ); + t.end(); +}); + +tape( 'the function has an arity of 12', function test( t ) { + t.strictEqual( cgemv.length, 12, 'returns expected value' ); + t.end(); +}); + +tape( 'the function throws an error if provided an invalid first argument', function test( t ) { + var values; + var data; + var i; + + data = rnt; + + values = [ + 'foo', + 'bar', + 'beep', + 'boop' + ]; + + for ( i = 0; i < values.length; i++ ) { + t.throws( badValue( values[ i ] ), TypeError, 'throws an error when provided ' + values[ i ] ); + } + t.end(); + + function badValue( value ) { + return function badValue() { + cgemv( value, data.trans, data.M, data.N, new Complex64( data.alpha[0], data.alpha[1] ), new Complex64Array( data.A ), data.lda, new Complex64Array( data.x ), data.strideX, new Complex64( data.beta[0], data.beta[1] ), new Complex64Array( data.y ), data.strideY ); + }; + } +}); + +tape( 'the function throws an error if provided an invalid second argument', function test( t ) { + var values; + var data; + var i; + + data = rnt; + + values = [ + 'foo', + 'bar', + 'beep', + 'boop' + ]; + + for ( i = 0; i < values.length; i++ ) { + t.throws( badValue( values[ i ] ), TypeError, 'throws an error when provided ' + values[ i ] ); + } + t.end(); + + function badValue( value ) { + return function badValue() { + cgemv( data.order, value, data.M, data.N, new Complex64( data.alpha[0], data.alpha[1] ), new Complex64Array( data.A ), data.lda, new Complex64Array( data.x ), data.strideX, new Complex64( data.beta[0], data.beta[1] ), new Complex64Array( data.y ), data.strideY ); + }; + } +}); + +tape( 'the function throws an error if provided an invalid third argument', function test( t ) { + var values; + var data; + var i; + + data = rnt; + + values = [ + -1, + -2, + -3 + ]; + + for ( i = 0; i < values.length; i++ ) { + t.throws( badValue( values[ i ] ), RangeError, 'throws an error when provided ' + values[ i ] ); + } + t.end(); + + function badValue( value ) { + return function badValue() { + cgemv( data.order, data.trans, value, data.N, new Complex64( data.alpha[0], data.alpha[1] ), new Complex64Array( data.A ), data.lda, new Complex64Array( data.x ), data.strideX, new Complex64( data.beta[0], data.beta[1] ), new Complex64Array( data.y ), data.strideY ); + }; + } +}); + +tape( 'the function throws an error if provided an invalid fourth argument', function test( t ) { + var values; + var data; + var i; + + data = rnt; + + values = [ + -1, + -2, + -3 + ]; + + for ( i = 0; i < values.length; i++ ) { + t.throws( badValue( values[ i ] ), RangeError, 'throws an error when provided ' + values[ i ] ); + } + t.end(); + + function badValue( value ) { + return function badValue() { + cgemv( data.order, data.trans, data.M, value, new Complex64( data.alpha[0], data.alpha[1] ), new Complex64Array( data.A ), data.lda, new Complex64Array( data.x ), data.strideX, new Complex64( data.beta[0], data.beta[1] ), new Complex64Array( data.y ), data.strideY ); + }; + } +}); + +tape( 'the function throws an error if provided an invalid seventh argument', function test( t ) { + var values; + var data; + var i; + + data = rnt; + + values = [ + 0, + -1, + -2, + -3 + ]; + + for ( i = 0; i < values.length; i++ ) { + t.throws( badValue( values[ i ] ), RangeError, 'throws an error when provided ' + values[ i ] ); + } + t.end(); + + function badValue( value ) { + return function badValue() { + cgemv( data.order, data.trans, data.M, data.N, new Complex64( data.alpha[0], data.alpha[1] ), new Complex64Array( data.A ), value, new Complex64Array( data.x ), data.strideX, new Complex64( data.beta[0], data.beta[1] ), new Complex64Array( data.y ), data.strideY ); + }; + } +}); + +tape( 'the function throws an error if provided an invalid ninth argument', function test( t ) { + var values; + var data; + var i; + + data = rnt; + + values = [ + 0 + ]; + + for ( i = 0; i < values.length; i++ ) { + t.throws( badValue( values[ i ] ), RangeError, 'throws an error when provided ' + values[ i ] ); + } + t.end(); + + function badValue( value ) { + return function badValue() { + cgemv( data.order, data.trans, data.M, data.N, new Complex64( data.alpha[0], data.alpha[1] ), new Complex64Array( data.A ), data.lda, new Complex64Array( data.x ), value, new Complex64( data.beta[0], data.beta[1] ), new Complex64Array( data.y ), data.strideY ); + }; + } +}); + +tape( 'the function throws an error if provided an invalid twelfth argument', function test( t ) { + var values; + var data; + var i; + + data = rnt; + + values = [ + 0 + ]; + + for ( i = 0; i < values.length; i++ ) { + t.throws( badValue( values[ i ] ), RangeError, 'throws an error when provided ' + values[ i ] ); + } + t.end(); + + function badValue( value ) { + return function badValue() { + cgemv( data.order, data.trans, data.M, data.N, new Complex64( data.alpha[0], data.alpha[1] ), new Complex64Array( data.A ), data.lda, new Complex64Array( data.x ), data.strideX, new Complex64( data.beta[0], data.beta[1] ), new Complex64Array( data.y ), value ); + }; + } +}); + +tape( 'the function performs one of the matrix-vector operations `y = α*A*x + β*y` or `y = α*A^T*x + β*y` (row-major, no-transpose)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = rnt; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.order, data.trans, data.M, data.N, alpha, a, data.lda, x, data.strideX, beta, y, data.strideY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'the function performs one of the matrix-vector operations `y = α*A*x + β*y` or `y = α*A^T*x + β*y` (column-major, no-transpose)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = cnt; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.order, data.trans, data.M, data.N, alpha, a, data.lda, x, data.strideX, beta, y, data.strideY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'the function performs one of the matrix-vector operations `y = α*A*x + β*y` or `y = α*A^T*x + β*y` (row-major, transpose)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = rt; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.order, data.trans, data.M, data.N, alpha, a, data.lda, x, data.strideX, beta, y, data.strideY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'the function performs one of the matrix-vector operations `y = α*A*x + β*y` or `y = α*A^T*x + β*y` (column-major, transpose)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = ct; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.order, data.trans, data.M, data.N, alpha, a, data.lda, x, data.strideX, beta, y, data.strideY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'the function returns a reference to the second input vector (column-major)', function test( t ) { + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = ct; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + out = cgemv( data.order, data.trans, data.M, data.N, alpha, a, data.lda, x, data.strideX, beta, y, data.strideY ); + t.strictEqual( out, y, 'returns y' ); + t.end(); +}); + +tape( 'if either `M` or `N` is `0`, the function returns the second input vector unchanged (row-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = rt; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y ); + + out = cgemv( data.order, data.trans, 0, data.N, alpha, a, data.lda, x, data.strideX, beta, y, data.strideY ); + t.strictEqual( out, y, 'returns expected value' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected value' ); + + out = cgemv( data.order, data.trans, data.M, 0, alpha, a, data.lda, x, data.strideX, beta, y, data.strideY ); + t.strictEqual( out, y, 'returns expected value' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected value' ); + + t.end(); +}); + +tape( 'if either `M` or `N` is `0`, the function returns the second input vector unchanged (column-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = ct; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y ); + + out = cgemv( data.order, data.trans, 0, data.N, alpha, a, data.lda, x, data.strideX, beta, y, data.strideY ); + t.strictEqual( out, y, 'returns expected value' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected value' ); + + out = cgemv( data.order, data.trans, data.M, 0, alpha, a, data.lda, x, data.strideX, beta, y, data.strideY ); + t.strictEqual( out, y, 'returns expected value' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected value' ); + + t.end(); +}); + +tape( 'if `α` is `0` and `β` is `1`, the function returns the second input vector unchanged (row-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = rt; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( 0.0, 0.0 ); + beta = new Complex64( 1.0, 0.0 ); + + expected = new Complex64Array( data.y ); + + out = cgemv( data.order, data.trans, data.M, data.N, alpha, a, data.lda, x, data.strideX, beta, y, data.strideY ); + t.strictEqual( out, y, 'returns expected value' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected value' ); + + t.end(); +}); + +tape( 'if `α` is `0` and `β` is `1`, the function returns the second input vector unchanged (column-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = ct; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( 0.0, 0.0 ); + beta = new Complex64( 1.0, 0.0 ); + + expected = new Complex64Array( data.y ); + + out = cgemv( data.order, data.trans, data.M, data.N, alpha, a, data.lda, x, data.strideX, beta, y, data.strideY ); + t.strictEqual( out, y, 'returns expected value' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected value' ); + + t.end(); +}); + +tape( 'if `x` contains only zeros and `β` is `1`, the function returns the second input vector unchanged (row-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = rxb; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.order, data.trans, data.M, data.N, alpha, a, data.lda, x, data.strideX, beta, y, data.strideY ); + t.strictEqual( out, y, 'returns expected value' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected value' ); + + t.end(); +}); + +tape( 'if `x` contains only zeros and `β` is `1`, the function returns the second input vector unchanged (column-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = cxb; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.order, data.trans, data.M, data.N, alpha, a, data.lda, x, data.strideX, beta, y, data.strideY ); + t.strictEqual( out, y, 'returns expected value' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected value' ); + + t.end(); +}); + +tape( 'if `α` is `0`, the function scales the second input vector by `β` (row-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = ra; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( 0.0, 0.0 ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.order, data.trans, data.M, data.N, alpha, a, data.lda, x, data.strideX, beta, y, data.strideY ); + t.strictEqual( out, y, 'returns expected value' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected value' ); + + t.end(); +}); + +tape( 'if `α` is `0`, the function scales the second input vector by `β` (column-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = ca; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( 0.0, 0.0 ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.order, data.trans, data.M, data.N, alpha, a, data.lda, x, data.strideX, beta, y, data.strideY ); + t.strictEqual( out, y, 'returns expected value' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected value' ); + + t.end(); +}); + +tape( 'if `x` contains only zeros and `β` is not `1`, the function scales the second input vector by `β` (row-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = rx; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.order, data.trans, data.M, data.N, alpha, a, data.lda, x, data.strideX, beta, y, data.strideY ); + t.strictEqual( out, y, 'returns expected value' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected value' ); + + t.end(); +}); + +tape( 'if `x` contains only zeros and `β` is not `1`, the function scales the second input vector by `β` (column-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = cx; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.order, data.trans, data.M, data.N, alpha, a, data.lda, x, data.strideX, beta, y, data.strideY ); + t.strictEqual( out, y, 'returns expected value' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected value' ); + + t.end(); +}); + +tape( 'the function supports specifying `x` and `y` strides (row-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = rxpyp; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.order, data.trans, data.M, data.N, alpha, a, data.lda, x, data.strideX, beta, y, data.strideY ); + t.strictEqual( out, y, 'returns expected value' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected value' ); + + t.end(); +}); + +tape( 'the function supports specifying `x` and `y` strides (column-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = cxpyp; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.order, data.trans, data.M, data.N, alpha, a, data.lda, x, data.strideX, beta, y, data.strideY ); + t.strictEqual( out, y, 'returns expected value' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected value' ); + + t.end(); +}); + +tape( 'the function supports specifying a negative `x` stride (row-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = rxnyp; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.order, data.trans, data.M, data.N, alpha, a, data.lda, x, data.strideX, beta, y, data.strideY ); + t.strictEqual( out, y, 'returns expected value' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected value' ); + + t.end(); +}); + +tape( 'the function supports specifying a negative `x` stride (column-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = cxnyp; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.order, data.trans, data.M, data.N, alpha, a, data.lda, x, data.strideX, beta, y, data.strideY ); + t.strictEqual( out, y, 'returns expected value' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected value' ); + + t.end(); +}); + +tape( 'the function supports specifying a negative `y` stride (row-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = rxpyn; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.order, data.trans, data.M, data.N, alpha, a, data.lda, x, data.strideX, beta, y, data.strideY ); + t.strictEqual( out, y, 'returns expected value' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected value' ); + + t.end(); +}); + +tape( 'the function supports specifying a negative `y` stride (column-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = cxpyn; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.order, data.trans, data.M, data.N, alpha, a, data.lda, x, data.strideX, beta, y, data.strideY ); + t.strictEqual( out, y, 'returns expected value' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected value' ); + + t.end(); +}); + +tape( 'the function supports complex access patterns (row-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = rxnyn; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.order, data.trans, data.M, data.N, alpha, a, data.lda, x, data.strideX, beta, y, data.strideY ); + t.strictEqual( out, y, 'returns expected value' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected value' ); + + t.end(); +}); + +tape( 'the function supports complex access patterns (column-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = cxnyn; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.order, data.trans, data.M, data.N, alpha, a, data.lda, x, data.strideX, beta, y, data.strideY ); + t.strictEqual( out, y, 'returns expected value' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected value' ); + + t.end(); +}); diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/test/test.js b/lib/node_modules/@stdlib/blas/base/cgemv/test/test.js new file mode 100644 index 000000000000..5f4f4cfc6329 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/test/test.js @@ -0,0 +1,82 @@ +/** +* @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 tape = require( 'tape' ); +var proxyquire = require( 'proxyquire' ); +var IS_BROWSER = require( '@stdlib/assert/is-browser' ); +var cgemv = require( './../lib' ); + + +// VARIABLES // + +var opts = { + 'skip': IS_BROWSER +}; + + +// TESTS // + +tape( 'main export is a function', function test( t ) { + t.ok( true, __filename ); + t.strictEqual( typeof cgemv, 'function', 'main export is a function' ); + t.end(); +}); + +tape( 'attached to the main export is a method providing an ndarray interface', function test( t ) { + t.strictEqual( typeof cgemv.ndarray, 'function', 'method is a function' ); + t.end(); +}); + +tape( 'if a native implementation is available, the main export is the native implementation', opts, function test( t ) { + var cgemv = proxyquire( './../lib', { + '@stdlib/utils/try-require': tryRequire + }); + + t.strictEqual( cgemv, mock, 'returns native implementation' ); + t.end(); + + function tryRequire() { + return mock; + } + + function mock() { + // Mock native implementation... + } +}); + +tape( 'if a native implementation is not available, the main export is a JavaScript implementation', opts, function test( t ) { + var cgemv; + var main; + + main = require( './../lib/cgemv.js' ); + + cgemv = proxyquire( './../lib', { + '@stdlib/utils/try-require': tryRequire + }); + + t.strictEqual( cgemv, main, 'returns JavaScript implementation' ); + t.end(); + + function tryRequire() { + return new Error( 'Cannot find module' ); + } +}); diff --git a/lib/node_modules/@stdlib/blas/base/cgemv/test/test.ndarray.js b/lib/node_modules/@stdlib/blas/base/cgemv/test/test.ndarray.js new file mode 100644 index 000000000000..09ea20bcd0e6 --- /dev/null +++ b/lib/node_modules/@stdlib/blas/base/cgemv/test/test.ndarray.js @@ -0,0 +1,1207 @@ +/** +* @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. +*/ + +/* eslint-disable max-len */ + +'use strict'; + +// MODULES // + +var tape = require( 'tape' ); +var isSameComplex64Array = require( '@stdlib/assert/is-same-complex64array' ); +var Complex64Array = require( '@stdlib/array/complex64' ); +var Complex64 = require( '@stdlib/complex/float32/ctor' ); +var cgemv = require( './../lib/ndarray.js' ); + + +// FIXTURES // + +var cap = require( './fixtures/column_major_complex_access_pattern.json' ); +var cnt = require( './fixtures/column_major_nt.json' ); +var ct = require( './fixtures/column_major_t.json' ); +var coa = require( './fixtures/column_major_oa.json' ); +var csa1sa2 = require( './fixtures/column_major_sa1_sa2.json' ); +var csa1nsa2 = require( './fixtures/column_major_sa1n_sa2.json' ); +var csa1sa2n = require( './fixtures/column_major_sa1_sa2n.json' ); +var csa1nsa2n = require( './fixtures/column_major_sa1n_sa2n.json' ); +var cxnyn = require( './fixtures/column_major_xnyn.json' ); +var cxpyn = require( './fixtures/column_major_xpyn.json' ); +var cxnyp = require( './fixtures/column_major_xnyp.json' ); +var cxpyp = require( './fixtures/column_major_xpyp.json' ); +var cx = require( './fixtures/column_major_x_zeros.json' ); +var cxb = require( './fixtures/column_major_x_zeros_beta_one.json' ); +var ca = require( './fixtures/column_major_alpha_zero.json' ); +var rap = require( './fixtures/row_major_complex_access_pattern.json' ); +var rnt = require( './fixtures/row_major_nt.json' ); +var rt = require( './fixtures/row_major_t.json' ); +var roa = require( './fixtures/row_major_oa.json' ); +var rsa1sa2 = require( './fixtures/row_major_sa1_sa2.json' ); +var rsa1nsa2 = require( './fixtures/row_major_sa1n_sa2.json' ); +var rsa1sa2n = require( './fixtures/row_major_sa1_sa2n.json' ); +var rsa1nsa2n = require( './fixtures/row_major_sa1n_sa2n.json' ); +var rxnyn = require( './fixtures/row_major_xnyn.json' ); +var rxpyn = require( './fixtures/row_major_xpyn.json' ); +var rxnyp = require( './fixtures/row_major_xnyp.json' ); +var rxpyp = require( './fixtures/row_major_xpyp.json' ); +var rx = require( './fixtures/row_major_x_zeros.json' ); +var rxb = require( './fixtures/row_major_x_zeros_beta_one.json' ); +var ra = require( './fixtures/row_major_alpha_zero.json' ); + + +// TESTS // + +tape( 'main export is a function', function test( t ) { + t.ok( true, __filename ); + t.strictEqual( typeof cgemv, 'function', 'main export is a function' ); + t.end(); +}); + +tape( 'the function has an arity of 15', function test( t ) { + t.strictEqual( cgemv.length, 15, 'returns expected value' ); + t.end(); +}); + +tape( 'the function throws an error if provided an invalid first argument', function test( t ) { + var values; + var data; + var i; + + data = rnt; + + values = [ + 'foo', + 'bar', + 'beep', + 'boop' + ]; + + for ( i = 0; i < values.length; i++ ) { + t.throws( badValue( values[ i ] ), TypeError, 'throws an error when provided ' + values[ i ] ); + } + t.end(); + + function badValue( value ) { + return function badValue() { + cgemv( value, data.M, data.N, new Complex64( data.alpha[0], data.alpha[1] ), new Complex64Array( data.A ), data.strideA1, data.strideA2, data.offsetA, new Complex64Array( data.x ), data.strideX, data.offsetX, new Complex64( data.beta[0], data.beta[1] ), new Complex64Array( data.y ), data.strideY, data.offsetY ); + }; + } +}); + +tape( 'the function throws an error if provided an invalid second argument', function test( t ) { + var values; + var data; + var i; + + data = rnt; + + values = [ + -1, + -2, + -3 + ]; + + for ( i = 0; i < values.length; i++ ) { + t.throws( badValue( values[ i ] ), RangeError, 'throws an error when provided ' + values[ i ] ); + } + t.end(); + + function badValue( value ) { + return function badValue() { + cgemv( data.trans, value, data.N, new Complex64( data.alpha[0], data.alpha[1] ), new Complex64Array( data.A ), data.strideA1, data.strideA2, data.offsetA, new Complex64Array( data.x ), data.strideX, data.offsetX, new Complex64( data.beta[0], data.beta[1] ), new Complex64Array( data.y ), data.strideY, data.offsetY ); + }; + } +}); + +tape( 'the function throws an error if provided an invalid third argument', function test( t ) { + var values; + var data; + var i; + + data = rnt; + + values = [ + -1, + -2, + -3 + ]; + + for ( i = 0; i < values.length; i++ ) { + t.throws( badValue( values[ i ] ), RangeError, 'throws an error when provided ' + values[ i ] ); + } + t.end(); + + function badValue( value ) { + return function badValue() { + cgemv( data.trans, data.M, value, new Complex64( data.alpha[0], data.alpha[1] ), new Complex64Array( data.A ), data.strideA1, data.strideA2, data.offsetA, new Complex64Array( data.x ), data.strideX, data.offsetX, new Complex64( data.beta[0], data.beta[1] ), new Complex64Array( data.y ), data.strideY, data.offsetY ); + }; + } +}); + +tape( 'the function throws an error if provided an invalid tenth argument', function test( t ) { + var values; + var data; + var i; + + data = rnt; + + values = [ + 0 + ]; + + for ( i = 0; i < values.length; i++ ) { + t.throws( badValue( values[ i ] ), RangeError, 'throws an error when provided ' + values[ i ] ); + } + t.end(); + + function badValue( value ) { + return function badValue() { + cgemv( data.trans, data.M, data.N, new Complex64( data.alpha[0], data.alpha[1] ), new Complex64Array( data.A ), data.strideA1, data.strideA2, data.offsetA, new Complex64Array( data.x ), value, data.offsetX, new Complex64( data.beta[0], data.beta[1] ), new Complex64Array( data.y ), data.strideY, data.offsetY ); + }; + } +}); + +tape( 'the function throws an error if provided an invalid fourteenth argument', function test( t ) { + var values; + var data; + var i; + + data = rnt; + + values = [ + 0 + ]; + + for ( i = 0; i < values.length; i++ ) { + t.throws( badValue( values[ i ] ), RangeError, 'throws an error when provided ' + values[ i ] ); + } + t.end(); + + function badValue( value ) { + return function badValue() { + cgemv( data.trans, data.M, data.N, new Complex64( data.alpha[0], data.alpha[1] ), new Complex64Array( data.A ), data.strideA1, data.strideA2, data.offsetA, new Complex64Array( data.x ), data.strideX, data.offsetX, new Complex64( data.beta[0], data.beta[1] ), new Complex64Array( data.y ), value, data.offsetY ); + }; + } +}); + +tape( 'the function performs one of the matrix-vector operations `y = α*A*x + β*y` or `y = α*A^T*x + β*y` (row-major, no-transpose)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = rnt; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'the function performs one of the matrix-vector operations `y = α*A*x + β*y` or `y = α*A^T*x + β*y` (column-major, no-transpose)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = cnt; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'the function performs one of the matrix-vector operations `y = α*A*x + β*y` or `y = α*A^T*x + β*y` (row-major, transpose)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = rt; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'the function performs one of the matrix-vector operations `y = α*A*x + β*y` or `y = α*A^T*x + β*y` (column-major, transpose)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = ct; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'the function returns a reference to the second input vector (row-major)', function test( t ) { + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = rt; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + + t.end(); +}); + +tape( 'the function returns a reference to the second input vector (column-major)', function test( t ) { + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = ct; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + + t.end(); +}); + +tape( 'if either `M` or `N` is `0`, the function returns the second input vector unchanged (row-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = rt; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y ); + + out = cgemv( data.trans, 0, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + out = cgemv( data.trans, data.M, 0, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'if either `M` or `N` is `0`, the function returns the second input vector unchanged (column-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = ct; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y ); + + out = cgemv( data.trans, 0, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + out = cgemv( data.trans, data.M, 0, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'if `α` is `0` and `β` is `1`, the function returns the second input vector unchanged (row-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = rt; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( 0.0, 0.0 ); + beta = new Complex64( 1.0, 0.0 ); + + expected = new Complex64Array( data.y ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'if `α` is `0` and `β` is `1`, the function returns the second input vector unchanged (column-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = ct; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( 0.0, 0.0 ); + beta = new Complex64( 1.0, 0.0 ); + + expected = new Complex64Array( data.y ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'if `x` contains only zeros and `β` is `1`, the function returns the second input vector unchanged (row-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = rxb; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'if `x` contains only zeros and `β` is `1`, the function returns the second input vector unchanged (column-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = cxb; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'if `α` is `0`, the function scales the second input vector by `β` (row-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = ra; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'if `α` is `0`, the function scales the second input vector by `β` (column-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = ca; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'if `x` contains only zeros and `β` is not `1`, the function scales the second input vector by `β` (row-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = rx; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'if `x` contains only zeros and `β` is not `1`, the function scales the second input vector by `β` (column-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = cx; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'the function supports specifying the strides of the first and second dimensions of `A` (row-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = rsa1sa2; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'the function supports specifying the strides of the first and second dimensions of `A` (column-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = csa1sa2; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'the function supports a negative stride for the first dimension of `A` (row-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = rsa1nsa2; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'the function supports a negative stride for the first dimension of `A` (column-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = csa1nsa2; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'the function supports a negative stride for the second dimension of `A` (row-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = rsa1sa2n; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'the function supports a negative stride for the second dimension of `A` (column-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = csa1sa2n; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'the function supports negative strides for `A` (row-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = rsa1nsa2n; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'the function supports negative strides for `A` (column-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = csa1nsa2n; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'the function supports specifying an offset parameter for `A` (row-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = roa; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'the function supports specifying an offset parameter for `A` (column-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = coa; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'the function supports specifying `x` and `y` strides (row-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = rxpyp; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'the function supports specifying `x` and `y` strides (column-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = cxpyp; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'the function supports specifying a negative `x` stride (row-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = rxnyp; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'the function supports specifying a negative `x` stride (column-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = cxnyp; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'the function supports specifying a negative `y` stride (row-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = rxpyn; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'the function supports specifying a negative `y` stride (column-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = cxpyn; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'the function supports specifying negative strides for `x` and `y` (row-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = rxnyn; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'the function supports specifying negative strides for `x` and `y` (column-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = cxnyn; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'the function supports complex access patterns (row-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = rap; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +}); + +tape( 'the function supports complex access patterns (column-major)', function test( t ) { + var expected; + var alpha; + var data; + var beta; + var out; + var a; + var x; + var y; + + data = cap; + + a = new Complex64Array( data.A ); + x = new Complex64Array( data.x ); + y = new Complex64Array( data.y ); + + alpha = new Complex64( data.alpha[0], data.alpha[1] ); + beta = new Complex64( data.beta[0], data.beta[1] ); + + expected = new Complex64Array( data.y_out ); + + out = cgemv( data.trans, data.M, data.N, alpha, a, data.strideA1, data.strideA2, data.offsetA, x, data.strideX, data.offsetX, beta, y, data.strideY, data.offsetY ); + t.strictEqual( out, y, 'returns expected values' ); + t.strictEqual( isSameComplex64Array( out, expected ), true, 'returns expected values' ); + + t.end(); +});