import("filter.lib"); % Faust v0.9.9.3 N = 16; % Allocated delay-line length D = 5.4; % Requested delay process = impulse <: ( fdelay4(N, 1.5), fdelay4(N, 1.6), fdelay4(N, 1.7), ... fdelay4(N, 2.4), fdelay4(N, 2.499), fdelay4(N, 2.5)); // To see amplitude responses (for example): // [in a shell]: // faust2octave tlagrange.dsp // [at the Octave command prompt]: // plot(db(fft(faustout,1024)(1:512,:))); // Alternate example for testing a range of orders // process = 1-1' <: (fdelay1(N,D), // fdelay2(N,D), // fdelay3(N,D), // fdelay4(N,D), // fdelay5(N,D));