1 // generated from file '../src/faust/cabinet_impulse_former.dsp' by dsp2cc:
2 // Code generated with Faust (https://faust.grame.fr)
3 
4 
5 namespace cabinet_impulse_former {
6 
7 
Dsp()8 Dsp::Dsp() {
9 }
10 
~Dsp()11 Dsp::~Dsp() {
12 }
13 
clear_state_f()14 inline void Dsp::clear_state_f()
15 {
16 	for (int l0 = 0; (l0 < 3); l0 = (l0 + 1)) fVec0[l0] = 0.0;
17 	for (int l1 = 0; (l1 < 3); l1 = (l1 + 1)) fRec1[l1] = 0.0;
18 	for (int l2 = 0; (l2 < 3); l2 = (l2 + 1)) fRec0[l2] = 0.0;
19 }
20 
init(unsigned int sample_rate)21 inline void Dsp::init(unsigned int sample_rate)
22 {
23 	fSampleRate = sample_rate;
24 	double fConst0 = std::min<double>(192000.0, std::max<double>(1.0, double(fSampleRate)));
25 	double fConst1 = (15079.644737231007 / fConst0);
26 	fConst2 = (1.4142135623730951 * std::sin(fConst1));
27 	fConst3 = std::cos(fConst1);
28 	double fConst4 = (1884.9555921538758 / fConst0);
29 	fConst5 = (1.4142135623730951 * std::sin(fConst4));
30 	fConst6 = std::cos(fConst4);
31 	clear_state_f();
32 }
33 
compute(int count,FAUSTFLOAT * input0,FAUSTFLOAT * output0)34 void always_inline Dsp::compute(int count, FAUSTFLOAT *input0, FAUSTFLOAT *output0)
35 {
36 #define fVslider0 (*fVslider0_)
37 #define fVslider1 (*fVslider1_)
38 #define fVslider2 (*fVslider2_)
39 	double fSlow0 = double(fVslider0);
40 	double fSlow1 = (fSlow0 * std::pow(10.0, (0.0 - (0.10000000000000001 * fSlow0))));
41 	double fSlow2 = std::pow(10.0, (0.025000000000000001 * double(fVslider1)));
42 	double fSlow3 = (fConst2 * std::sqrt(fSlow2));
43 	double fSlow4 = (fConst3 * (fSlow2 + -1.0));
44 	double fSlow5 = (1.0 / ((fSlow2 + fSlow3) + (1.0 - fSlow4)));
45 	double fSlow6 = (fSlow2 + (1.0 - (fSlow3 + fSlow4)));
46 	double fSlow7 = (fConst3 * (fSlow2 + 1.0));
47 	double fSlow8 = (2.0 * (fSlow2 + (-1.0 - fSlow7)));
48 	double fSlow9 = (fSlow2 + fSlow4);
49 	double fSlow10 = (fSlow2 * ((fSlow3 + fSlow9) + 1.0));
50 	double fSlow11 = std::pow(10.0, (0.025000000000000001 * double(fVslider2)));
51 	double fSlow12 = (fConst5 * std::sqrt(fSlow11));
52 	double fSlow13 = (fConst6 * (fSlow11 + -1.0));
53 	double fSlow14 = (fSlow11 + fSlow13);
54 	double fSlow15 = (1.0 / ((fSlow12 + fSlow14) + 1.0));
55 	double fSlow16 = (fConst6 * (fSlow11 + 1.0));
56 	double fSlow17 = (0.0 - (2.0 * ((fSlow11 + fSlow16) + -1.0)));
57 	double fSlow18 = (fSlow14 + (1.0 - fSlow12));
58 	double fSlow19 = ((fSlow11 + fSlow12) + (1.0 - fSlow13));
59 	double fSlow20 = (2.0 * (fSlow11 + (-1.0 - fSlow16)));
60 	double fSlow21 = (fSlow11 + (1.0 - (fSlow12 + fSlow13)));
61 	double fSlow22 = ((0.0 - (2.0 * fSlow2)) * ((fSlow2 + fSlow7) + -1.0));
62 	double fSlow23 = (fSlow2 * (fSlow9 + (1.0 - fSlow3)));
63 	for (int i0 = 0; (i0 < count); i0 = (i0 + 1)) {
64 		double fTemp0 = double(input0[i0]);
65 		fVec0[0] = fTemp0;
66 		fRec1[0] = (0.0 - (fSlow15 * (((fSlow17 * fRec1[1]) + (fSlow18 * fRec1[2])) - (fSlow11 * (((fSlow19 * fTemp0) + (fSlow20 * fVec0[1])) + (fSlow21 * fVec0[2]))))));
67 		fRec0[0] = (fSlow5 * ((0.0 - ((fSlow6 * fRec0[2]) + (fSlow8 * fRec0[1]))) + (((fSlow10 * fRec1[0]) + (fSlow22 * fRec1[1])) + (fSlow23 * fRec1[2]))));
68 		output0[i0] = FAUSTFLOAT((fSlow1 * fRec0[0]));
69 		fVec0[2] = fVec0[1];
70 		fVec0[1] = fVec0[0];
71 		fRec1[2] = fRec1[1];
72 		fRec1[1] = fRec1[0];
73 		fRec0[2] = fRec0[1];
74 		fRec0[1] = fRec0[0];
75 	}
76 #undef fVslider0
77 #undef fVslider1
78 #undef fVslider2
79 }
80 
register_par(const ParamReg & reg)81 int Dsp::register_par(const ParamReg& reg)
82 {
83 	fVslider0_ = reg.registerFloatVar("cab.Level",N_("Level"),"SA",N_("Level"),&fVslider0, 1.0, 0.5, 5.0, 0.5, 0);
84 	fVslider2_ = reg.registerFloatVar("cab.bass",N_("Bass"),"SA",N_("Bass"),&fVslider2, 0.0, -10.0, 10.0, 0.5, 0);
85 	fVslider1_ = reg.registerFloatVar("cab.treble",N_("Treble"),"SA",N_("Treble"),&fVslider1, 0.0, -10.0, 10.0, 0.5, 0);
86 	return 0;
87 }
88 
89 
90 } // end namespace cabinet_impulse_former
91