iscmplx.m

来自「射频方面的资料」· M 代码 · 共 12 行

% ISCMPLX  Tests if a number or array is complex
% 
%    [T] = ISCMPLX (x) returns 1 if x is complex, 0 otherwise
% 

function [T] = iscmplx (x)

T = 1;

if (x == real(x)),
	T = 0;   
end;