yading@10: function step3(arg)
yading@10: 
yading@10: x=wavread(arg);          
yading@10: [y,yh,ys] = hpsmodel(x,44100,hamming(2025),4096,-25,200,0,400,5,.2,4)       
yading@10: wavwrite(ys,44100,'ysbaby_voice_light.wav');   
yading@10: 
yading@10: