fixed eval_blep
This commit is contained in:
Binary file not shown.
Binary file not shown.
@@ -72,10 +72,10 @@ end;
|
||||
close all
|
||||
plot(1:nsin, blepm(fix(nharm/2), :)); grid;
|
||||
|
||||
wavw16(0.5*vtri, fs, 'tri.wav');
|
||||
wavw16(0.5*vsqr, fs, 'sqr.wav');
|
||||
wavw16(0.5*vsaw, fs, 'saw.wav');
|
||||
wavw16(0.5*vblep, fs, 'blep.wav');
|
||||
wavwrite(0.5*vtri, fs, 'tri.wav');
|
||||
wavwrite(0.5*vsqr, fs, 'sqr.wav');
|
||||
wavwrite(0.5*vsaw, fs, 'saw.wav');
|
||||
wavwrite(0.5*vblep, fs, 'blep.wav');
|
||||
|
||||
function h = lagrange(N, delay)
|
||||
%LAGRANGE h=lagrange(N,delay) returns order N FIR
|
||||
|
||||
Reference in New Issue
Block a user