@@ -93,7 +93,7 @@ tape( 'the function computes a complex inverse', opts, function test( t ) {
9393 t . strictEqual ( real ( q ) , qre [ i ] , 'returns expected real component' ) ;
9494 } else {
9595 delta = absf ( real ( q ) - qre [ i ] ) ;
96- tol = EPS * absf ( qre [ i ] ) ;
96+ tol = 5 * EPS * absf ( qre [ i ] ) ;
9797 t . ok ( delta <= tol , 'within tolerance. x: ' + re [ i ] + '+ ' + im [ i ] + 'i. real: ' + real ( q ) + '. expected: ' + qre [ i ] + '. delta: ' + delta + '. tol: ' + tol + '.' ) ;
9898 }
9999 if ( imag ( q ) === qim [ i ] ) {
@@ -129,7 +129,7 @@ tape( 'the function computes a complex inverse (large negative imaginary compone
129129 t . strictEqual ( real ( q ) , qre [ i ] , 'returns expected real component' ) ;
130130 } else {
131131 delta = absf ( real ( q ) - qre [ i ] ) ;
132- tol = EPS * absf ( qre [ i ] ) ;
132+ tol = 5 * EPS * absf ( qre [ i ] ) ;
133133 t . ok ( delta <= tol , 'within tolerance. x: ' + re [ i ] + '+ ' + im [ i ] + 'i. real: ' + real ( q ) + '. expected: ' + qre [ i ] + '. delta: ' + delta + '. tol: ' + tol + '.' ) ;
134134 }
135135 if ( imag ( q ) === qim [ i ] ) {
@@ -165,7 +165,7 @@ tape( 'the function computes a complex inverse (large negative real components)'
165165 t . strictEqual ( real ( q ) , qre [ i ] , 'returns expected real component' ) ;
166166 } else {
167167 delta = absf ( real ( q ) - qre [ i ] ) ;
168- tol = EPS * absf ( qre [ i ] ) ;
168+ tol = 5 * EPS * absf ( qre [ i ] ) ;
169169 t . ok ( delta <= tol , 'within tolerance. x: ' + re [ i ] + '+ ' + im [ i ] + 'i. real: ' + real ( q ) + '. expected: ' + qre [ i ] + '. delta: ' + delta + '. tol: ' + tol + '.' ) ;
170170 }
171171 if ( imag ( q ) === qim [ i ] ) {
@@ -201,7 +201,7 @@ tape( 'the function computes a complex inverse (large positive imaginary compone
201201 t . strictEqual ( real ( q ) , qre [ i ] , 'returns expected real component' ) ;
202202 } else {
203203 delta = absf ( real ( q ) - qre [ i ] ) ;
204- tol = EPS * absf ( qre [ i ] ) ;
204+ tol = 5 * EPS * absf ( qre [ i ] ) ;
205205 t . ok ( delta <= tol , 'within tolerance. x: ' + re [ i ] + '+ ' + im [ i ] + 'i. real: ' + real ( q ) + '. expected: ' + qre [ i ] + '. delta: ' + delta + '. tol: ' + tol + '.' ) ;
206206 }
207207 if ( imag ( q ) === qim [ i ] ) {
@@ -237,7 +237,7 @@ tape( 'the function computes a complex inverse (large positive real components)'
237237 t . strictEqual ( real ( q ) , qre [ i ] , 'returns expected real component' ) ;
238238 } else {
239239 delta = absf ( real ( q ) - qre [ i ] ) ;
240- tol = EPS * absf ( qre [ i ] ) ;
240+ tol = 5 * EPS * absf ( qre [ i ] ) ;
241241 t . ok ( delta <= tol , 'within tolerance. x: ' + re [ i ] + '+ ' + im [ i ] + 'i. real: ' + real ( q ) + '. expected: ' + qre [ i ] + '. delta: ' + delta + '. tol: ' + tol + '.' ) ;
242242 }
243243 if ( imag ( q ) === qim [ i ] ) {
@@ -273,7 +273,7 @@ tape( 'the function computes a complex inverse (tiny negative imaginary componen
273273 t . strictEqual ( real ( q ) , qre [ i ] , 'returns expected real component' ) ;
274274 } else {
275275 delta = absf ( real ( q ) - qre [ i ] ) ;
276- tol = EPS * absf ( qre [ i ] ) ;
276+ tol = 5 * EPS * absf ( qre [ i ] ) ;
277277 t . ok ( delta <= tol , 'within tolerance. x: ' + re [ i ] + '+ ' + im [ i ] + 'i. real: ' + real ( q ) + '. expected: ' + qre [ i ] + '. delta: ' + delta + '. tol: ' + tol + '.' ) ;
278278 }
279279 if ( imag ( q ) === qim [ i ] ) {
@@ -309,7 +309,7 @@ tape( 'the function computes a complex inverse (tiny negative real components)',
309309 t . strictEqual ( real ( q ) , qre [ i ] , 'returns expected real component' ) ;
310310 } else {
311311 delta = absf ( real ( q ) - qre [ i ] ) ;
312- tol = EPS * absf ( qre [ i ] ) ;
312+ tol = 5 * EPS * absf ( qre [ i ] ) ;
313313 t . ok ( delta <= tol , 'within tolerance. x: ' + re [ i ] + '+ ' + im [ i ] + 'i. real: ' + real ( q ) + '. expected: ' + qre [ i ] + '. delta: ' + delta + '. tol: ' + tol + '.' ) ;
314314 }
315315 if ( imag ( q ) === qim [ i ] ) {
@@ -345,7 +345,7 @@ tape( 'the function computes a complex inverse (tiny positive imaginary componen
345345 t . strictEqual ( real ( q ) , qre [ i ] , 'returns expected real component' ) ;
346346 } else {
347347 delta = absf ( real ( q ) - qre [ i ] ) ;
348- tol = EPS * absf ( qre [ i ] ) ;
348+ tol = 5 * EPS * absf ( qre [ i ] ) ;
349349 t . ok ( delta <= tol , 'within tolerance. x: ' + re [ i ] + '+ ' + im [ i ] + 'i. real: ' + real ( q ) + '. expected: ' + qre [ i ] + '. delta: ' + delta + '. tol: ' + tol + '.' ) ;
350350 }
351351 if ( imag ( q ) === qim [ i ] ) {
@@ -381,7 +381,7 @@ tape( 'the function computes a complex inverse (tiny positive real components)',
381381 t . strictEqual ( real ( q ) , qre [ i ] , 'returns expected real component' ) ;
382382 } else {
383383 delta = absf ( real ( q ) - qre [ i ] ) ;
384- tol = EPS * absf ( qre [ i ] ) ;
384+ tol = 5 * EPS * absf ( qre [ i ] ) ;
385385 t . ok ( delta <= tol , 'within tolerance. x: ' + re [ i ] + '+ ' + im [ i ] + 'i. real: ' + real ( q ) + '. expected: ' + qre [ i ] + '. delta: ' + delta + '. tol: ' + tol + '.' ) ;
386386 }
387387 if ( imag ( q ) === qim [ i ] ) {
0 commit comments