dec2hpfilter3.h

各种工程计算的库函数

/*

    Decimation filter for rate 2
    Copyright (C) 2001 Jussi Laako

    This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
    the Free Software Foundation; either version 2 of the License, or
    (at your option) any later version.

    This program is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    GNU General Public License for more details.

    You should have received a copy of the GNU General Public License
    along with this program; if not, write to the Free Software
    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA

*/


#ifdef _MSC_VER
#pragma warning(disable:4305)
#endif


static const long lDec2hpFilterLen = 247l;

static const float fDec2hpFilterGain =  1.0f;
static const float fpDec2hpFilterCoeffs[] = {
    -1.2804733243827E-6,
    -2.9311369385741E-7,
    2.53249025688051E-6,
    5.87446804908545E-20,
    -4.24363822330631E-6,
    8.34761264394128E-7,
    6.40264401548776E-6,
    -2.4781755636178E-6,
    -8.92452902649842E-6,
    5.23245084857431E-6,
    1.16280423064549E-5,
    -9.41580245932199E-6,
    -1.42148135238857E-5,
    1.53349188041444E-5,
    1.62526585402089E-5,
    -2.32491239036176E-5,
    -1.71657305381101E-5,
    3.33269859067963E-5,
    1.62343061127136E-5,
    -4.55969273244664E-5,
    -1.26068897145041E-5,
    5.98942472669175E-5,
    5.32698190506694E-6,
    -7.58078115003274E-5,
    6.62372943956109E-6,
    9.26304372392748E-5,
    -2.42648310184814E-5,
    -0.00010931762609646,
    4.85394412676545E-5,
    0.000124459710119153,
    -8.02206646389165E-5,
    -0.000136272606877116,
    0.000119805041130881,
    0.000142612174972699,
    -0.000167397247265892,
    -0.000141016581590475,
    0.000222591734732514,
    0.000128780119692872,
    -0.000284358294572597,
    -0.000103060549438467,
    0.000350939602902619,
    6.10203185590173E-5,
    -0.000419769535344693,
    -5.33938608772E-18,
    0.000487421337300591,
    -8.22799404409351E-5,
    -0.00054959452813264,
    0.000187495256490889,
    0.00060114864501745,
    -0.000316480411927153,
    -0.000636190572355563,
    0.000468988055689607,
    0.000648220265538833,
    -0.000643457865927795,
    -0.000630337211838294,
    0.000836808447971263,
    0.000575507063244172,
    -0.00104426666112459,
    -0.00047688465076946,
    0.00125924871803553,
    0.000328186205137542,
    -0.00147330657002616,
    -0.000124100250500701,
    0.00167615142405817,
    -0.000139276489236011,
    -0.00185576373965707,
    0.000463994513327804,
    0.00199859578425097,
    -0.000849816660491482,
    -0.00208986889013664,
    0.00129381244406844,
    0.00211396311047694,
    -0.00179000125100068,
    -0.00205489221233474,
    0.00232906297441497,
    0.00189685210243005,
    -0.00289813225804472,
    -0.00162482610935365,
    0.00348068872868437,
    0.00122522630708168,
    -0.0040565503013975,
    -0.000686546516352627,
    0.00460196977069368,
    2.85492971360413E-17,
    -0.00508982629848857,
    0.000839886622265156,
    0.00548989278085087,
    -0.00183475192156439,
    -0.00576914683455544,
    0.00298197818315692,
    0.00589207616004681,
    -0.00427439484891828,
    -0.0058209061721965,
    0.00570012790155718,
    0.00551564503958698,
    -0.00724261106430222,
    -0.00493379109069586,
    0.00888076850789329,
    0.00402946544644425,
    -0.0105893717999526,
    -0.00275159008384533,
    0.0123395664102728,
    0.00104046940350764,
    -0.0140995555462686,
    0.00117837561490531,
    0.015835421802141,
    -0.00400531981102654,
    -0.017512060429684,
    0.00758720065238807,
    0.0190941923248336,
    -0.0121573582383395,
    -0.0205474203797482,
    0.0181197052919545,
    0.0218392899265422,
    -0.0262450118567321,
    -0.022940312775468,
    0.0382034237473415,
    0.0238249149245045,
    -0.0583741019978096,
    -0.0244722703967487,
    0.102890998487404,
    0.0248669877632919,
    -0.317228357030243,
    0.474992809655473,
    -0.317228357030243,
    0.0248669877632919,
    0.102890998487404,
    -0.0244722703967487,
    -0.0583741019978096,
    0.0238249149245045,
    0.0382034237473415,
    -0.022940312775468,
    -0.0262450118567321,
    0.0218392899265422,
    0.0181197052919545,
    -0.0205474203797482,
    -0.0121573582383395,
    0.0190941923248336,
    0.00758720065238807,
    -0.017512060429684,
    -0.00400531981102654,
    0.015835421802141,
    0.00117837561490531,
    -0.0140995555462686,
    0.00104046940350764,
    0.0123395664102728,
    -0.00275159008384533,
    -0.0105893717999526,
    0.00402946544644425,
    0.00888076850789329,
    -0.00493379109069586,
    -0.00724261106430222,
    0.00551564503958698,
    0.00570012790155718,
    -0.0058209061721965,
    -0.00427439484891828,
    0.00589207616004681,
    0.00298197818315692,
    -0.00576914683455544,
    -0.00183475192156439,
    0.00548989278085087,
    0.000839886622265156,
    -0.00508982629848857,
    2.85492971360413E-17,
    0.00460196977069368,
    -0.000686546516352627,
    -0.0040565503013975,
    0.00122522630708168,
    0.00348068872868437,
    -0.00162482610935365,
    -0.00289813225804472,
    0.00189685210243005,
    0.00232906297441497,
    -0.00205489221233474,
    -0.00179000125100068,
    0.00211396311047694,
    0.00129381244406844,
    -0.00208986889013664,
    -0.000849816660491482,
    0.00199859578425097,
    0.000463994513327804,
    -0.00185576373965707,
    -0.000139276489236011,
    0.00167615142405817,
    -0.000124100250500701,
    -0.00147330657002616,
    0.000328186205137542,
    0.00125924871803553,
    -0.00047688465076946,
    -0.00104426666112459,
    0.000575507063244172,
    0.000836808447971263,
    -0.000630337211838294,
    -0.000643457865927795,
    0.000648220265538833,
    0.000468988055689607,
    -0.000636190572355563,
    -0.000316480411927153,
    0.00060114864501745,
    0.000187495256490889,
    -0.00054959452813264,
    -8.22799404409351E-5,
    0.000487421337300591,
    -5.33938608772E-18,
    -0.000419769535344693,
    6.10203185590173E-5,
    0.000350939602902619,
    -0.000103060549438467,
    -0.000284358294572597,
    0.000128780119692872,
    0.000222591734732514,
    -0.000141016581590475,
    -0.000167397247265892,
    0.000142612174972699,
    0.000119805041130881,
    -0.000136272606877116,
    -8.02206646389165E-5,
    0.000124459710119153,
    4.85394412676545E-5,
    -0.00010931762609646,
    -2.42648310184814E-5,
    9.26304372392748E-5,
    6.62372943956109E-6,
    -7.58078115003274E-5,
    5.32698190506694E-6,
    5.98942472669175E-5,
    -1.26068897145041E-5,
    -4.55969273244664E-5,
    1.62343061127136E-5,
    3.33269859067963E-5,
    -1.71657305381101E-5,
    -2.32491239036176E-5,
    1.62526585402089E-5,
    1.53349188041444E-5,
    -1.42148135238857E-5,
    -9.41580245932199E-6,
    1.16280423064549E-5,
    5.23245084857431E-6,
    -8.92452902649842E-6,
    -2.4781755636178E-6,
    6.40264401548776E-6,
    8.34761264394128E-7,
    -4.24363822330631E-6,
    5.87446804908545E-20,
    2.53249025688051E-6,
    -2.9311369385741E-7,
    -1.2804733243827E-6
};


static const double dDec2hpFilterGain =  1.0;
static const double dpDec2hpFilterCoeffs[] = {
    -1.2804733243827E-6,
    -2.9311369385741E-7,
    2.53249025688051E-6,
    5.87446804908545E-20,
    -4.24363822330631E-6,
    8.34761264394128E-7,
    6.40264401548776E-6,
    -2.4781755636178E-6,
    -8.92452902649842E-6,
    5.23245084857431E-6,
    1.16280423064549E-5,
    -9.41580245932199E-6,
    -1.42148135238857E-5,
    1.53349188041444E-5,
    1.62526585402089E-5,
    -2.32491239036176E-5,
    -1.71657305381101E-5,
    3.33269859067963E-5,
    1.62343061127136E-5,
    -4.55969273244664E-5,
    -1.26068897145041E-5,
    5.98942472669175E-5,
    5.32698190506694E-6,
    -7.58078115003274E-5,
    6.62372943956109E-6,
    9.26304372392748E-5,
    -2.42648310184814E-5,
    -0.00010931762609646,
    4.85394412676545E-5,
    0.000124459710119153,
    -8.02206646389165E-5,
    -0.000136272606877116,
    0.000119805041130881,
    0.000142612174972699,
    -0.000167397247265892,
    -0.000141016581590475,
    0.000222591734732514,
    0.000128780119692872,
    -0.000284358294572597,
    -0.000103060549438467,
    0.000350939602902619,
    6.10203185590173E-5,
    -0.000419769535344693,
    -5.33938608772E-18,
    0.000487421337300591,
    -8.22799404409351E-5,
    -0.00054959452813264,
    0.000187495256490889,
    0.00060114864501745,
    -0.000316480411927153,
    -0.000636190572355563,
    0.000468988055689607,
    0.000648220265538833,
    -0.000643457865927795,
    -0.000630337211838294,
    0.000836808447971263,
    0.000575507063244172,
    -0.00104426666112459,
    -0.00047688465076946,
    0.00125924871803553,
    0.000328186205137542,
    -0.00147330657002616,
    -0.000124100250500701,
    0.00167615142405817,
    -0.000139276489236011,
    -0.00185576373965707,
    0.000463994513327804,
    0.00199859578425097,
    -0.000849816660491482,
    -0.00208986889013664,
    0.00129381244406844,
    0.00211396311047694,
    -0.00179000125100068,
    -0.00205489221233474,
    0.00232906297441497,
    0.00189685210243005,
    -0.00289813225804472,
    -0.00162482610935365,
    0.00348068872868437,
    0.00122522630708168,
    -0.0040565503013975,
    -0.000686546516352627,
    0.00460196977069368,
    2.85492971360413E-17,
    -0.00508982629848857,
    0.000839886622265156,
    0.00548989278085087,
    -0.00183475192156439,
    -0.00576914683455544,
    0.00298197818315692,
    0.00589207616004681,
    -0.00427439484891828,
    -0.0058209061721965,
    0.00570012790155718,
    0.00551564503958698,
    -0.00724261106430222,
    -0.00493379109069586,
    0.00888076850789329,
    0.00402946544644425,
    -0.0105893717999526,
    -0.00275159008384533,
    0.0123395664102728,
    0.00104046940350764,
    -0.0140995555462686,
    0.00117837561490531,
    0.015835421802141,
    -0.00400531981102654,
    -0.017512060429684,
    0.00758720065238807,
    0.0190941923248336,
    -0.0121573582383395,
    -0.0205474203797482,
    0.0181197052919545,
    0.0218392899265422,
    -0.0262450118567321,
    -0.022940312775468,
    0.0382034237473415,
    0.0238249149245045,
    -0.0583741019978096,
    -0.0244722703967487,
    0.102890998487404,
    0.0248669877632919,
    -0.317228357030243,
    0.474992809655473,
    -0.317228357030243,
    0.0248669877632919,
    0.102890998487404,
    -0.0244722703967487,
    -0.0583741019978096,
    0.0238249149245045,
    0.0382034237473415,
    -0.022940312775468,
    -0.0262450118567321,
    0.0218392899265422,
    0.0181197052919545,
    -0.0205474203797482,
    -0.0121573582383395,
    0.0190941923248336,
    0.00758720065238807,
    -0.017512060429684,
    -0.00400531981102654,
    0.015835421802141,
    0.00117837561490531,
    -0.0140995555462686,
    0.00104046940350764,
    0.0123395664102728,
    -0.00275159008384533,
    -0.0105893717999526,
    0.00402946544644425,
    0.00888076850789329,
    -0.00493379109069586,
    -0.00724261106430222,
    0.00551564503958698,
    0.00570012790155718,
    -0.0058209061721965,
    -0.00427439484891828,
    0.00589207616004681,
    0.00298197818315692,
    -0.00576914683455544,
    -0.00183475192156439,
    0.00548989278085087,
    0.000839886622265156,
    -0.00508982629848857,
    2.85492971360413E-17,
    0.00460196977069368,
    -0.000686546516352627,
    -0.0040565503013975,
    0.00122522630708168,
    0.00348068872868437,
    -0.00162482610935365,
    -0.00289813225804472,
    0.00189685210243005,
    0.00232906297441497,
    -0.00205489221233474,
    -0.00179000125100068,
    0.00211396311047694,
    0.00129381244406844,
    -0.00208986889013664,
    -0.000849816660491482,
    0.00199859578425097,
    0.000463994513327804,
    -0.00185576373965707,
    -0.000139276489236011,
    0.00167615142405817,
    -0.000124100250500701,
    -0.00147330657002616,
    0.000328186205137542,
    0.00125924871803553,
    -0.00047688465076946,
    -0.00104426666112459,
    0.000575507063244172,
    0.000836808447971263,
    -0.000630337211838294,
    -0.000643457865927795,
    0.000648220265538833,
    0.000468988055689607,
    -0.000636190572355563,
    -0.000316480411927153,
    0.00060114864501745,
    0.000187495256490889,
    -0.00054959452813264,
    -8.22799404409351E-5,
    0.000487421337300591,
    -5.33938608772E-18,
    -0.000419769535344693,
    6.10203185590173E-5,
    0.000350939602902619,
    -0.000103060549438467,
    -0.000284358294572597,
    0.000128780119692872,
    0.000222591734732514,
    -0.000141016581590475,
    -0.000167397247265892,
    0.000142612174972699,
    0.000119805041130881,
    -0.000136272606877116,
    -8.02206646389165E-5,
    0.000124459710119153,
    4.85394412676545E-5,
    -0.00010931762609646,
    -2.42648310184814E-5,
    9.26304372392748E-5,
    6.62372943956109E-6,
    -7.58078115003274E-5,
    5.32698190506694E-6,
    5.98942472669175E-5,
    -1.26068897145041E-5,
    -4.55969273244664E-5,
    1.62343061127136E-5,
    3.33269859067963E-5,
    -1.71657305381101E-5,
    -2.32491239036176E-5,
    1.62526585402089E-5,
    1.53349188041444E-5,
    -1.42148135238857E-5,
    -9.41580245932199E-6,
    1.16280423064549E-5,
    5.23245084857431E-6,
    -8.92452902649842E-6,
    -2.4781755636178E-6,
    6.40264401548776E-6,
    8.34761264394128E-7,
    -4.24363822330631E-6,
    5.87446804908545E-20,
    2.53249025688051E-6,
    -2.9311369385741E-7,
    -1.2804733243827E-6
};