m-files compile clean

matlab/osc/blip/eval_blit2.m

@@ -1,4 +1,4 @@
-function eval_blit()
+function eval_blit2()
 L = 64000;
 Nb = 65;
 Nos = 8;
@@ -9,7 +9,7 @@ df = (fend-fstart)/L
 fcut = 16000;
 
 x = (0:Nb*Nos-1) - (Nb*Nos-1)/2;
-H = sinc(2*fcut/fs.*x/Nos).*Kaiser(Nos*Nb, 8)';
+H = sinc(2*fcut/fs.*x/Nos).*kaiser(Nos*Nb, 8)';
 for ii=0:Nos-1,
     for jj=0:Nb-1
         Hs(ii+1,jj+1) = H(Nos-ii+Nos*jj);
@@ -58,7 +58,7 @@ for i = 1:L,
 	f = f + df;
     
 end;
-wavwrite(0.7*blit, fs, 'blit.wav');
+wavw16(0.7*blit, fs, 'blit.wav');
 
 for ii = 1:Nos
     step(ii,:) = k(ii).*filter(Hs(ii,:), 1, [ones(1,Nb)]);