一个很棒的网络控制系统仿真软件

				function ok = kack(filename)								clear(filename);				tmpout = [tempname '.p'];								try				  % pfile is the most expensive, but it works for any loadable m-file				  evalc('pfile(filename,tmpout)');				  delete(tmpout);				  ok = 1;				catch				  ok = 0;				end