dec4filter.h

各种工程计算的库函数

/*

    Decimation filter for rate 4
    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 1.1250000000e-01 5.0000000000e-02 257 -w -l

*/


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


static const long lDec4FilterLen = 257l;

static const float fDec4FilterGain = 1.0f / 4.444494814e+00f;
static const float fpDec4FilterCoeffs[] = {
    +0.0000133535, +0.0000268865, +0.0000293379, +0.0000147680,
    -0.0000138504, -0.0000438985, -0.0000580624, -0.0000433669,
    +0.0000000205, +0.0000553777, +0.0000946891, +0.0000916909,
    +0.0000371824, -0.0000515205, -0.0001337503, -0.0001625279,
    -0.0001092163, +0.0000162322, +0.0001617929, +0.0002524640,
    +0.0002264404, +0.0000720806, -0.0001546807, -0.0003463882,
    -0.0003918946, -0.0002362790, +0.0000776355, +0.0004127508,
    +0.0005932985, +0.0004924613, +0.0001103777, -0.0004018301,
    -0.0007952364, -0.0008389227, -0.0004470878, +0.0002492319,
    +0.0009342758, +0.0012441982, +0.0009526306, +0.0001138610,
    -0.0009199859, -0.0016373932, -0.0016125657, -0.0007435399,
    +0.0006442820, +0.0019045833, +0.0023617320, +0.0016607979,
    -0.0000001659, -0.0018948134, -0.0030735073, -0.0028275427,
    -0.0010910850, +0.0014380157, +0.0035592234, +0.0041261738,
    +0.0026475640, -0.0003750718, -0.0035815820, -0.0053486621,
    -0.0045946628, -0.0014024237, +0.0028839201, +0.0062006620,
    +0.0067401711, +0.0039078785, -0.0012343049, -0.0063244750,
    -0.0087636998, -0.0070182765, -0.0015197960, +0.0053418100,
    +0.0102263648, +0.0104440442, +0.0053934708, -0.0029136827,
    -0.0106039808, -0.0137181052, -0.0102120817, -0.0011888636,
    +0.0093431748, +0.0162096769, +0.0155741499, +0.0070124268,
    -0.0059354304, -0.0171643135, -0.0208369243, -0.0143577965,
    -0.0000000624, +0.0157663087, +0.0251278342, +0.0227347635,
    +0.0086369145, -0.0112132363, -0.0273779920, -0.0313402656,
    -0.0198787684, +0.0027851794, +0.0263632885, +0.0390562149,
    +0.0333255576, +0.0101184069, -0.0207210417, -0.0444468071,
    -0.0482777278, -0.0280194522, +0.0088736843, +0.0456993764,
    +0.0637820852, +0.0515741849, +0.0113081193, -0.0403548930,
    -0.0787165688, -0.0822229577, -0.0436163971, +0.0243216748,
    +0.0919048333, +0.1242817821, +0.0974942607, +0.0120791347,
    -0.1022462339, -0.1940573279, -0.2081513557, -0.1075843183,
    +0.1088435872, +0.4011508722, +0.6979291626, +0.9185454335,
    +1.0000004779, +0.9185454335, +0.6979291626, +0.4011508722,
    +0.1088435872, -0.1075843183, -0.2081513557, -0.1940573279,
    -0.1022462339, +0.0120791347, +0.0974942607, +0.1242817821,
    +0.0919048333, +0.0243216748, -0.0436163971, -0.0822229577,
    -0.0787165688, -0.0403548930, +0.0113081193, +0.0515741849,
    +0.0637820852, +0.0456993764, +0.0088736843, -0.0280194522,
    -0.0482777278, -0.0444468071, -0.0207210417, +0.0101184069,
    +0.0333255576, +0.0390562149, +0.0263632885, +0.0027851794,
    -0.0198787684, -0.0313402656, -0.0273779920, -0.0112132363,
    +0.0086369145, +0.0227347635, +0.0251278342, +0.0157663087,
    -0.0000000624, -0.0143577965, -0.0208369243, -0.0171643135,
    -0.0059354304, +0.0070124268, +0.0155741499, +0.0162096769,
    +0.0093431748, -0.0011888636, -0.0102120817, -0.0137181052,
    -0.0106039808, -0.0029136827, +0.0053934708, +0.0104440442,
    +0.0102263648, +0.0053418100, -0.0015197960, -0.0070182765,
    -0.0087636998, -0.0063244750, -0.0012343049, +0.0039078785,
    +0.0067401711, +0.0062006620, +0.0028839201, -0.0014024237,
    -0.0045946628, -0.0053486621, -0.0035815820, -0.0003750718,
    +0.0026475640, +0.0041261738, +0.0035592234, +0.0014380157,
    -0.0010910850, -0.0028275427, -0.0030735073, -0.0018948134,
    -0.0000001659, +0.0016607979, +0.0023617320, +0.0019045833,
    +0.0006442820, -0.0007435399, -0.0016125657, -0.0016373932,
    -0.0009199859, +0.0001138610, +0.0009526306, +0.0012441982,
    +0.0009342758, +0.0002492319, -0.0004470878, -0.0008389227,
    -0.0007952364, -0.0004018301, +0.0001103777, +0.0004924613,
    +0.0005932985, +0.0004127508, +0.0000776355, -0.0002362790,
    -0.0003918946, -0.0003463882, -0.0001546807, +0.0000720806,
    +0.0002264404, +0.0002524640, +0.0001617929, +0.0000162322,
    -0.0001092163, -0.0001625279, -0.0001337503, -0.0000515205,
    +0.0000371824, +0.0000916909, +0.0000946891, +0.0000553777,
    +0.0000000205, -0.0000433669, -0.0000580624, -0.0000438985,
    -0.0000138504, +0.0000147680, +0.0000293379, +0.0000268865,
    +0.0000133535 };

static const double dDec4FilterGain = 1.0 / 4.444494814e+00;
static const double dpDec4FilterCoeffs[] = {
    +0.0000133535, +0.0000268865, +0.0000293379, +0.0000147680,
    -0.0000138504, -0.0000438985, -0.0000580624, -0.0000433669,
    +0.0000000205, +0.0000553777, +0.0000946891, +0.0000916909,
    +0.0000371824, -0.0000515205, -0.0001337503, -0.0001625279,
    -0.0001092163, +0.0000162322, +0.0001617929, +0.0002524640,
    +0.0002264404, +0.0000720806, -0.0001546807, -0.0003463882,
    -0.0003918946, -0.0002362790, +0.0000776355, +0.0004127508,
    +0.0005932985, +0.0004924613, +0.0001103777, -0.0004018301,
    -0.0007952364, -0.0008389227, -0.0004470878, +0.0002492319,
    +0.0009342758, +0.0012441982, +0.0009526306, +0.0001138610,
    -0.0009199859, -0.0016373932, -0.0016125657, -0.0007435399,
    +0.0006442820, +0.0019045833, +0.0023617320, +0.0016607979,
    -0.0000001659, -0.0018948134, -0.0030735073, -0.0028275427,
    -0.0010910850, +0.0014380157, +0.0035592234, +0.0041261738,
    +0.0026475640, -0.0003750718, -0.0035815820, -0.0053486621,
    -0.0045946628, -0.0014024237, +0.0028839201, +0.0062006620,
    +0.0067401711, +0.0039078785, -0.0012343049, -0.0063244750,
    -0.0087636998, -0.0070182765, -0.0015197960, +0.0053418100,
    +0.0102263648, +0.0104440442, +0.0053934708, -0.0029136827,
    -0.0106039808, -0.0137181052, -0.0102120817, -0.0011888636,
    +0.0093431748, +0.0162096769, +0.0155741499, +0.0070124268,
    -0.0059354304, -0.0171643135, -0.0208369243, -0.0143577965,
    -0.0000000624, +0.0157663087, +0.0251278342, +0.0227347635,
    +0.0086369145, -0.0112132363, -0.0273779920, -0.0313402656,
    -0.0198787684, +0.0027851794, +0.0263632885, +0.0390562149,
    +0.0333255576, +0.0101184069, -0.0207210417, -0.0444468071,
    -0.0482777278, -0.0280194522, +0.0088736843, +0.0456993764,
    +0.0637820852, +0.0515741849, +0.0113081193, -0.0403548930,
    -0.0787165688, -0.0822229577, -0.0436163971, +0.0243216748,
    +0.0919048333, +0.1242817821, +0.0974942607, +0.0120791347,
    -0.1022462339, -0.1940573279, -0.2081513557, -0.1075843183,
    +0.1088435872, +0.4011508722, +0.6979291626, +0.9185454335,
    +1.0000004779, +0.9185454335, +0.6979291626, +0.4011508722,
    +0.1088435872, -0.1075843183, -0.2081513557, -0.1940573279,
    -0.1022462339, +0.0120791347, +0.0974942607, +0.1242817821,
    +0.0919048333, +0.0243216748, -0.0436163971, -0.0822229577,
    -0.0787165688, -0.0403548930, +0.0113081193, +0.0515741849,
    +0.0637820852, +0.0456993764, +0.0088736843, -0.0280194522,
    -0.0482777278, -0.0444468071, -0.0207210417, +0.0101184069,
    +0.0333255576, +0.0390562149, +0.0263632885, +0.0027851794,
    -0.0198787684, -0.0313402656, -0.0273779920, -0.0112132363,
    +0.0086369145, +0.0227347635, +0.0251278342, +0.0157663087,
    -0.0000000624, -0.0143577965, -0.0208369243, -0.0171643135,
    -0.0059354304, +0.0070124268, +0.0155741499, +0.0162096769,
    +0.0093431748, -0.0011888636, -0.0102120817, -0.0137181052,
    -0.0106039808, -0.0029136827, +0.0053934708, +0.0104440442,
    +0.0102263648, +0.0053418100, -0.0015197960, -0.0070182765,
    -0.0087636998, -0.0063244750, -0.0012343049, +0.0039078785,
    +0.0067401711, +0.0062006620, +0.0028839201, -0.0014024237,
    -0.0045946628, -0.0053486621, -0.0035815820, -0.0003750718,
    +0.0026475640, +0.0041261738, +0.0035592234, +0.0014380157,
    -0.0010910850, -0.0028275427, -0.0030735073, -0.0018948134,
    -0.0000001659, +0.0016607979, +0.0023617320, +0.0019045833,
    +0.0006442820, -0.0007435399, -0.0016125657, -0.0016373932,
    -0.0009199859, +0.0001138610, +0.0009526306, +0.0012441982,
    +0.0009342758, +0.0002492319, -0.0004470878, -0.0008389227,
    -0.0007952364, -0.0004018301, +0.0001103777, +0.0004924613,
    +0.0005932985, +0.0004127508, +0.0000776355, -0.0002362790,
    -0.0003918946, -0.0003463882, -0.0001546807, +0.0000720806,
    +0.0002264404, +0.0002524640, +0.0001617929, +0.0000162322,
    -0.0001092163, -0.0001625279, -0.0001337503, -0.0000515205,
    +0.0000371824, +0.0000916909, +0.0000946891, +0.0000553777,
    +0.0000000205, -0.0000433669, -0.0000580624, -0.0000438985,
    -0.0000138504, +0.0000147680, +0.0000293379, +0.0000268865,
    +0.0000133535 };