Mercurial > octave

comparison libinterp/corefcn/bsxfun.cc @ 22737:7abc25e6206a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
maint: Clean up code base to follow Octave coding conventions. Space between '!' and expression that follows. Eliminate whitespace at end of line. Use '#' rather than '%' for comment character. * ButtonGroup.cc, ListBoxControl.cc, file-editor-tab.cc, file-editor.cc, bsxfun.cc, cellfun.cc, conv2.cc, data.cc, dot.cc, fft2.cc, file-io.cc, filter.cc, graphics.cc, kron.cc, oct-stream.cc, quadcc.cc, spparms.cc, sylvester.cc, convhulln.cc, qr.cc, ov-class.cc, ov-cx-mat.cc, ov-usr-fcn.cc, pt.h, Array.cc, gsvd.h, inputdlg.m, krylov.m, shrinkfaces.m, padecoef.m, polyout.m, durbinlevinson.m: maint: Clean up code base to follow Octave coding conventions.
author Rik <rik@octave.org>
date Tue, 08 Nov 2016 10:01:17 -0800
parents 93ea313301f9
children 3a2b891d0b33
comparison
equal deleted inserted replaced
22736:44d9d526d1e3 22737:7abc25e6206a
742 %!assert (bsxfun (f, a, b), a - repmat (b, [4, 1, 1])) 742 %!assert (bsxfun (f, a, b), a - repmat (b, [4, 1, 1]))
743 %!assert (bsxfun (f, a, c), a - repmat (c, [1, 4, 1])) 743 %!assert (bsxfun (f, a, c), a - repmat (c, [1, 4, 1]))
744 %!assert (bsxfun (f, a, d), a - repmat (d, [1, 1, 4])) 744 %!assert (bsxfun (f, a, d), a - repmat (d, [1, 1, 4]))
745 %!assert (bsxfun ("minus", ones ([4, 0, 4]), ones ([4, 1, 4])), zeros ([4, 0, 4])) 745 %!assert (bsxfun ("minus", ones ([4, 0, 4]), ones ([4, 1, 4])), zeros ([4, 0, 4]))
746 746
747 %% The test below is a very hard case to treat 747 ## The test below is a very hard case to treat
748 %!assert (bsxfun (f, ones ([4, 1, 4, 1]), ones ([1, 4, 1, 4])), zeros ([4, 4, 4, 4])) 748 %!assert (bsxfun (f, ones ([4, 1, 4, 1]), ones ([1, 4, 1, 4])), zeros ([4, 4, 4, 4]))
749 749
750 %!shared a, b, aa, bb 750 %!shared a, b, aa, bb
751 %! a = randn (3, 1, 3); 751 %! a = randn (3, 1, 3);
752 %! aa = a(:, ones (1, 3), :, ones (1, 3)); 752 %! aa = a(:, ones (1, 3), :, ones (1, 3));
768 %!assert (bsxfun (@min, a, b), min (aa, bb)) 768 %!assert (bsxfun (@min, a, b), min (aa, bb))
769 %!assert (bsxfun (@max, a, b), max (aa, bb)) 769 %!assert (bsxfun (@max, a, b), max (aa, bb))
770 %!assert (bsxfun (@and, a > 0, b > 0), (aa > 0) & (bb > 0)) 770 %!assert (bsxfun (@and, a > 0, b > 0), (aa > 0) & (bb > 0))
771 %!assert (bsxfun (@or, a > 0, b > 0), (aa > 0) | (bb > 0)) 771 %!assert (bsxfun (@or, a > 0, b > 0), (aa > 0) | (bb > 0))
772 772
773 %% Test automatic bsxfun 773 ## Test automatic bsxfun
774 % 774 %
775 %!test 775 %!test
776 %! funs = {@plus, @minus, @times, @rdivide, @ldivide, @power, @max, @min, ... 776 %! funs = {@plus, @minus, @times, @rdivide, @ldivide, @power, @max, @min, ...
777 %! @rem, @mod, @atan2, @hypot, @eq, @ne, @lt, @le, @gt, @ge, ... 777 %! @rem, @mod, @atan2, @hypot, @eq, @ne, @lt, @le, @gt, @ge, ...
778 %! @and, @or, @xor }; 778 %! @and, @or, @xor };