alexbrandmeyer@609
|
1 //
|
alexbrandmeyer@609
|
2 // carfac_common.cc
|
alexbrandmeyer@609
|
3 // CARFAC Open Source C++ Library
|
alexbrandmeyer@609
|
4 //
|
alexbrandmeyer@609
|
5 // Created by Alex Brandmeyer on 5/10/13.
|
alexbrandmeyer@609
|
6 //
|
alexbrandmeyer@609
|
7 // This C++ file is part of an implementation of Lyon's cochlear model:
|
alexbrandmeyer@609
|
8 // "Cascade of Asymmetric Resonators with Fast-Acting Compression"
|
alexbrandmeyer@609
|
9 // to supplement Lyon's upcoming book "Human and Machine Hearing"
|
alexbrandmeyer@609
|
10 //
|
alexbrandmeyer@609
|
11 // Licensed under the Apache License, Version 2.0 (the "License");
|
alexbrandmeyer@609
|
12 // you may not use this file except in compliance with the License.
|
alexbrandmeyer@609
|
13 // You may obtain a copy of the License at
|
alexbrandmeyer@609
|
14 //
|
alexbrandmeyer@609
|
15 // http://www.apache.org/licenses/LICENSE-2.0
|
alexbrandmeyer@609
|
16 //
|
alexbrandmeyer@609
|
17 // Unless required by applicable law or agreed to in writing, software
|
alexbrandmeyer@609
|
18 // distributed under the License is distributed on an "AS IS" BASIS,
|
alexbrandmeyer@609
|
19 // WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
|
alexbrandmeyer@609
|
20 // See the License for the specific language governing permissions and
|
alexbrandmeyer@609
|
21 // limitations under the License.
|
alexbrandmeyer@609
|
22
|
alexbrandmeyer@609
|
23 #include "carfac_common.h"
|
alexbrandmeyer@609
|
24
|
alexbrandmeyer@610
|
25 // Auditory filter nominal Equivalent Rectangular Bandwidth
|
alexbrandmeyer@610
|
26 // Ref: Glasberg and Moore: Hearing Research, 47 (1990), 103-138
|
alexbrandmeyer@609
|
27 FPType ERBHz (FPType cf_hz, FPType erb_break_freq, FPType erb_q) {
|
alexbrandmeyer@609
|
28 FPType erb;
|
alexbrandmeyer@609
|
29 erb = (erb_break_freq + cf_hz) / erb_q;
|
alexbrandmeyer@609
|
30 return erb;
|
alexbrandmeyer@609
|
31 }
|
alexbrandmeyer@609
|
32
|
alexbrandmeyer@610
|
33 FloatArray CARFACDetect (FloatArray x) {
|
alexbrandmeyer@610
|
34 FloatArray conductance, z, set;
|
alexbrandmeyer@609
|
35 FPType a = 0.175;
|
alexbrandmeyer@610
|
36 // This offsets the low-end tail into negative x territory.
|
alexbrandmeyer@610
|
37 // The parameter is adjusted for the book, to make the 20% DC response
|
alexbrandmeyer@610
|
38 // threshold at 0.1.
|
alexbrandmeyer@609
|
39 z = x + a;
|
alexbrandmeyer@610
|
40 // Zero is the final answer for many points.
|
alexbrandmeyer@610
|
41 conductance = (z < 0).select(0.0, (z * z * z) / (z * z * z + z * z + 0.1));
|
alexbrandmeyer@609
|
42 return conductance;
|
alexbrandmeyer@609
|
43 } |