function npdf=resize(pdf, rangelow, rangehigh) 
% resize(pdf, rangelow, rangehigh)  Generates a pdf sampled from the given 
%    pdf over the given range.  Useful for resizing functions generated with 
%    convpf.  If the given range cuts out a portion of the function's mass, 
%    resize will scale the function accordingly. 
if ispf(pdf)==0 | isdiscrt(pdf)==1 
   error('invalid pdf') 
end 
if rangehigh<rangelow 
   error('invalid range') 
end 
np=sample(pdf, rangelow, rangehigh, (rangehigh-rangelow)/2000); 
nx=[rangelow:(rangehigh-rangelow)/2000:rangehigh]; 
if ~(length(nx)==length(np)) 
   nx=nx(1:(length(nx)-1)); 
end 
npdf=[0 1; nx' np']; 
if ispf(npdf)==0 
   np=np./ttlprob(npdf); 
   npdf=[0 1; nx' np']; 
end