1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52
|
// Size = 50
ID_0 = float(fSamplingFreq);
ID_1 = max(1.0f, ID_0);
ID_2 = min(1.92e+05f, ID_1);
ID_3 = 3.1415927f/ID_2;
ID_4 = hslider("[1]freq [unit:Hz][style:knob]/low-freq shelving boost",1e+03f,2e+01f,2e+04f,0.1f);
ID_5 = ID_3*ID_4;
ID_6 = tan(ID_5);
ID_7 = (ID_6+1.4142135f);
ID_8 = ID_6*ID_7;
ID_9 = (ID_8+1.0f);
ID_10 = 1.0f/ID_9;
ID_11 = hslider("[2]gain [unit:dB][style:knob]/low-freq shelving boost",0.0f,-2e+01f,2e+01f,0.1f);
ID_12 = 0.05f*ID_11;
ID_13 = pow(1e+01f, ID_12);
ID_14 = 2.0f*ID_13;
ID_15 = sqrt(ID_14);
ID_16 = ID_13*ID_6;
ID_17 = (ID_15+ID_16);
ID_18 = ID_6*ID_17;
ID_19 = (ID_18+1.0f);
ID_20 = (ID_6+-1.4142135f);
ID_21 = ID_6*ID_20;
ID_22 = (ID_21+1.0f);
ID_23 = W0;
ID_24 = proj0(ID_23);
ID_25 = ID_24@2;
ID_26 = ID_22*ID_25;
ID_27 = pow(ID_6, 2.0f);
ID_28 = (ID_27+-1.0f);
ID_29 = 2.0f*ID_28;
ID_30 = ID_24';
ID_31 = ID_29*ID_30;
ID_32 = (ID_26+ID_31);
ID_33 = ID_10*ID_32;
ID_34 = IN[0]-ID_33;
ID_35 = letrec(W0 = (ID_34));
ID_36 = proj0(ID_35);
ID_37 = ID_36@0;
ID_38 = ID_19*ID_37;
ID_39 = ID_13*ID_27;
ID_40 = (ID_39+-1.0f);
ID_41 = 2.0f*ID_40;
ID_42 = ID_41*ID_30;
ID_43 = ID_38+ID_42;
ID_44 = (ID_15-ID_16);
ID_45 = ID_6*ID_44;
ID_46 = (1.0f-ID_45);
ID_47 = ID_46*ID_25;
ID_48 = (ID_43+ID_47);
ID_49 = ID_10*ID_48;
SIG = (ID_49);
|