function out=ahpreorder(order,vec)
%AHPREORDER(ORDER,VEC) internal function used by AHPCALC
%          to order VEC in the index order specified in ORDER.

n=length(order);
for i =1:n
 out(order(i)) = vec(i);
end