function ecode = isinteger(Vec)
% ISINTEGER
%     Are all members of the vector/matrix integers.

%   Copyright 1996-2000 The MathWorks, Inc.
%   $Revision: 1.2 $  $Date: 2000/06/26 21:56:52 $

    Vec   = abs(Vec(:));
    ecode = all((Vec - floor(Vec)) == 0);
return;
