annotate carfac/carfac_common.cc @ 610:01986636257a

Second check-in of Alex Brandmeyer's C++ implementation of CARFAC. Addressed style issues and completed implementation of remaining functions. Still needs proper testing of the output stages against the MATLAB version, and runtime functions need improvements in efficiency.
author alexbrandmeyer
date Thu, 16 May 2013 17:33:23 +0000
parents aefe2ca0674f
children 0fbaf443ec82
rev   line source
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 }