annotate branches/carfac_cpp/src/CARFAC.cpp @ 559:89b1fe5de60f

Simplify AGC_Step, moving multi-aural cross coupling to new function CARFAC_Cross_Couple
author dicklyon@google.com
date Tue, 10 Apr 2012 05:40:18 +0000
parents 0fde611fcd10
children 9c4c3675c3f8
rev   line source
Ulf@546 1 #include <cmath>
Ulf@546 2
Ulf@538 3 #include "CARFAC.h"
Ulf@538 4 #include "CAR.h"
Ulf@538 5 #include "IHC.h"
Ulf@538 6 #include "AGC.h"
Ulf@538 7
Ulf@545 8 #include "CARFAC_common.h"
Ulf@538 9
Ulf@544 10 CARFAC::CARFAC(int fs = kDefaultFs,
Ulf@544 11 CAR_parameters* car_params = new CAR_parameters(),
Ulf@544 12 IHC_parameters* ihc_params = new IHC_parameters(),
Ulf@555 13 AGC_parameters* agc_params = new AGC_parameters()) : n_ears_(0) {
Ulf@538 14
Ulf@545 15 // Design is to take ownership. Preferences? Make copies, call by value, etc?
Ulf@544 16 car_params_ = car_params;
Ulf@544 17 ihc_params_ = ihc_params;
Ulf@544 18 agc_params_ = agc_params;
Ulf@538 19
Ulf@545 20 float pole_hz = car_params->first_pole_theta_* fs / (2*kPi);
Ulf@545 21 while (pole_hz > car_params->min_pole_hz_){
Ulf@547 22 pole_freqs_.push_back(pole_hz); // TODO: STL specific
Ulf@545 23 pole_hz = pole_hz - car_params->erb_per_step_ *
Ulf@555 24 ERB_Hz(pole_hz, car_params->erb_break_freq_,
Ulf@555 25 car_params->erb_q_);
Ulf@545 26 }
Ulf@547 27 n_ch_ = pole_freqs_.size();
Ulf@538 28
Ulf@546 29 max_channels_per_octave_ = log(2) / log(pole_freqs_[0]/pole_freqs_[1]);
Ulf@546 30
Ulf@551 31 //TODO: pass const references?
Ulf@545 32 car_coeffs_ = new CAR_coefficients(car_params_, fs_, pole_freqs_);
Ulf@545 33 ihc_coeffs_ = new IHC_coefficients(ihc_params_, fs_, n_ch_);
Ulf@545 34 agc_coeffs_ = new AGC_coefficients(agc_params_, fs_, n_ch_);
Ulf@542 35
Ulf@545 36 }
Ulf@545 37
Ulf@545 38 float CARFAC::ERB_Hz(float cf_hz, float erb_break_freq, float erb_q){
Ulf@545 39 return (erb_break_freq + cf_hz) / erb_q;
Ulf@538 40 }
Ulf@538 41
Ulf@538 42 CARFAC::~CARFAC() {
Ulf@544 43 delete car_coeffs_;
Ulf@544 44 delete ihc_coeffs_;
Ulf@544 45 delete agc_coeffs_;
Ulf@539 46
Ulf@551 47 //TODO: as the current design takes ownership OR creates news params,
Ulf@555 48 //deletion is a ambiguos. Revise this design?
Ulf@551 49
Ulf@544 50 //delete car_params_;
Ulf@544 51 //delete ihc_params_;
Ulf@544 52 //delete agc_params_;
Ulf@538 53 }