Add rate_type in interpreter/types.ml.
[Faustine.git] / interpretor / preprocessor / faust-0.9.47mr3 / examples / faust-stk / bass.h
1 //Parameters for bass.dsp
2 //©Romain Michon (rmichon@ccrma.stanford.edu), 2011
3 //licence: FAUST-STK
4
5 #include "instrument.h"
6
7 #define _LOOKUP_TABLE_H_
8
9 double bassLoopFilterb0_points[19*2] = {
10 24.000,0.54355,
11 26.000,0.54355,
12 27.000,0.55677,
13 29.000,0.55677,
14 32.000,0.55677,
15 33.000,0.83598,
16 36.000,0.83598,
17 43.000,0.83598,
18 44.000,0.88292,
19 48.000,0.88292,
20 51.000,0.88292,
21 52.000,0.77805,
22 54.000,0.77805,
23 57.000,0.77805,
24 58.000,0.91820,
25 60.000,0.91820,
26 61.000,0.91820,
27 63.000,0.94594,
28 65.000,0.91820,
29 };
30 extern LookupTable bassLoopFilterb0;
31 LookupTable bassLoopFilterb0(&bassLoopFilterb0_points[0], 18);
32
33 float getValueBassLoopFilterb0(float index){
34 return bassLoopFilterb0.getValue(index);
35 }
36
37 double bassLoopFilterb1_points[19*2] = {
38 24.000,-0.36586,
39 26.000,-0.36586,
40 27.000,-0.37628,
41 29.000,-0.37628,
42 32.000,-0.37628,
43 33.000,-0.60228,
44 36.000,-0.60228,
45 43.000,-0.60228,
46 44.000,-0.65721,
47 48.000,-0.65721,
48 51.000,-0.65721,
49 52.000,-0.51902,
50 54.000,-0.51902,
51 57.000,-0.51902,
52 58.000,-0.80765,
53 60.000,-0.80765,
54 61.000,-0.80765,
55 63.000,-0.83230,
56 65.000,-0.83230,
57 };
58 extern LookupTable bassLoopFilterb1;
59 LookupTable bassLoopFilterb1(&bassLoopFilterb1_points[0], 18);
60
61 float getValueBassLoopFilterb1(float index){
62 return bassLoopFilterb1.getValue(index);
63 }
64
65 double bassLoopFiltera1_points[19*2] = {
66 24.000,-0.81486,
67 26.000,-0.81486,
68 27.000,-0.81147,
69 29.000,-0.81147,
70 32.000,-0.81147,
71 33.000,-0.76078,
72 36.000,-0.76078,
73 43.000,-0.76078,
74 44.000,-0.77075,
75 48.000,-0.77075,
76 51.000,-0.77075,
77 52.000,-0.73548,
78 54.000,-0.73548,
79 57.000,-0.73548,
80 58.000,-0.88810,
81 60.000,-0.88810,
82 61.000,-0.88810,
83 63.000,-0.88537,
84 65.000,-0.88537,
85 };
86 extern LookupTable bassLoopFiltera1;
87 LookupTable bassLoopFiltera1(&bassLoopFiltera1_points[0], 18);
88
89 float getValueBassLoopFiltera1(float index){
90 return bassLoopFiltera1.getValue(index);
91 }