% 《數字信號處理教程——MATLAB釋義與實現》第四章截斷效應演示程序
% 電子工業出版社出版  陳懷琛編著 2004年9月
%
function []=call(h,z)
axes(h);
hold off
w=-5:0.1:5;
for i=1:length(w)
    if (w(i)==0 | z==0)
        y(i)=1;
    else 
        y(i)=sin(w(i)*z)./(w(i)*z);
    end
end
plot(w,y);