set.m

MATLAB扩展编程by 孙永康.ZIP.有需要的朋友请来下载.

function d = set(d,varargin)
argin = varargin;
while length(argin) >= 2,
	prop = argin{1};
	val  = argin{2};
	argin = argin(3:end);
	switch prop
		case 'x'
			d.x = val;
		case 'y'
			d.y = val;
		otherwise
			error('Asset properties: x, y')
	end
end