isscalar.m

来自「WCDMA FDD Simulink Models」· M 代码 · 共 17 行

function ecode = isscalar(Vec)
% ISSCALAR returns 1 for scalar inputs.

%   Copyright 1996-2001 The MathWorks, Inc.
%   $Revision: 1.3 $  $Date: 2001/04/05 04:47:25 $

   if(ndims(Vec) == 2)
      if(all([size(Vec,1)>1 size(Vec,2)>1]))
         ecode = 0; % Matrix
      else
         ecode = all([size(Vec,1)==1 size(Vec,2)==1]);
      end;
   else
      ecode = 0;
   end;
return;