# HG changeset patch # User Mike Miller # Date 1377006377 14400 # Node ID 011e5d67baf1a2caff4bb51bc8d9f1f12930f4cc # Parent d5efffe5a7894fd573953851927d86e1a42ccc8d interpft.m: Widen tolerance on tests to allow for FFT error * scripts/general/interpft.m: Widen tolerance on tests to allow for error in FFT routines, for example when not linking with FFTW. diff -r d5efffe5a789 -r 011e5d67baf1 scripts/general/interpft.m --- a/scripts/general/interpft.m Tue Aug 20 09:44:49 2013 -0400 +++ b/scripts/general/interpft.m Tue Aug 20 09:46:17 2013 -0400 @@ -127,10 +127,10 @@ %! assert (interpft (x, 6), y, 10*eps); %% Test for correct spectral symmetry with even/odd lengths -%!assert (max (abs (imag (interpft ([1:8], 20)))), 0, 2*eps); -%!assert (max (abs (imag (interpft ([1:8], 21)))), 0, 2*eps); -%!assert (max (abs (imag (interpft ([1:9], 20)))), 0, 2*eps); -%!assert (max (abs (imag (interpft ([1:9], 21)))), 0, 2*eps); +%!assert (max (abs (imag (interpft ([1:8], 20)))), 0, 20*eps); +%!assert (max (abs (imag (interpft ([1:8], 21)))), 0, 21*eps); +%!assert (max (abs (imag (interpft ([1:9], 20)))), 0, 20*eps); +%!assert (max (abs (imag (interpft ([1:9], 21)))), 0, 21*eps); %% Test input validation %!error interpft ()