even.m

来自「matlab波形优化算法经常要用到的matlab toolbox工具箱:yalm」· M 代码 · 共 20 行

function YESNO = even(x,order,d)
%EVEN Check if all numbers are even

% Author Johan L鰂berg
% $Id: even.m,v 1.2 2004/07/02 08:17:30 johanl Exp $

if (nargin==2) | (nargin==3)
    switch order 
        case 'rows'
           YESNO = ~any(rem(x,d),2);         
        case 'cols'
            YESNO = ~any(rem(x,d),1);
        otherwise
            error
    end
else
YESNO = nnz(rem(x,2))==0;
end