@@ -45,22 +45,22 @@ var rxpyp = require( './fixtures/row_major_xpyp.json' );
4545
4646// VARIABLES //
4747
48- var sgemv = tryRequire ( resolve ( __dirname , './../lib/sgemv .native.js' ) ) ;
48+ var dgemv = tryRequire ( resolve ( __dirname , './../lib/dgemv .native.js' ) ) ;
4949var opts = {
50- 'skip' : ( sgemv instanceof Error )
50+ 'skip' : ( dgemv instanceof Error )
5151} ;
5252
5353
5454// TESTS //
5555
5656tape ( 'main export is a function' , opts , function test ( t ) {
5757 t . ok ( true , __filename ) ;
58- t . strictEqual ( typeof sgemv , 'function' , 'main export is a function' ) ;
58+ t . strictEqual ( typeof dgemv , 'function' , 'main export is a function' ) ;
5959 t . end ( ) ;
6060} ) ;
6161
6262tape ( 'the function has an arity of 12' , opts , function test ( t ) {
63- t . strictEqual ( sgemv . length , 12 , 'returns expected value' ) ;
63+ t . strictEqual ( dgemv . length , 12 , 'returns expected value' ) ;
6464 t . end ( ) ;
6565} ) ;
6666
@@ -80,7 +80,7 @@ tape( 'the function performs one of the matrix-vector operations `y = α*A*x +
8080
8181 expected = new Float64Array ( data . y_out ) ;
8282
83- out = sgemv ( data . order , data . trans , data . M , data . N , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
83+ out = dgemv ( data . order , data . trans , data . M , data . N , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
8484 t . strictEqual ( out , y , 'returns expected value' ) ;
8585 t . deepEqual ( out , expected , 'returns expected value' ) ;
8686 t . end ( ) ;
@@ -102,7 +102,7 @@ tape( 'the function performs one of the matrix-vector operations `y = α*A*x +
102102
103103 expected = new Float64Array ( data . y_out ) ;
104104
105- out = sgemv ( data . order , data . trans , data . M , data . N , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
105+ out = dgemv ( data . order , data . trans , data . M , data . N , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
106106 t . strictEqual ( out , y , 'returns expected value' ) ;
107107 t . deepEqual ( out , expected , 'returns expected value' ) ;
108108 t . end ( ) ;
@@ -124,7 +124,7 @@ tape( 'the function performs one of the matrix-vector operations `y = α*A*x +
124124
125125 expected = new Float64Array ( data . y_out ) ;
126126
127- out = sgemv ( data . order , data . trans , data . M , data . N , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
127+ out = dgemv ( data . order , data . trans , data . M , data . N , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
128128 t . strictEqual ( out , y , 'returns expected value' ) ;
129129 t . deepEqual ( out , expected , 'returns expected value' ) ;
130130 t . end ( ) ;
@@ -146,7 +146,7 @@ tape( 'the function performs one of the matrix-vector operations `y = α*A*x +
146146
147147 expected = new Float64Array ( data . y_out ) ;
148148
149- out = sgemv ( data . order , data . trans , data . M , data . N , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
149+ out = dgemv ( data . order , data . trans , data . M , data . N , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
150150 t . strictEqual ( out , y , 'returns expected value' ) ;
151151 t . deepEqual ( out , expected , 'returns expected value' ) ;
152152 t . end ( ) ;
@@ -165,7 +165,7 @@ tape( 'the function returns a reference to the second input vector (row-major)',
165165 x = new Float64Array ( data . x ) ;
166166 y = new Float64Array ( data . y ) ;
167167
168- out = sgemv ( data . order , data . trans , data . M , data . N , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
168+ out = dgemv ( data . order , data . trans , data . M , data . N , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
169169 t . strictEqual ( out , y , 'returns expected value' ) ;
170170 t . end ( ) ;
171171} ) ;
@@ -183,7 +183,7 @@ tape( 'the function returns a reference to the second input vector (column-major
183183 x = new Float64Array ( data . x ) ;
184184 y = new Float64Array ( data . y ) ;
185185
186- out = sgemv ( data . order , data . trans , data . M , data . N , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
186+ out = dgemv ( data . order , data . trans , data . M , data . N , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
187187 t . strictEqual ( out , y , 'returns expected value' ) ;
188188 t . end ( ) ;
189189} ) ;
@@ -204,11 +204,11 @@ tape( 'if either `M` or `N` is `0`, the function returns the second input vector
204204
205205 expected = new Float64Array ( data . y ) ;
206206
207- out = sgemv ( data . order , data . trans , 0 , data . N , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
207+ out = dgemv ( data . order , data . trans , 0 , data . N , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
208208 t . strictEqual ( out , y , 'returns expected value' ) ;
209209 t . deepEqual ( out , expected , 'returns expected value' ) ;
210210
211- out = sgemv ( data . order , data . trans , data . M , 0 , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
211+ out = dgemv ( data . order , data . trans , data . M , 0 , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
212212 t . strictEqual ( out , y , 'returns expected value' ) ;
213213 t . deepEqual ( out , expected , 'returns expected value' ) ;
214214
@@ -231,11 +231,11 @@ tape( 'if either `M` or `N` is `0`, the function returns the second input vector
231231
232232 expected = new Float64Array ( data . y ) ;
233233
234- out = sgemv ( data . order , data . trans , 0 , data . N , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
234+ out = dgemv ( data . order , data . trans , 0 , data . N , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
235235 t . strictEqual ( out , y , 'returns expected value' ) ;
236236 t . deepEqual ( out , expected , 'returns expected value' ) ;
237237
238- out = sgemv ( data . order , data . trans , data . M , 0 , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
238+ out = dgemv ( data . order , data . trans , data . M , 0 , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
239239 t . strictEqual ( out , y , 'returns expected value' ) ;
240240 t . deepEqual ( out , expected , 'returns expected value' ) ;
241241
@@ -258,7 +258,7 @@ tape( 'if `α` is `0` and `β` is `1`, the function returns the second input vec
258258
259259 expected = new Float64Array ( data . y ) ;
260260
261- out = sgemv ( data . order , data . trans , data . M , data . N , 0.0 , a , data . lda , x , data . strideX , 1.0 , y , data . strideY ) ;
261+ out = dgemv ( data . order , data . trans , data . M , data . N , 0.0 , a , data . lda , x , data . strideX , 1.0 , y , data . strideY ) ;
262262 t . strictEqual ( out , y , 'returns expected value' ) ;
263263 t . deepEqual ( out , expected , 'returns expected value' ) ;
264264
@@ -281,7 +281,7 @@ tape( 'if `α` is `0` and `β` is `1`, the function returns the second input vec
281281
282282 expected = new Float64Array ( data . y ) ;
283283
284- out = sgemv ( data . order , data . trans , data . M , data . N , 0.0 , a , data . lda , x , data . strideX , 1.0 , y , data . strideY ) ;
284+ out = dgemv ( data . order , data . trans , data . M , data . N , 0.0 , a , data . lda , x , data . strideX , 1.0 , y , data . strideY ) ;
285285 t . strictEqual ( out , y , 'returns expected value' ) ;
286286 t . deepEqual ( out , expected , 'returns expected value' ) ;
287287
@@ -304,7 +304,7 @@ tape( 'if `α` is `0`, the function scales the second input vector by `β` (row-
304304
305305 expected = new Float64Array ( data . y . length ) ;
306306
307- out = sgemv ( data . order , data . trans , data . M , data . N , 0.0 , a , data . lda , x , data . strideX , 0.0 , y , data . strideY ) ;
307+ out = dgemv ( data . order , data . trans , data . M , data . N , 0.0 , a , data . lda , x , data . strideX , 0.0 , y , data . strideY ) ;
308308 t . strictEqual ( out , y , 'returns expected value' ) ;
309309 t . deepEqual ( out , expected , 'returns expected value' ) ;
310310
@@ -327,7 +327,7 @@ tape( 'if `α` is `0`, the function scales the second input vector by `β` (colu
327327
328328 expected = new Float64Array ( data . y . length ) ;
329329
330- out = sgemv ( data . order , data . trans , data . M , data . N , 0.0 , a , data . lda , x , data . strideX , 0.0 , y , data . strideY ) ;
330+ out = dgemv ( data . order , data . trans , data . M , data . N , 0.0 , a , data . lda , x , data . strideX , 0.0 , y , data . strideY ) ;
331331 t . strictEqual ( out , y , 'returns expected value' ) ;
332332 t . deepEqual ( out , expected , 'returns expected value' ) ;
333333
@@ -350,7 +350,7 @@ tape( 'the function supports specifying `x` and `y` strides (row-major)', opts,
350350
351351 expected = new Float64Array ( data . y_out ) ;
352352
353- out = sgemv ( data . order , data . trans , data . M , data . N , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
353+ out = dgemv ( data . order , data . trans , data . M , data . N , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
354354 t . strictEqual ( out , y , 'returns expected value' ) ;
355355 t . deepEqual ( out , expected , 'returns expected value' ) ;
356356
@@ -373,7 +373,7 @@ tape( 'the function supports specifying `x` and `y` strides (column-major)', opt
373373
374374 expected = new Float64Array ( data . y_out ) ;
375375
376- out = sgemv ( data . order , data . trans , data . M , data . N , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
376+ out = dgemv ( data . order , data . trans , data . M , data . N , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
377377 t . strictEqual ( out , y , 'returns expected value' ) ;
378378 t . deepEqual ( out , expected , 'returns expected value' ) ;
379379
@@ -396,7 +396,7 @@ tape( 'the function supports specifying a negative `x` stride (row-major)', opts
396396
397397 expected = new Float64Array ( data . y_out ) ;
398398
399- out = sgemv ( data . order , data . trans , data . M , data . N , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
399+ out = dgemv ( data . order , data . trans , data . M , data . N , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
400400 t . strictEqual ( out , y , 'returns expected value' ) ;
401401 t . deepEqual ( out , expected , 'returns expected value' ) ;
402402
@@ -419,7 +419,7 @@ tape( 'the function supports specifying a negative `x` stride (column-major)', o
419419
420420 expected = new Float64Array ( data . y_out ) ;
421421
422- out = sgemv ( data . order , data . trans , data . M , data . N , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
422+ out = dgemv ( data . order , data . trans , data . M , data . N , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
423423 t . strictEqual ( out , y , 'returns expected value' ) ;
424424 t . deepEqual ( out , expected , 'returns expected value' ) ;
425425
@@ -442,7 +442,7 @@ tape( 'the function supports specifying a negative `y` stride (row-major)', opts
442442
443443 expected = new Float64Array ( data . y_out ) ;
444444
445- out = sgemv ( data . order , data . trans , data . M , data . N , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
445+ out = dgemv ( data . order , data . trans , data . M , data . N , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
446446 t . strictEqual ( out , y , 'returns expected value' ) ;
447447 t . deepEqual ( out , expected , 'returns expected value' ) ;
448448
@@ -465,7 +465,7 @@ tape( 'the function supports specifying a negative `y` stride (column-major)', o
465465
466466 expected = new Float64Array ( data . y_out ) ;
467467
468- out = sgemv ( data . order , data . trans , data . M , data . N , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
468+ out = dgemv ( data . order , data . trans , data . M , data . N , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
469469 t . strictEqual ( out , y , 'returns expected value' ) ;
470470 t . deepEqual ( out , expected , 'returns expected value' ) ;
471471
@@ -488,7 +488,7 @@ tape( 'the function supports complex access patterns (row-major)', opts, functio
488488
489489 expected = new Float64Array ( data . y_out ) ;
490490
491- out = sgemv ( data . order , data . trans , data . M , data . N , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
491+ out = dgemv ( data . order , data . trans , data . M , data . N , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
492492 t . strictEqual ( out , y , 'returns expected value' ) ;
493493 t . deepEqual ( out , expected , 'returns expected value' ) ;
494494
@@ -511,7 +511,7 @@ tape( 'the function supports complex access patterns (column-major)', opts, func
511511
512512 expected = new Float64Array ( data . y_out ) ;
513513
514- out = sgemv ( data . order , data . trans , data . M , data . N , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
514+ out = dgemv ( data . order , data . trans , data . M , data . N , data . alpha , a , data . lda , x , data . strideX , data . beta , y , data . strideY ) ;
515515 t . strictEqual ( out , y , 'returns expected value' ) ;
516516 t . deepEqual ( out , expected , 'returns expected value' ) ;
517517
0 commit comments