comparison scripts/general/bitcmp.m @ 11587:c792872f8942

all script files: untabify and strip trailing whitespace
author John W. Eaton <jwe@octave.org>
date Thu, 20 Jan 2011 17:35:29 -0500
parents fd0a3ac60b0e
children 139f993936af
comparison
equal deleted inserted replaced
11586:12df7854fa7c 11587:c792872f8942
35 ## @end deftypefn 35 ## @end deftypefn
36 36
37 ## Liberally based on the version by Kai Habel from octave-forge 37 ## Liberally based on the version by Kai Habel from octave-forge
38 38
39 function C = bitcmp (A, k) 39 function C = bitcmp (A, k)
40 40
41 if (nargin < 1 || nargin > 2) 41 if (nargin < 1 || nargin > 2)
42 print_usage (); 42 print_usage ();
43 endif 43 endif
44 44
45 if (nargin == 2 && (! isscalar (k) || (floor (k) != k))) 45 if (nargin == 2 && (! isscalar (k) || (floor (k) != k)))