changeset 10267:0296a70da007 octave-forge

Unindent (and thus re-enable) some tests in comm package
author jordigh
date Thu, 17 May 2012 03:49:35 +0000
parents 6539f018c7ef
children a98ba64657d4
files main/comm/inst/awgn.m main/comm/inst/bi2de.m main/comm/inst/de2bi.m main/comm/inst/egolaydec.m
diffstat 4 files changed, 47 insertions(+), 47 deletions(-) [+]
line wrap: on
line diff
--- a/main/comm/inst/awgn.m	Wed May 16 16:26:13 2012 +0000
+++ b/main/comm/inst/awgn.m	Thu May 17 03:49:35 2012 +0000
@@ -133,15 +133,15 @@
   
 endfunction
 
-                                %!shared x, y, noisy
-                                %!       x = [0:0.01:2*pi]; y = sin (x);
-                                %!       noisy = awgn (y, 20, "dB", "measured");
+%!shared x, y, noisy
+%!       x = [0:0.01:2*pi]; y = sin (x);
+%!       noisy = awgn (y, 20, "dB", "measured");
 
 ## Test of noisy is pretty arbitrary, but should pickup most errors
-                                %!error awgn ();
-                                %!error awgn (1);
-                                %!error awgn (1,1,1,1,1);
-                                %!assert (isreal(noisy));
-                                %!assert (iscomplex(awgn(y+1i,20,"dB","measured")));
-                                %!assert (size(y) == size(noisy))
-                                %!assert (abs(10*log10(mean(y.^2)/mean((y-noisy).^ 2)) - 20) < 1);
+%!error awgn ();
+%!error awgn (1);
+%!error awgn (1,1,1,1,1);
+%!assert (isreal(noisy));
+%!assert (iscomplex(awgn(y+1i,20,"dB","measured")));
+%!assert (size(y) == size(noisy))
+%!assert (abs(10*log10(mean(y.^2)/mean((y-noisy).^ 2)) - 20) < 1);
--- a/main/comm/inst/bi2de.m	Wed May 16 16:26:13 2012 +0000
+++ b/main/comm/inst/bi2de.m	Thu May 17 03:49:35 2012 +0000
@@ -75,22 +75,22 @@
 
 endfunction
 
-                                %!shared x
-                                %! x = randi ([0 1], 100, 16);
-                                %!assert (bi2de (0), 0)
-                                %!assert (bi2de (1), 1)
-                                %!assert (bi2de (ones (1, 8)), 255)
-                                %!assert (bi2de ([7 7 7 7], 8), 4095)
-                                %!assert (size (bi2de (x)), [100 1])
-                                %!assert (bi2de (x, "right-msb"), bi2de (x))
-                                %!assert (bi2de (x, "left-msb"), bi2de (fliplr (x)))
+%!shared x
+%! x = randi ([0 1], 100, 16);
+%!assert (bi2de (0), 0)
+%!assert (bi2de (1), 1)
+%!assert (bi2de (ones (1, 8)), 255)
+%!assert (bi2de ([7 7 7 7], 8), 4095)
+%!assert (size (bi2de (x)), [100 1])
+%!assert (bi2de (x, "right-msb"), bi2de (x))
+%!assert (bi2de (x, "left-msb"), bi2de (fliplr (x)))
 
 %% Test input validation
-                                %!error bi2de ()
-                                %!error bi2de (1, 2, 3, 4)
-                                %!error bi2de (1, 2, 3)
-                                %!error bi2de (1, 2, "invalid")
-                                %!error bi2de (0.1)
-                                %!error bi2de (-1)
-                                %!error bi2de (2)
-                                %!error bi2de (7, 6)
+%!error bi2de ()
+%!error bi2de (1, 2, 3, 4)
+%!error bi2de (1, 2, 3)
+%!error bi2de (1, 2, "invalid")
+%!error bi2de (0.1)
+%!error bi2de (-1)
+%!error bi2de (2)
+%!error bi2de (7, 6)
--- a/main/comm/inst/de2bi.m	Wed May 16 16:26:13 2012 +0000
+++ b/main/comm/inst/de2bi.m	Thu May 17 03:49:35 2012 +0000
@@ -87,21 +87,21 @@
 
 endfunction
 
-                                %!shared x
-                                %! x = randi ([0 2^16-1], 100, 1);
-                                %!assert (de2bi (0), 0)
-                                %!assert (de2bi (1), 1)
-                                %!assert (de2bi (255), ones (1, 8))
-                                %!assert (de2bi (255, [], 256), 255)
-                                %!assert (de2bi (1023, 8, 8), [7 7 7 1 0 0 0 0])
-                                %!assert (size (de2bi (x, 16)), [100 16])
-                                %!assert (de2bi (x, 16, "right-msb"), de2bi (x, 16))
-                                %!assert (de2bi (x, 16, "left-msb"), fliplr (de2bi (x, 16)))
+%!shared x
+%! x = randi ([0 2^16-1], 100, 1);
+%!assert (de2bi (0), 0)
+%!assert (de2bi (1), 1)
+%!assert (de2bi (255), ones (1, 8))
+%!assert (de2bi (255, [], 256), 255)
+%!assert (de2bi (1023, 8, 8), [7 7 7 1 0 0 0 0])
+%!assert (size (de2bi (x, 16)), [100 16])
+%!assert (de2bi (x, 16, "right-msb"), de2bi (x, 16))
+%!assert (de2bi (x, 16, "left-msb"), fliplr (de2bi (x, 16)))
 
 %% Test input validation
-                                %!error de2bi ()
-                                %!error de2bi (1, 2, 3, 4, 5)
-                                %!error de2bi (1, 2, 3, 4)
-                                %!error de2bi (1, 2, 3, "invalid")
-                                %!error de2bi (0.1)
-                                %!error de2bi (-1)
+%!error de2bi ()
+%!error de2bi (1, 2, 3, 4, 5)
+%!error de2bi (1, 2, 3, 4)
+%!error de2bi (1, 2, 3, "invalid")
+%!error de2bi (0.1)
+%!error de2bi (-1)
--- a/main/comm/inst/egolaydec.m	Wed May 16 16:26:13 2012 +0000
+++ b/main/comm/inst/egolaydec.m	Thu May 17 03:49:35 2012 +0000
@@ -118,9 +118,9 @@
 
   return;
 end
-                                %!
-                                %!assert(egolaydec([1 1 1 zeros(1,21)]),zeros(1,24))
-                                %!assert(egolaydec([1 0 1 zeros(1,20) 1]),zeros(1,24))
-                                %!
+%!
+%!assert(egolaydec([1 1 1 zeros(1,21)]),zeros(1,24))
+%!assert(egolaydec([1 0 1 zeros(1,20) 1]),zeros(1,24))
+%!