%exm12511_1.m

!md d:\mywork
cd d:\mywork
mcc -x sa_mex													
mcc -x saf_mex													

disp('按任意鍵開始運(yùn)行各文件'),pause
t=-2*pi:pi/500:2*pi;
tic;sa(t);tt(1)=toc;
tic;saf(t);tt(2)=toc;
tic;sa_mex(t);tt(3)=toc;
tic;y=saf_mex(t);tt(4)=toc;

plot(t,y,'r-');
disp('按任意鍵比較運(yùn)行速度'),pause
grid  
disp('運(yùn)算速度比較')
disp('     sa.m     saf.m   sa_mex.dll saf_mex.dll')
disp(tt)