how several improfiles will be saved in one two-dimensional matrix for interpolating the resulting improfile. Attached is an image of what I currently have.

figure (30),imshow(out);
figure (31), hold on 
for i=1:45
          x=[170-5*i/sqrt(2),645-5*i/sqrt(2)];
        y=[20+5*i/sqrt(2),495+5*i/sqrt(2)];
  prof=improfile(out,x,y);
  figure(31), plot(prof);
end

hold off