function rzp = reinterp_data(rz,ds0);

nrz = length(rz);

ds = sqrt((rz(2:nrz,1)-rz(1:nrz-1,1)).^2+(rz(2:nrz,2)-rz(1:nrz-1,2)).^2);

s = rz(:,1)*0;

for i=2:nrz;
s(i) = s(i-1)+ds(i-1);
end;

ss = 0:ds0:s(nrz);

rzp = interp1(s,rz,ss,'spline');
