function z=tstecho1(a,n,c)
% function z=tstecho1(a,n,c)   testing the echo function
z=0;
for k=1:n
   z=z+tstecho2(a,c*k);
end
