function a=aresample(f1,f2)
	f0=gcd(f1,f2); 
	p=f2/f0; q=f1/f0;
	%[y,num]=resample(zeros(16,1),p,q);
	num=get(mfilt.firsrc(p,q),'Numerator'); % design resampling filter using mfilt
	a=asysobj(@(sz)dsp.FIRRateConverter(p,q,num),1,1,@(sz){[sz{1}(1)*f2/f1,sz{1}(2)]});
