exm054_2.m

北京航空航天大学出版社张志涌、徐彦琴主编的matlab教程附带的mfile例程压缩包

% exm054_2.m
syms A t w
syms tao positive											%确认tao取正				<2>
yt=sym('Heaviside(t+tao/2)-Heaviside(t-tao/2)');
Yw=fourier(A*yt,t,w)
Ywc=maple('convert',Yw,'piecewise','w')		%计算结果起指示作用		<5>
Yws=simple(Yw)  
disp('按任意键继续！下面通过反变换，对计算进行验证。 ')
pause

Yt=ifourier(Yw,w,t)
Yst=ifourier(Yws,w,t)