oqfs.h

小波分析程序

static real
  d06doqf[6] = {
    0.125*B,			/*   3.52262918857095330E-02, */
    0.125*(A-M_SQRT2-2.0*B),	/*   8.54412738820266580E-02, */
    0.125*(3.0*M_SQRT2-2.0*A),	/*  -1.35011020010254580E-01, */
    0.125*(2.0*B-3.0*M_SQRT2),	/*  -4.59877502118491540E-01, */
    0.125*(M_SQRT2+2.0*A-B),	/*   8.06891509311092550E-01, */
    -0.125*A			/*  -3.32670552950082630E-01  */
    };
static int
  d06dalpha = 0,
  d06domega = 5;

/******************* Daubechies 8 ********************/

static real
  d08soqf[8] = {
    2.30377813309000010E-01,
    7.14846570553000050E-01, /* Maximum absolute value */
    6.30880767930000030E-01,
    -2.79837694169999990E-02,
    -1.87034811718999990E-01,
    3.08413818359999990E-02,
    3.28830116670000010E-02,
    -1.05974017850000000E-02
    };
static int
  d08salpha = 0,
  d08somega = 7;

static real
  d08doqf[8] = {
    -1.05974017850000000E-02,
    -3.28830116670000010E-02,
    3.08413818359999990E-02,
    1.87034811718999990E-01,
    -2.79837694169999990E-02,
    -6.30880767930000030E-01,
    7.14846570553000050E-01, /* Maximum absolute value */
    -2.30377813309000010E-01
    };
static int
  d08dalpha = 0,
  d08domega = 7;

/******************* Daubechies 10 ********************/

static real
  d10soqf[10] = {
    1.60102397974000000E-01,
    6.03829269797000020E-01,
    7.24308528437999980E-01, /* Maximum absolute value. */
    1.38428145901000000E-01,
    -2.42294887066000000E-01,
    -3.22448695850000020E-02,
    7.75714938400000050E-02,
    -6.24149021300000020E-03,
    -1.25807519990000000E-02,
    3.33572528500000010E-03
    };
static int
  d10salpha = 0,
  d10somega = 9;

static real
  d10doqf[10] = {
    3.33572528500000010E-03,
    1.25807519990000000E-02,
    -6.24149021300000020E-03,
    -7.75714938400000050E-02,
    -3.22448695850000020E-02,
    2.42294887066000000E-01,
    1.38428145901000000E-01,
    -7.24308528437999980E-01, /* Maximum absolute value. */
    6.03829269797000020E-01,
    -1.60102397974000000E-01
    };
static int
  d10dalpha = 0,
  d10domega = 9;

/******************* Daubechies 12 ********************/

static real
  d12soqf[12] = {
    1.11540743350000000E-01,
    4.94623890397999980E-01,
    7.51133908021000000E-01, /* Maximum absolute value. */
    3.15250351709000010E-01,
    -2.26264693965000010E-01,
    -1.29766867567000010E-01,
    9.75016055869999950E-02,
    2.75228655299999990E-02,
    -3.15820393180000010E-02,
    5.53842200999999980E-04,
    4.77725751100000020E-03,
    -1.07730108500000000E-03
    };
static int
  d12salpha = 0,
  d12somega = 11;

static real
  d12doqf[12] = {
    -1.07730108500000000E-03,
    -4.77725751100000020E-03,
    5.53842200999999980E-04,
    3.15820393180000010E-02,
    2.75228655299999990E-02,
    -9.75016055869999950E-02,
    -1.29766867567000010E-01,
    2.26264693965000010E-01,
    3.15250351709000010E-01,
    -7.51133908021000000E-01, /* Maximum absolute value. */
    4.94623890397999980E-01,
    -1.11540743350000000E-01
    };
static int
  d12dalpha = 0,
  d12domega = 11;

/******************* Daubechies 14 ********************/

static real
  d14soqf[14] = {
    7.78520540849999970E-02,
    3.96539319482000000E-01,
    7.29132090845999950E-01, /* Maximum absolute value. */
    4.69782287405000000E-01,
    -1.43906003928999990E-01,
    -2.24036184993999990E-01,
    7.13092192669999990E-02,
    8.06126091510000060E-02,
    -3.80299369350000010E-02,
    -1.65745416310000000E-02,
    1.25509985560000000E-02,
    4.29577973000000010E-04,
    -1.80164070400000000E-03,
    3.53713800000000020E-04
    };
static int
  d14salpha = 0,
  d14somega = 13;

static real
  d14doqf[14] = {
    3.53713800000000020E-04,
    1.80164070400000000E-03,
    4.29577973000000010E-04,
    -1.25509985560000000E-02,
    -1.65745416310000000E-02,
    3.80299369350000010E-02,
    8.06126091510000060E-02,
    -7.13092192669999990E-02,
    -2.24036184993999990E-01,
    1.43906003928999990E-01,
    4.69782287405000000E-01,
    -7.29132090845999950E-01, /* Maximum absolute value. */
    3.96539319482000000E-01,
    -7.78520540849999970E-02
    };
static int
  d14dalpha = 0,
  d14domega = 13;

/******************* Daubechies 16 ********************/

static real
  d16soqf[16] = {
    5.44158422430000010E-02,
    3.12871590914000020E-01,
    6.75630736296999990E-01, /* Maximum absolute value. */
    5.85354683654000010E-01,
    -1.58291052559999990E-02,
    -2.84015542961999990E-01,
    4.72484573999999990E-04,
    1.28747426619999990E-01,
    -1.73693010020000010E-02,
    -4.40882539310000000E-02,
    1.39810279170000000E-02,
    8.74609404700000050E-03,
    -4.87035299299999960E-03,
    -3.91740372999999990E-04,
    6.75449405999999950E-04,
    -1.17476784000000000E-04
    };
static int
  d16salpha = 0,
  d16somega = 15;

static real
  d16doqf[16] = {
    -1.17476784000000000E-04,
    -6.75449405999999950E-04,
    -3.91740372999999990E-04,
    4.87035299299999960E-03,
    8.74609404700000050E-03,
    -1.39810279170000000E-02,
    -4.40882539310000000E-02,
    1.73693010020000010E-02,
    1.28747426619999990E-01,
    -4.72484573999999990E-04,
    -2.84015542961999990E-01,
    1.58291052559999990E-02,
    5.85354683654000010E-01,
    -6.75630736296999990E-01, /* Maximum absolute value. */
    3.12871590914000020E-01,
    -5.44158422430000010E-02
    };
static int
  d16dalpha = 0,
  d16domega = 15;

/******************* Daubechies 18 ********************/

static real
  d18soqf[18] = {
    3.80779473639999980E-02,
    2.43834674613000010E-01,
    6.04823123690000020E-01,
    6.57288078050999980E-01, /* Maximum absolute value */
    1.33197385824999990E-01,
    -2.93273783279000000E-01,
    -9.68407832229999930E-02,
    1.48540749337999990E-01,
    3.07256814790000010E-02,
    -6.76328290610000020E-02,
    2.50947114999999980E-04,
    2.23616621239999990E-02,
    -4.72320475800000040E-03,
    -4.28150368199999970E-03,
    1.84764688300000000E-03,
    2.30385764000000010E-04,
    -2.51963189000000020E-04,
    3.93473200000000030E-05
    };
static int
  d18salpha = 0,
  d18somega = 17;

static real
  d18doqf[18] = {
    3.93473200000000030E-05,
    2.51963189000000020E-04,
    2.30385764000000010E-04,
    -1.84764688300000000E-03,
    -4.28150368199999970E-03,
    4.72320475800000040E-03,
    2.23616621239999990E-02,
    -2.50947114999999980E-04,
    -6.76328290610000020E-02,
    -3.07256814790000010E-02,
    1.48540749337999990E-01,
    9.68407832229999930E-02,
    -2.93273783279000000E-01,
    -1.33197385824999990E-01,
    6.57288078050999980E-01, /* Maximum absolute value */
    -6.04823123690000020E-01,
    2.43834674613000010E-01,
    -3.80779473639999980E-02
    };
static int
  d18dalpha = 0,
  d18domega = 17;

/******************* Daubechies 20 ********************/

static real
  d20soqf[20] = {
    2.66700579010000010E-02,
    1.88176800078000000E-01,
    5.27201188931999960E-01,
    6.88459039454000000E-01, /* Maximum absolute value */
    2.81172343661000020E-01,
    -2.49846424326999990E-01,
    -1.95946274376999990E-01,
    1.27369340336000000E-01,
    9.30573646040000060E-02,
    -7.13941471659999970E-02,
    -2.94575368219999990E-02,
    3.32126740589999970E-02,
    3.60655356700000010E-03,
    -1.07331754830000000E-02,
    1.39535174700000000E-03,
    1.99240529500000020E-03,
    -6.85856695000000030E-04,
    -1.16466855000000000E-04,
    9.35886700000000050E-05,
    -1.32642030000000010E-05
    };
static int
  d20salpha = 0,
  d20somega = 19;

static real
  d20doqf[20] = {
    -1.32642030000000010E-05,
    -9.35886700000000050E-05,
    -1.16466855000000000E-04,
    6.85856695000000030E-04,
    1.99240529500000020E-03,
    -1.39535174700000000E-03,
    -1.07331754830000000E-02,
    -3.60655356700000010E-03,
    3.32126740589999970E-02,
    2.94575368219999990E-02,
    -7.13941471659999970E-02,
    -9.30573646040000060E-02,
    1.27369340336000000E-01,
    1.95946274376999990E-01,
    -2.49846424326999990E-01,
    -2.81172343661000020E-01,
    6.88459039454000000E-01, /* Maximum absolute value */
    -5.27201188931999960E-01,
    1.88176800078000000E-01,
    -2.66700579010000010E-02
    };
static int
  d20dalpha = 0,
  d20domega = 19;

/******************* Vaidyanathan 24 ********************/

static real
  v24soqf[24] = {
    -6.29061181907475230E-05,
    3.43631904821029190E-04,
    -4.53956619637219290E-04,
    -9.44897136321949270E-04,
    2.84383454683556460E-03,
    7.08137504052444710E-04,
    -8.83910340861387800E-03,
    3.15384705589700400E-03,
    1.96872150100727140E-02,
    -1.48534480052300990E-02,
    -3.54703986072834530E-02,
    3.87426192934114400E-02,
    5.58925236913735480E-02,
    -7.77097509019694100E-02,
    -8.39288843661128300E-02,
    1.31971661416977720E-01,
    1.35084227129481260E-01,
    -1.94450471766478170E-01,
    -2.63494802488459910E-01,
    2.01612161775308660E-01,
    6.35601059872214940E-01, /* Maximum absolute value. */
    5.72797793210734320E-01,
    2.50184129504662180E-01,
    4.57993341109767180E-02
    };
static int
  v24salpha = 0,
  v24somega = 23;

static real
  v24doqf[24] = {
    4.57993341109767180E-02,
    -2.50184129504662180E-01,
    5.72797793210734320E-01,
    -6.35601059872214940E-01, /* Maximum absolute value. */
    2.01612161775308660E-01,
    2.63494802488459910E-01,
    -1.94450471766478170E-01,
    -1.35084227129481260E-01,
    1.31971661416977720E-01,
    8.39288843661128300E-02,
    -7.77097509019694100E-02,
    -5.58925236913735480E-02,
    3.87426192934114400E-02,
    3.54703986072834530E-02,
    -1.48534480052300990E-02,
    -1.96872150100727140E-02,
    3.15384705589700400E-03,
    8.83910340861387800E-03,
    7.08137504052444710E-04,
    -2.84383454683556460E-03,
    -9.44897136321949270E-04,
    4.53956619637219290E-04,
    3.43631904821029190E-04,
    6.29061181907475230E-05
    };
static int
  v24dalpha = 0,
  v24domega = 23;


#undef M_SQRT2 
#undef SR3 
#undef SR10
#undef SR15
#undef A 
#undef B 

#endif