dec8filter.h

各种工程计算的库函数

/*

    Decimation filter for rate 8
    Copyright (C) 1999-2000 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

    Digital filter designed by mkfilter/mkshape/gencode   A.J. Fisher
    Command line: /www/usr/fisher/helpers/mkshape -c 5.6250000000e-02 5.0000000000e-02 513 -w -l

*/


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


static const long lDec8FilterLen = 513l;

static const float fDec8FilterGain = 1.0f / 8.888980722e+00f;
static const float fpDec8FilterCoeffs[] = {
    +0.0000135652, +0.0000211166, +0.0000270694, +0.0000301672,
    +0.0000294082, +0.0000242380, +0.0000146956, +0.0000014877,
    -0.0000140291, -0.0000299638, -0.0000440989, -0.0000541710,
    -0.0000581910, -0.0000547645, -0.0000433645, -0.0000245151,
    +0.0000001518, +0.0000279884, +0.0000555759, +0.0000791061,
    +0.0000948615, +0.0000997404, +0.0000917572, +0.0000704478,
    +0.0000371121, -0.0000051580, -0.0000516939, -0.0000967061,
    -0.0001339456, -0.0001575037, -0.0001626543, -0.0001466299,
    -0.0001092161, -0.0000530633, +0.0000163570, +0.0000911860,
    +0.0001619826, +0.0002188308, +0.0002526302, +0.0002564126,
    +0.0002265082, +0.0001633863, +0.0000720229, -0.0000383059,
    -0.0001548324, -0.0002626618, -0.0003465613, -0.0003929749,
    -0.0003920114, -0.0003391338, -0.0002362926, -0.0000922936,
    +0.0000777219, +0.0002536996, +0.0004128905, +0.0005326404,
    +0.0005934272, +0.0005817589, +0.0004925285, +0.0003304600,
    +0.0001103671, -0.0001439148, -0.0004019000, -0.0006299212,
    -0.0007953283, -0.0008709150, -0.0008390020, -0.0006945975,
    -0.0004471367, -0.0001204452, +0.0002492145, +0.0006169127,
    +0.0009342841, +0.0011556418, +0.0012442310, +0.0011777999,
    +0.0009526924, +0.0005858007, +0.0001139518, -0.0004093916,
    -0.0009198838, -0.0013499284, -0.0016373198, -0.0017338256,
    -0.0016125702, -0.0012731524, -0.0007436525, -0.0000790393,
    +0.0006440787, +0.0013359248, +0.0019043634, +0.0022667891,
    +0.0023616029, +0.0021577389, +0.0016608496, +0.0009151074,
    +0.0000000844, -0.0009772147, -0.0018944471, -0.0026288464,
    -0.0030731863, -0.0031507730, -0.0028274375, -0.0021187623,
    -0.0010912874, +0.0001428489, +0.0014375555, +0.0026295964,
    +0.0035586946, +0.0040885128, +0.0041258297, +0.0036352998,
    +0.0026476015, +0.0012595075, -0.0003746212, -0.0020593306,
    -0.0035808894, -0.0047338380, -0.0053480403, -0.0053127548,
    -0.0045944252, -0.0032455158, -0.0014027273, +0.0007257860,
    +0.0028831699, +0.0047942147, +0.0061997890, +0.0068911366,
    +0.0067395893, +0.0057176000, +0.0039078952, +0.0014989105,
    -0.0012336500, -0.0039575069, -0.0063234503, -0.0080093045,
    -0.0087627734, -0.0084375821, -0.0070179013, -0.0046272896,
    -0.0015201874, +0.0019438546, +0.0053407941, +0.0082331088,
    +0.0102251757, +0.0110161240, +0.0104432411, +0.0085098737,
    +0.0053934557, +0.0014316289, -0.0029128665, -0.0071050887,
    -0.0106026861, -0.0129248684, -0.0137169275, -0.0128018216,
    -0.0102115827, -0.0061935354, -0.0011893015, +0.0042120509,
    +0.0093419787, +0.0135338894, +0.0162082657, +0.0169507939,
    +0.0155731818, +0.0121480733, +0.0070123652, +0.0007369956,
    -0.0059345406, -0.0121725971, -0.0171628741, -0.0202107940,
    -0.0208356004, -0.0188417157, -0.0143572057, -0.0078329080,
    -0.0000004837, +0.0082072081, +0.0157650676, +0.0216815829,
    +0.0251263479, +0.0255431669, +0.0227337194, +0.0168997944,
    +0.0086367915, -0.0011229803, -0.0112123897, -0.0203661744,
    -0.0273765761, -0.0312491317, -0.0313389375, -0.0274492431,
    -0.0198781335, -0.0094049315, +0.0027848464, +0.0152294675,
    +0.0263621628, +0.0347039416, +0.0390548294, +0.0386594003,
    +0.0333245472, +0.0234723511, +0.0101182142, -0.0052267130,
    -0.0207203616, -0.0344045749, -0.0444455961, -0.0493714678,
    -0.0482765513, -0.0409659654, -0.0280188321, -0.0107582064,
    +0.0088735036, +0.0285232019, +0.0456985221, +0.0580718196,
    +0.0637809757, +0.0616897423, +0.0515733226, +0.0342021626,
    +0.0113078606, -0.0145714556, -0.0403544844, -0.0627632509,
    -0.0787157255, -0.0857199168, -0.0822220784, -0.0678644194,
    -0.0436158560, -0.0117521827, +0.0243216879, +0.0603968120,
    +0.0919043732, +0.1144353571, +0.1242810938, +0.1189345895,
    +0.0974936493, +0.0609145469, +0.0120788286, -0.0443455635,
    -0.1022461639, -0.1545860507, -0.1940569687, -0.2138041116,
    -0.2081508850, -0.1732489791, -0.1075839163, -0.0122786030,
    +0.1088438050, +0.2494530705, +0.4011508752, +0.5541203678,
    +0.6979289869, +0.8224107742, +0.9185451468, +0.9792481922,
    +1.0000001545, +0.9792481922, +0.9185451468, +0.8224107742,
    +0.6979289869, +0.5541203678, +0.4011508752, +0.2494530705,
    +0.1088438050, -0.0122786030, -0.1075839163, -0.1732489791,
    -0.2081508850, -0.2138041116, -0.1940569687, -0.1545860507,
    -0.1022461639, -0.0443455635, +0.0120788286, +0.0609145469,
    +0.0974936493, +0.1189345895, +0.1242810938, +0.1144353571,
    +0.0919043732, +0.0603968120, +0.0243216879, -0.0117521827,
    -0.0436158560, -0.0678644194, -0.0822220784, -0.0857199168,
    -0.0787157255, -0.0627632509, -0.0403544844, -0.0145714556,
    +0.0113078606, +0.0342021626, +0.0515733226, +0.0616897423,
    +0.0637809757, +0.0580718196, +0.0456985221, +0.0285232019,
    +0.0088735036, -0.0107582064, -0.0280188321, -0.0409659654,
    -0.0482765513, -0.0493714678, -0.0444455961, -0.0344045749,
    -0.0207203616, -0.0052267130, +0.0101182142, +0.0234723511,
    +0.0333245472, +0.0386594003, +0.0390548294, +0.0347039416,
    +0.0263621628, +0.0152294675, +0.0027848464, -0.0094049315,
    -0.0198781335, -0.0274492431, -0.0313389375, -0.0312491317,
    -0.0273765761, -0.0203661744, -0.0112123897, -0.0011229803,
    +0.0086367915, +0.0168997944, +0.0227337194, +0.0255431669,
    +0.0251263479, +0.0216815829, +0.0157650676, +0.0082072081,
    -0.0000004837, -0.0078329080, -0.0143572057, -0.0188417157,
    -0.0208356004, -0.0202107940, -0.0171628741, -0.0121725971,
    -0.0059345406, +0.0007369956, +0.0070123652, +0.0121480733,
    +0.0155731818, +0.0169507939, +0.0162082657, +0.0135338894,
    +0.0093419787, +0.0042120509, -0.0011893015, -0.0061935354,
    -0.0102115827, -0.0128018216, -0.0137169275, -0.0129248684,
    -0.0106026861, -0.0071050887, -0.0029128665, +0.0014316289,
    +0.0053934557, +0.0085098737, +0.0104432411, +0.0110161240,
    +0.0102251757, +0.0082331088, +0.0053407941, +0.0019438546,
    -0.0015201874, -0.0046272896, -0.0070179013, -0.0084375821,
    -0.0087627734, -0.0080093045, -0.0063234503, -0.0039575069,
    -0.0012336500, +0.0014989105, +0.0039078952, +0.0057176000,
    +0.0067395893, +0.0068911366, +0.0061997890, +0.0047942147,
    +0.0028831699, +0.0007257860, -0.0014027273, -0.0032455158,
    -0.0045944252, -0.0053127548, -0.0053480403, -0.0047338380,
    -0.0035808894, -0.0020593306, -0.0003746212, +0.0012595075,
    +0.0026476015, +0.0036352998, +0.0041258297, +0.0040885128,
    +0.0035586946, +0.0026295964, +0.0014375555, +0.0001428489,
    -0.0010912874, -0.0021187623, -0.0028274375, -0.0031507730,
    -0.0030731863, -0.0026288464, -0.0018944471, -0.0009772147,
    +0.0000000844, +0.0009151074, +0.0016608496, +0.0021577389,
    +0.0023616029, +0.0022667891, +0.0019043634, +0.0013359248,
    +0.0006440787, -0.0000790393, -0.0007436525, -0.0012731524,
    -0.0016125702, -0.0017338256, -0.0016373198, -0.0013499284,
    -0.0009198838, -0.0004093916, +0.0001139518, +0.0005858007,
    +0.0009526924, +0.0011777999, +0.0012442310, +0.0011556418,
    +0.0009342841, +0.0006169127, +0.0002492145, -0.0001204452,
    -0.0004471367, -0.0006945975, -0.0008390020, -0.0008709150,
    -0.0007953283, -0.0006299212, -0.0004019000, -0.0001439148,
    +0.0001103671, +0.0003304600, +0.0004925285, +0.0005817589,
    +0.0005934272, +0.0005326404, +0.0004128905, +0.0002536996,