mbintsca.m

来自「模糊神经网络采用matlab编程 o install NEFCON follow」· M 代码 · 共 19 行

function mbintscalar(a)
%MBINTSCALAR Must be integer scalar.
%	The statement
%
%	    mbintscalar(x)
%
%	is equivalent to
%
%	    mbint(x) & mbscalar(x)
%
%	See also MBINT, MBREAL, MBSCALAR, MBVECTOR.

if any(any(a ~= fix(a))),
	error( 'argument to mbintscalar must be integer' );
end
if any( size(a) ~= [1 1] ),
	error( 'argument of mbintscalar must be scalar' );
end