{VERSION 6 0 "IBM INTEL NT" "6.0" }
{USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 
1 0 0 0 0 1 }{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 
0 0 0 0 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }}
{SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "#sfb 27jun07" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "f:=piecewise(abs(x)<1,1,0);
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 40 "A:=(2/Pi)*int(f*cos(w*x
),x=0..infinity);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 57 "plot([
f,seq(int(A*cos(w*x),w=0..i/5),i=1..5)],x=-10..10);" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 17 "plot(A,w=0..100);" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 61 "plot3d(int(A*cos(w*x)*exp(-w^2*t),w=0..100),x=
-3..3,t=0..10);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}
{MARK "3 0 0" 57 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 
2 33 1 1 }