/*

    Decimation filter for rate 3
    Copyright (C) 2002 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 lDec3hpFilterLen = 135l;

static const float fDec3hpFilterGain = 1.0f;
static const float fpDec3hpFilterCoeffs[] = {
    -8.90407003777693E-6,
    -2.39712160384975E-5,
    5.50659581088717E-5,
    -4.22775048017312E-5,
    -2.83191458311615E-5,
    0.000108903818232107,
    -0.000113937982820177,
    -3.76828195429493E-19,
    0.000166014853939831,
    -0.000232019868055623,
    8.88726873601109E-5,
    0.000197801815411687,
    -0.00039114768941943,
    0.000265631335174088,
    0.000160470693811533,
    -0.000564692681454326,
    0.000546731618990973,
    4.12818861161636E-18,
    -0.000699606945325397,
    0.000925188722402129,
    -0.000337034750578828,
    -0.000716502829311529,
    0.00135841818077136,
    -0.000887349883895657,
    -0.000517111741534807,
    0.00175989364861703,
    -0.00165170523099217,
    -3.3031232207588E-18,
    0.00199807327858904,
    -0.00257606052964677,
    0.000916367549513868,
    0.00190517965375837,
    -0.00353743835064317,
    0.00226604987949144,
    0.00129668183190692,
    -0.00433854532563335,
    0.00400790268006588,
    5.9238566576918E-18,
    -0.0047137236032237,
    0.00600262454313983,
    -0.00211148478874354,
    -0.00434605641560131,
    0.00799852517595324,
    -0.00508499504733116,
    -0.00289145957611425,
    0.0096268516516714,
    -0.00886230954655624,
    -8.71595008786844E-18,
    0.0104011113666489,
    -0.0132674585165401,
    0.00468461132481245,
    0.00970154494018861,
    -0.0180125907369438,
    0.0115881266836482,
    0.00669195231326806,
    -0.0227233273504393,
    0.0214433083537073,
    1.08761767816363E-17,
    -0.0269811976014246,
    0.0361251578508093,
    -0.0135608894067189,
    -0.0303772026926092,
    0.0625108539005657,
    -0.0462274517209877,
    -0.0325679680188158,
    0.150892617697202,
    -0.257268248990583,
    0.29992447282952,
    -0.257268248990583,
    0.150892617697202,
    -0.0325679680188158,
    -0.0462274517209877,
    0.0625108539005657,
    -0.0303772026926092,
    -0.0135608894067189,
    0.0361251578508093,
    -0.0269811976014246,
    1.08761767816363E-17,
    0.0214433083537073,
    -0.0227233273504393,
    0.00669195231326806,
    0.0115881266836482,
    -0.0180125907369438,
    0.00970154494018861,
    0.00468461132481245,
    -0.0132674585165401,
    0.0104011113666489,
    -8.71595008786844E-18,
    -0.00886230954655624,
    0.0096268516516714,
    -0.00289145957611425,
    -0.00508499504733116,
    0.00799852517595324,
    -0.00434605641560131,
    -0.00211148478874354,
    0.00600262454313983,
    -0.0047137236032237,
    5.9238566576918E-18,
    0.00400790268006588,
    -0.00433854532563335,
    0.00129668183190692,
    0.00226604987949144,
    -0.00353743835064317,
    0.00190517965375837,
    0.000916367549513868,
    -0.00257606052964677,
    0.00199807327858904,
    -3.3031232207588E-18,
    -0.00165170523099217,
    0.00175989364861703,
    -0.000517111741534807,
    -0.000887349883895657,
    0.00135841818077136,
    -0.000716502829311529,
    -0.000337034750578828,
    0.000925188722402129,
    -0.000699606945325397,
    4.12818861161636E-18,
    0.000546731618990973,
    -0.000564692681454326,
    0.000160470693811533,
    0.000265631335174088,
    -0.00039114768941943,
    0.000197801815411687,
    8.88726873601109E-5,
    -0.000232019868055623,
    0.000166014853939831,
    -3.76828195429493E-19,
    -0.000113937982820177,
    0.000108903818232107,
    -2.83191458311615E-5,
    -4.22775048017312E-5,
    5.50659581088717E-5,
    -2.39712160384975E-5,
    -8.90407003777693E-6
};


static const double dDec3hpFilterGain = 1.0;
static const double dpDec3hpFilterCoeffs[] = {
    -8.90407003777693E-6,
    -2.39712160384975E-5,
    5.50659581088717E-5,
    -4.22775048017312E-5,
    -2.83191458311615E-5,
    0.000108903818232107,
    -0.000113937982820177,
    -3.76828195429493E-19,
    0.000166014853939831,
    -0.000232019868055623,
    8.88726873601109E-5,
    0.000197801815411687,
    -0.00039114768941943,
    0.000265631335174088,
    0.000160470693811533,
    -0.000564692681454326,
    0.000546731618990973,
    4.12818861161636E-18,
    -0.000699606945325397,
    0.000925188722402129,
    -0.000337034750578828,
    -0.000716502829311529,
    0.00135841818077136,
    -0.000887349883895657,
    -0.000517111741534807,
    0.00175989364861703,
    -0.00165170523099217,
    -3.3031232207588E-18,
    0.00199807327858904,
    -0.00257606052964677,
    0.000916367549513868,
    0.00190517965375837,
    -0.00353743835064317,
    0.00226604987949144,
    0.00129668183190692,
    -0.00433854532563335,
    0.00400790268006588,
    5.9238566576918E-18,
    -0.0047137236032237,
    0.00600262454313983,
    -0.00211148478874354,
    -0.00434605641560131,
    0.00799852517595324,
    -0.00508499504733116,
    -0.00289145957611425,
    0.0096268516516714,
    -0.00886230954655624,
    -8.71595008786844E-18,
    0.0104011113666489,
    -0.0132674585165401,
    0.00468461132481245,
    0.00970154494018861,
    -0.0180125907369438,
    0.0115881266836482,
    0.00669195231326806,
    -0.0227233273504393,
    0.0214433083537073,
    1.08761767816363E-17,
    -0.0269811976014246,
    0.0361251578508093,
    -0.0135608894067189,
    -0.0303772026926092,
    0.0625108539005657,
    -0.0462274517209877,
    -0.0325679680188158,
    0.150892617697202,
    -0.257268248990583,
    0.29992447282952,
    -0.257268248990583,
    0.150892617697202,
    -0.0325679680188158,
    -0.0462274517209877,
    0.0625108539005657,
    -0.0303772026926092,
    -0.0135608894067189,
    0.0361251578508093,
    -0.0269811976014246,
    1.08761767816363E-17,
    0.0214433083537073,
    -0.0227233273504393,
    0.00669195231326806,
    0.0115881266836482,
    -0.0180125907369438,
    0.00970154494018861,
    0.00468461132481245,
    -0.0132674585165401,
    0.0104011113666489,
    -8.71595008786844E-18,
    -0.00886230954655624,
    0.0096268516516714,
    -0.00289145957611425,
    -0.00508499504733116,
    0.00799852517595324,
    -0.00434605641560131,
    -0.00211148478874354,
    0.00600262454313983,
    -0.0047137236032237,
    5.9238566576918E-18,
    0.00400790268006588,
    -0.00433854532563335,
    0.00129668183190692,
    0.00226604987949144,
    -0.00353743835064317,
    0.00190517965375837,
    0.000916367549513868,
    -0.00257606052964677,
    0.00199807327858904,
    -3.3031232207588E-18,
    -0.00165170523099217,
    0.00175989364861703,
    -0.000517111741534807,
    -0.000887349883895657,
    0.00135841818077136,
    -0.000716502829311529,
    -0.000337034750578828,
    0.000925188722402129,
    -0.000699606945325397,
    4.12818861161636E-18,
    0.000546731618990973,
    -0.000564692681454326,
    0.000160470693811533,
    0.000265631335174088,
    -0.00039114768941943,
    0.000197801815411687,
    8.88726873601109E-5,
    -0.000232019868055623,
    0.000166014853939831,
    -3.76828195429493E-19,
    -0.000113937982820177,
    0.000108903818232107,
    -2.83191458311615E-5,
    -4.22775048017312E-5,
    5.50659581088717E-5,
    -2.39712160384975E-5,
    -8.90407003777693E-6
};