function a=makearray(s,h)
r=size(s);
r=r(2);
n=1;
r/h+1;
while n<=r/h;
      a(n,1:h)=s(1+(n-1)*h:n*h);
      n=n+1;
end
R=rem(r,h);
z=zeros(1,h-R);
a(n,1:h)=[s(1+(n-1)*h:r) z];
