load ../src/infile.dat
stem(infile)
axis([0,100,-20,20])
hold on
stem(infile)
for i = 1:100
plot (i,0,'g-')
hold on
end
%for i = 1:100
%plot(1,0,'g-')
%hold on
%end
