5259 lines
212 KiB
C++
5259 lines
212 KiB
C++
//============================================================================
|
|
// Name : 1D/2D Wavelet Transform
|
|
// Author : Rafat Hussain
|
|
// Version :
|
|
// Copyright : MIT License
|
|
// Description : Wavelet Library
|
|
//============================================================================
|
|
/*Copyright (C) <2011> by <Rafat Hussain>
|
|
|
|
Permission is hereby granted, free of charge, to any person obtaining a copy
|
|
of this software and associated documentation files (the "Software"), to deal
|
|
in the Software without restriction, including without limitation the rights
|
|
to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
|
|
copies of the Software, and to permit persons to whom the Software is
|
|
furnished to do so, subject to the following conditions:
|
|
|
|
The above copyright notice and this permission notice shall be included in
|
|
all copies or substantial portions of the Software.
|
|
|
|
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
|
IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
|
FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
|
AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
|
LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
|
OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
|
|
THE SOFTWARE.
|
|
*/
|
|
|
|
#include <iostream>
|
|
#include <fstream>
|
|
#include <complex>
|
|
#include "wavelet.h"
|
|
#include <vector>
|
|
#include <string>
|
|
#include <cmath>
|
|
#include <algorithm>
|
|
using namespace std;
|
|
|
|
void* per_ext2d(vector<vector<double> > &signal,vector<vector<double> > &temp2, int a) {
|
|
|
|
unsigned int rows = signal.size();
|
|
unsigned int cols = signal[0].size();
|
|
vector<vector<double> > temp_vec(rows ,vector<double>(cols + 2* a));
|
|
// vector<vector<double> > temp2(rows + 2 * a ,vector<double>(cols + 2* a));
|
|
|
|
for (unsigned int i=0; i < rows; i++) {
|
|
vector<double> sig;
|
|
for (unsigned int j=0; j< cols; j++) {
|
|
double temp = signal[i][j];
|
|
sig.push_back(temp);
|
|
}
|
|
per_ext(sig,a);
|
|
for (unsigned int j=0; j< sig.size(); j++) {
|
|
temp_vec[i][j] = sig[j];
|
|
}
|
|
}
|
|
for (unsigned int j=0; j < temp_vec[0].size(); j++) {
|
|
vector<double> sig;
|
|
for (unsigned int i=0; i< rows; i++) {
|
|
double temp = temp_vec[i][j];
|
|
sig.push_back(temp);
|
|
}
|
|
per_ext(sig,a);
|
|
for (unsigned int i=0; i< sig.size(); i++) {
|
|
temp2[i][j] = sig[i];
|
|
}
|
|
}
|
|
|
|
|
|
return 0;
|
|
}
|
|
|
|
void* swt_2d(vector<vector<double> > &sig,int J, string nm, vector<double> &swt_output) {
|
|
int m_size = sig.size(); // No. of rows
|
|
int n_size = sig[0].size(); //No. of columns
|
|
|
|
double int_m_size1 = log10 (static_cast<double> (m_size)) / log10(2.0);
|
|
double int_n_size1 = log10 (static_cast<double> (n_size)) / log10(2.0);
|
|
double int_m_size = max(int_m_size1,int_n_size1);
|
|
double int_n_size = max(int_m_size1,int_n_size1);
|
|
vector<vector<double> > sig2((int) pow(2.0,ceil(int_m_size)),vector<double>((int) pow(2.0,ceil(int_m_size))));
|
|
dyadic_zpad_2d(sig,sig2);
|
|
|
|
int rows_n =(int) pow(2.0,ceil(int_m_size));
|
|
int cols_n =(int) pow(2.0,ceil(int_n_size));
|
|
vector<double> lp1,hp1,lp2,hp2;
|
|
filtcoef(nm,lp1,hp1,lp2,hp2);
|
|
|
|
for (int iter =0; iter < J; iter++) {
|
|
int U = (int) pow(2.0,(double)iter);
|
|
vector<double> low_pass, high_pass;
|
|
if(iter > 0) {
|
|
upsamp(lp1,U,low_pass);
|
|
upsamp(hp1,U,high_pass);
|
|
} else {
|
|
low_pass = lp1;
|
|
high_pass = hp1;
|
|
}
|
|
int lf = low_pass.size();
|
|
vector<vector<double> > signal(rows_n + lf,vector<double>(cols_n+lf));
|
|
per_ext2d(sig,signal,lf/2);
|
|
int len_x = signal.size();
|
|
int len_y = signal[0].size();
|
|
vector<vector<double> > sigL(rows_n + lf,vector<double>(cols_n));
|
|
vector<vector<double> > sigH(rows_n + lf,vector<double>(cols_n));
|
|
vector<vector<double> > cA(rows_n,vector<double>(cols_n));
|
|
vector<vector<double> > cH(rows_n,vector<double>(cols_n));
|
|
vector<vector<double> > cV(rows_n,vector<double>(cols_n));
|
|
vector<vector<double> > cD(rows_n,vector<double>(cols_n));
|
|
|
|
for (int i=0; i < len_x; i++) {
|
|
vector<double> temp_row;
|
|
for (int j=0; j < len_y; j++) {
|
|
double temp = signal[i][j];
|
|
temp_row.push_back(temp);
|
|
|
|
}
|
|
|
|
// ------------------Low Pass Branch--------------------------
|
|
|
|
|
|
vector<double> oup;
|
|
convfft(temp_row,low_pass,oup);
|
|
oup.erase(oup.begin(), oup.begin()+lf);
|
|
oup.erase(oup.begin()+cols_n,oup.end());
|
|
|
|
// ------------------High Pass Branch--------------------------
|
|
|
|
vector<double> oup2;
|
|
convfft(temp_row,high_pass,oup2);
|
|
oup2.erase(oup2.begin(), oup2.begin()+lf);
|
|
oup2.erase(oup2.begin()+cols_n,oup2.end());
|
|
|
|
temp_row.clear();
|
|
|
|
for (unsigned int j=0; j < oup.size() ; j++) {
|
|
sigL[i][j] = oup[j];
|
|
sigH[i][j] = oup2[j];
|
|
}
|
|
|
|
}
|
|
|
|
for (int j=0; j < cols_n; j++) {
|
|
vector<double> temp_row;
|
|
for (int i=0; i < len_x; i++){
|
|
double temp = sigL[i][j];
|
|
temp_row.push_back(temp);
|
|
}
|
|
|
|
// ------------------Low Pass Branch--------------------------
|
|
|
|
|
|
vector<double> oup;
|
|
convfft(temp_row,low_pass,oup);
|
|
oup.erase(oup.begin(), oup.begin()+lf);
|
|
oup.erase(oup.begin()+rows_n,oup.end());
|
|
|
|
// ------------------High Pass Branch--------------------------
|
|
|
|
vector<double> oup2;
|
|
convfft(temp_row,high_pass,oup2);
|
|
oup2.erase(oup2.begin(), oup2.begin()+lf);
|
|
oup2.erase(oup2.begin()+rows_n,oup2.end());
|
|
|
|
temp_row.clear();
|
|
|
|
|
|
for (unsigned int i=0; i < oup.size() ; i++) {
|
|
cA[i][j] = oup[i];
|
|
}
|
|
|
|
for (unsigned int i=0; i < oup2.size() ; i++) {
|
|
cH[i][j] = oup2[i];
|
|
}
|
|
|
|
|
|
}
|
|
|
|
for (int j=0; j < cols_n; j++) {
|
|
vector<double> temp_row;
|
|
for (int i=0; i < len_x; i++){
|
|
double temp = sigH[i][j];
|
|
temp_row.push_back(temp);
|
|
}
|
|
|
|
// ------------------Low Pass Branch--------------------------
|
|
|
|
|
|
vector<double> oup;
|
|
convfft(temp_row,low_pass,oup);
|
|
oup.erase(oup.begin(), oup.begin()+lf);
|
|
oup.erase(oup.begin()+rows_n,oup.end());
|
|
|
|
// ------------------High Pass Branch--------------------------
|
|
|
|
vector<double> oup2;
|
|
convfft(temp_row,high_pass,oup2);
|
|
oup2.erase(oup2.begin(), oup2.begin()+lf);
|
|
oup2.erase(oup2.begin()+rows_n,oup2.end());
|
|
|
|
temp_row.clear();
|
|
|
|
|
|
for (unsigned int i=0; i < oup.size() ; i++) {
|
|
cV[i][j] = oup[i];
|
|
}
|
|
|
|
for (unsigned int i=0; i < oup2.size() ; i++) {
|
|
cD[i][j] = oup2[i];
|
|
}
|
|
|
|
|
|
}
|
|
|
|
sig = cA;
|
|
vector<double> temp_sig2;
|
|
if (iter == J-1) {
|
|
for(int i =0; i < rows_n; i++){
|
|
for (int j =0; j < cols_n; j++){
|
|
double temp=cA[i][j];
|
|
temp_sig2.push_back(temp);
|
|
}
|
|
}
|
|
}
|
|
for(int i =0; i < rows_n; i++){
|
|
for (int j = cols_n; j < cols_n * 2; j++){
|
|
double temp =cH[i][j - cols_n];
|
|
temp_sig2.push_back(temp);
|
|
}
|
|
}
|
|
|
|
for(int i = rows_n; i < rows_n * 2; i++){
|
|
for (int j =0; j < cols_n; j++){
|
|
double temp=cV[i - rows_n][j];
|
|
temp_sig2.push_back(temp);
|
|
}
|
|
}
|
|
|
|
for(int i = rows_n; i < rows_n * 2; i++){
|
|
for (int j = cols_n; j < cols_n * 2; j++){
|
|
double temp =cD[i- rows_n][j - cols_n];
|
|
temp_sig2.push_back(temp);
|
|
}
|
|
}
|
|
|
|
swt_output.insert(swt_output.begin(),temp_sig2.begin(),temp_sig2.end());
|
|
|
|
|
|
|
|
}
|
|
|
|
|
|
return 0;
|
|
}
|
|
|
|
|
|
void* per_ext(vector<double> &sig, int a) {
|
|
unsigned int len;
|
|
len = sig.size();
|
|
|
|
for (int i=0; i < a; i++) {
|
|
double temp1 = sig[2 *i];
|
|
double temp2 = sig[len-1];
|
|
sig.insert(sig.begin(), temp2);
|
|
sig.insert(sig.end(), temp1);
|
|
|
|
}
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
void* gnuswtplot(int J) {
|
|
|
|
ofstream gnudwt("gnudwt.gnu.txt");
|
|
gnudwt << "# This Script will Plot Signal, SWT Coefficients and Filters Used" << endl;
|
|
gnudwt << "set terminal wxt 1" << endl;
|
|
gnudwt <<"set title \" Input Signal \" " << endl;
|
|
gnudwt << "plot \"gnusig.dat\" using 1:2 with lines " << endl;
|
|
gnudwt << "set terminal wxt 2" << endl;
|
|
gnudwt << "set multiplot layout "<< J << "," << 2 << endl;
|
|
for (int i = 0;i < J ; i++){
|
|
gnudwt << "# Plot " << 2*(i + 1) -1 << endl;
|
|
gnudwt << "set title \"Approximation Coefficients Level " << i+ 1 << " \"" << endl;
|
|
gnudwt << "plot \"gnuout.dat\" using 1:"<< 2*(i+1) << " with lines" << endl;
|
|
gnudwt << "# Plot "<< 2*(i + 1)<< endl;
|
|
gnudwt << "set title \"Detail Coefficients Level " << i + 1 <<"\" " << endl;
|
|
gnudwt << "plot \"gnuout.dat\" using 1:"<< 2*(i+1)+1<< " with lines" << endl;
|
|
}
|
|
gnudwt << "unset multiplot" <<endl;
|
|
gnudwt << "set terminal wxt 3" << endl;
|
|
gnudwt << "set multiplot layout 2,2" << endl;
|
|
gnudwt << "set title \"Filter Coefficients\" " << endl;
|
|
gnudwt << "# Plot 1" << endl;
|
|
gnudwt << "set title \"Low Pass Decomposition Filter \" " << endl;
|
|
gnudwt << "plot \"gnufilt.dat\" using 1:2 with impulse" << endl;
|
|
gnudwt << "# Plot 2" << endl;
|
|
gnudwt << "set title \"High Pass Decomposition Filter \" " << endl;
|
|
gnudwt << "plot \"gnufilt.dat\" using 1:3 with impulse" << endl;
|
|
gnudwt << "# Plot 3" << endl;
|
|
gnudwt << "set title \"Low Pass Reconstruction Filter \" " << endl;
|
|
gnudwt << "plot \"gnufilt.dat\" using 1:4 with impulse" << endl;
|
|
gnudwt << "# Plot 4" << endl;
|
|
gnudwt << "set title \"High Pass Reconstruction Filter \" " << endl;
|
|
gnudwt << "plot \"gnufilt.dat\" using 1:5 with impulse" << endl;
|
|
gnudwt << "unset multiplot" <<endl;
|
|
gnudwt << "set terminal wxt 4" << endl;
|
|
gnudwt <<"set title \" Reconstructed Signal \" " << endl;
|
|
gnudwt << "plot \"recon.dat\" using 1:2 with lines " << endl;
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
void* iswt(vector<double> &swtop,int J, string nm, vector<double> &iswt_output) {
|
|
int N = swtop.size() / (J + 1);
|
|
|
|
vector<double> lpd,hpd,lpr,hpr;
|
|
filtcoef(nm,lpd,hpd,lpr,hpr);
|
|
|
|
vector<double> appx_sig;
|
|
|
|
vector<double> low_pass = lpr;
|
|
vector<double> high_pass = hpr;
|
|
int lf = low_pass.size();
|
|
|
|
for (int iter = 0; iter < J; iter++) {
|
|
vector<double> det_sig;
|
|
if (iter ==0) {
|
|
for (int i = 0; i < N; i++) {
|
|
double temp=swtop[i];
|
|
appx_sig.push_back(temp);
|
|
double temp1=swtop[(iter + 1) * N + i];
|
|
det_sig.push_back(temp1);
|
|
}
|
|
} else {
|
|
for (int i = 0; i < N; i++) {
|
|
double temp1=swtop[(iter + 1) * N + i];
|
|
det_sig.push_back(temp1);
|
|
|
|
}
|
|
}
|
|
|
|
|
|
int value =(int) pow(2.0,double(J -1 -iter));
|
|
iswt_output.assign(N,0.0);
|
|
|
|
for (int count = 0; count < value; count++) {
|
|
vector<double> appx1, det1;
|
|
for (int index = count; index < N; index+=value){
|
|
double temp = appx_sig[index];
|
|
appx1.push_back(temp);
|
|
double temp1 = det_sig[index];
|
|
det1.push_back(temp1);
|
|
|
|
}
|
|
unsigned int len = appx1.size();
|
|
|
|
// Shift = 0
|
|
|
|
vector<double> appx2, det2;
|
|
|
|
for (unsigned int index_shift =0; index_shift < len; index_shift+=2) {
|
|
double temp = appx1[index_shift];
|
|
appx2.push_back(temp);
|
|
double temp1 = det1[index_shift];
|
|
det2.push_back(temp1);
|
|
}
|
|
|
|
int U = 2; // Upsampling Factor
|
|
|
|
vector<double> cL0,cH0;
|
|
upsamp(appx2,U,cL0);
|
|
upsamp(det2,U,cH0);
|
|
per_ext(cL0,lf/2);
|
|
per_ext(cH0,lf/2);
|
|
|
|
vector<double> oup00L, oup00H, oup00;
|
|
convfft(cL0,low_pass,oup00L);
|
|
convfft(cH0,high_pass,oup00H);
|
|
|
|
oup00L.erase(oup00L.begin(),oup00L.begin()+lf - 1);
|
|
oup00L.erase(oup00L.begin()+len,oup00L.end());
|
|
oup00H.erase(oup00H.begin(),oup00H.begin()+lf - 1);
|
|
oup00H.erase(oup00H.begin()+len,oup00H.end());
|
|
|
|
vecsum(oup00L,oup00H,oup00);
|
|
|
|
// Shift = 1
|
|
|
|
vector<double> appx3, det3;
|
|
|
|
for (unsigned int index_shift =1; index_shift < len; index_shift+=2) {
|
|
double temp = appx1[index_shift];
|
|
appx3.push_back(temp);
|
|
double temp1 = det1[index_shift];
|
|
det3.push_back(temp1);
|
|
}
|
|
|
|
|
|
vector<double> cL1,cH1;
|
|
upsamp(appx3,U,cL1);
|
|
upsamp(det3,U,cH1);
|
|
per_ext(cL1,lf/2);
|
|
per_ext(cH1,lf/2);
|
|
|
|
vector<double> oup01L, oup01H, oup01;
|
|
convfft(cL1,low_pass,oup01L);
|
|
convfft(cH1,high_pass,oup01H);
|
|
|
|
oup01L.erase(oup01L.begin(), oup01L.begin()+lf - 1);
|
|
oup01L.erase(oup01L.begin()+len,oup01L.end());
|
|
oup01H.erase(oup01H.begin(), oup01H.begin()+lf - 1);
|
|
oup01H.erase(oup01H.begin()+len,oup01H.end());
|
|
|
|
vecsum(oup01L,oup01H,oup01);
|
|
circshift(oup01,-1);
|
|
|
|
// Continue
|
|
int index2 = 0;
|
|
for (int index = count; index < N; index+=value){
|
|
double temp = oup00[index2]+oup01[index2];
|
|
iswt_output.at(index) = temp/2;
|
|
index2++;
|
|
|
|
}
|
|
|
|
|
|
}
|
|
appx_sig = iswt_output;
|
|
|
|
|
|
}
|
|
ofstream sigout("recon.dat");
|
|
for (int i =0; i < N; i++) {
|
|
sigout << i << " " << iswt_output[i] << endl;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
void* swt(vector<double> &sig, int J, string nm, vector<double> &swt_output, int &length) {
|
|
vector<double> lpd, hpd, lpr, hpr;
|
|
|
|
// dyadic_zpad_1d(sig);
|
|
int N = sig.size();
|
|
length = N;
|
|
|
|
filtcoef(nm,lpd,hpd,lpr,hpr);
|
|
|
|
ofstream appx("appx.txt", ios::trunc);
|
|
appx.close();
|
|
ofstream det("det.txt", ios::trunc);
|
|
det.close();
|
|
unsigned int count = sig.size();
|
|
ofstream gnusig("gnusig.dat");
|
|
for (unsigned int i = 0;i < count; i++) {
|
|
gnusig << i << " " << sig[i] << endl;
|
|
}
|
|
gnusig.close();
|
|
|
|
ofstream gnufilt("gnufilt.dat");
|
|
unsigned int len_filt = lpd.size();
|
|
for (unsigned int i = 1; i <= len_filt; i++) {
|
|
gnufilt << i << " " << lpd[i] << " " << hpd[i] << " " << lpr[i] << " " << hpr[i] << endl;
|
|
}
|
|
gnufilt.close();
|
|
|
|
for (int iter = 0; iter < J; iter++) {
|
|
int len = sig.size();
|
|
vector<double> low_pass;
|
|
vector<double> high_pass;
|
|
if ( iter > 0){
|
|
|
|
int M = (int) pow(2.0,iter);
|
|
upsamp(lpd,M,low_pass);
|
|
upsamp(hpd,M,high_pass);
|
|
|
|
|
|
} else {
|
|
low_pass = lpd;
|
|
high_pass = hpd;
|
|
}
|
|
|
|
unsigned int len_filt = low_pass.size();
|
|
per_ext(sig,len_filt/2);
|
|
|
|
vector<double> cA;
|
|
convfft(sig,low_pass,cA);
|
|
vector<double> cD;
|
|
convfft(sig,high_pass,cD);
|
|
// Resize cA and cD
|
|
cA.erase(cA.begin(), cA.begin()+len_filt);
|
|
cA.erase(cA.begin()+N,cA.end());
|
|
cD.erase(cD.begin(), cD.begin()+len_filt);
|
|
cD.erase(cD.begin()+N,cD.end());
|
|
// Reset signal value;
|
|
|
|
sig = cA;
|
|
|
|
if (iter == J - 1 ) {
|
|
swt_output.insert(swt_output.begin(),cD.begin(),cD.end());
|
|
swt_output.insert(swt_output.begin(),cA.begin(),cA.end());
|
|
} else {
|
|
swt_output.insert(swt_output.begin(),cD.begin(),cD.end());
|
|
}
|
|
|
|
fstream appx_s ("appx.txt", fstream::out | fstream::app);
|
|
fstream det_s ("det.txt", fstream::out | fstream::app);
|
|
for (int i = 0; i < len; i++){
|
|
appx_s << cA[i] << endl;
|
|
det_s << cD[i] << endl;
|
|
}
|
|
|
|
}
|
|
vector<double> appx_c , det_c;
|
|
ifstream sig_inp("appx.txt");
|
|
int appx_len = 0;
|
|
|
|
int det_len = 0;
|
|
while (sig_inp) {
|
|
double temp;
|
|
sig_inp >> temp;
|
|
appx_c.push_back(temp);
|
|
appx_len++;
|
|
}
|
|
appx_c.pop_back();
|
|
appx_len--;
|
|
|
|
ifstream sig_inp2("det.txt");
|
|
while (sig_inp2) {
|
|
double temp;
|
|
sig_inp2 >> temp;
|
|
det_c.push_back(temp);
|
|
det_len++;
|
|
}
|
|
det_c.pop_back();
|
|
det_len--;
|
|
// cout << det_len + 1 << endl;
|
|
|
|
vector<vector<double> > coeff(N, vector<double>(2*J + 1,0));
|
|
|
|
|
|
int val = 0;
|
|
for (int j= 0; j < J ; j++ ) {
|
|
|
|
for (int i = 0; i < N; i++) {
|
|
coeff[i][2 * (j + 1 ) - 1]=appx_c[val + i];
|
|
coeff[i][2 * (j + 1)]=det_c[val + i];
|
|
|
|
}
|
|
val+=N;
|
|
|
|
}
|
|
ofstream gnuout("gnuout.dat");
|
|
for (int i =0 ; i < N; i++) {
|
|
coeff[i][0] = i;
|
|
}
|
|
|
|
for (int i = 0; i < N; i++) {
|
|
for (int j =0; j < 2* J +1; j++){
|
|
gnuout << coeff[i][j] << " ";
|
|
}
|
|
gnuout << endl;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
void* dwt_output_dim_sym(vector<int> &length,vector<int> &length2, int J) {
|
|
unsigned int sz=length.size();
|
|
int rows = length[sz-2];
|
|
int cols = length[sz-1];
|
|
for (int i =0; i < J; i++) {
|
|
rows =(int) ceil((double) rows/ 2.0);
|
|
cols =(int) ceil((double) cols/ 2.0);
|
|
}
|
|
for (int i =0; i < J + 1; i++) {
|
|
length2.push_back(rows);
|
|
length2.push_back(cols);
|
|
rows = rows * 2;
|
|
cols = cols*2;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
void* dispDWT(vector<double> &output,vector<vector<double> > &dwtdisp, vector<int> &length , vector<int> &length2, int J) {
|
|
int sum = 0;
|
|
|
|
|
|
for (int iter =0; iter < J; iter++) {
|
|
int d_rows=length[2*iter]-length2[2*iter];
|
|
int d_cols=length[2*iter+1]-length2[2*iter + 1];
|
|
|
|
|
|
int rows_n =length[2 * iter];
|
|
int cols_n = length[2 * iter + 1];
|
|
vector<vector<double> > dwt_output(2 * rows_n, vector<double>(2 * cols_n));
|
|
if (iter == 0) {
|
|
for(int i =0; i < rows_n; i++){
|
|
for (int j =0; j < cols_n; j++){
|
|
dwt_output[i][j]=output[i*cols_n + j];
|
|
}
|
|
}
|
|
|
|
for(int i =0; i < rows_n; i++){
|
|
for (int j = cols_n; j < cols_n * 2; j++){
|
|
dwt_output[i][j]= output[rows_n * cols_n + i * cols_n + (j - cols_n)];
|
|
}
|
|
}
|
|
|
|
for(int i = rows_n; i < rows_n * 2; i++){
|
|
for (int j =0; j < cols_n; j++){
|
|
dwt_output[i][j]=output[2 * rows_n * cols_n+ (i - rows_n) * cols_n + j];
|
|
}
|
|
}
|
|
|
|
|
|
for(int i = rows_n; i < rows_n * 2; i++){
|
|
for (int j = cols_n; j < cols_n * 2; j++){
|
|
dwt_output[i][j]=output[3 * rows_n * cols_n+ (i -rows_n) * cols_n + (j -cols_n)];
|
|
}
|
|
}
|
|
} else {
|
|
for(int i =0; i < rows_n; i++){
|
|
for (int j = cols_n; j < cols_n * 2; j++){
|
|
dwt_output[i][j]= output[sum + i * cols_n + (j - cols_n)];
|
|
}
|
|
}
|
|
|
|
for(int i = rows_n; i < rows_n * 2; i++){
|
|
for (int j =0; j < cols_n; j++){
|
|
dwt_output[i][j]=output[sum + rows_n * cols_n+ (i - rows_n) * cols_n + j];
|
|
}
|
|
}
|
|
|
|
|
|
for(int i = rows_n; i < rows_n * 2; i++){
|
|
for (int j = cols_n; j < cols_n * 2; j++){
|
|
dwt_output[i][j]=output[sum + 2 * rows_n * cols_n+ (i -rows_n) * cols_n + (j -cols_n)];
|
|
}
|
|
}
|
|
|
|
}
|
|
|
|
int rows_x = length2[2*iter];
|
|
int cols_x =length2[2*iter +1];
|
|
|
|
int d_cols2 = (int) ceil( (double) (d_cols - 1) / 2.0);
|
|
int d_rows2 = (int) ceil( (double) (d_rows - 1) / 2.0);
|
|
if (iter ==0) {
|
|
for(int i =0; i < rows_x; i++){
|
|
for (int j =0; j < cols_x; j++){
|
|
if (i + d_rows -1 < 0){
|
|
dwtdisp[i][j]=0;
|
|
}
|
|
else if (j + d_cols -1 < 0){
|
|
dwtdisp[i][j]=0;
|
|
} else {
|
|
dwtdisp[i][j]=dwt_output[i+d_rows -1][j+d_cols -1];
|
|
}
|
|
}
|
|
}
|
|
}
|
|
for(int i =0; i < rows_x; i++){
|
|
for (int j = cols_x; j < cols_x * 2; j++){
|
|
if (i + d_rows2 < 0){
|
|
dwtdisp[i][j]=0;
|
|
}
|
|
else if (j + 2* (d_cols -1) +1 > (signed) dwt_output[0].size() - 1){
|
|
dwtdisp[i][j]=0;
|
|
} else {
|
|
dwtdisp[i][j]= dwt_output[i+d_rows2 ][j + 2* (d_cols -1)+1 ];
|
|
}
|
|
}
|
|
}
|
|
|
|
for(int i = rows_x; i < rows_x * 2; i++){
|
|
for (int j =0; j < cols_x; j++){
|
|
if (i + 2* (d_rows -1) + 1 > (signed) dwt_output.size() - 1){
|
|
dwtdisp[i][j]=0;
|
|
}
|
|
else if (j + d_cols2 < 0){
|
|
dwtdisp[i][j]=0;
|
|
} else {
|
|
|
|
dwtdisp[i][j]=dwt_output[i+2 * (d_rows - 1) + 1 ][j+d_cols2 ];
|
|
}
|
|
}
|
|
}
|
|
|
|
for(int i = rows_x; i < rows_x * 2; i++){
|
|
for (int j = cols_x; j < cols_x * 2; j++){
|
|
|
|
if (i + (d_rows -1) + 1 + d_rows2 > (signed) dwt_output.size() - 1){
|
|
dwtdisp[i][j]=0;
|
|
}
|
|
else if (j + (d_cols -1) + 1 + d_cols2 > (signed) dwt_output[0].size() - 1){
|
|
dwtdisp[i][j]=0;
|
|
} else {
|
|
dwtdisp[i][j]=dwt_output[i + (d_rows -1) + 1 + d_rows2 ][j + (d_cols -1) + 1 + d_cols2 ];
|
|
}
|
|
}
|
|
}
|
|
if (iter == 0) {
|
|
sum+= 4*rows_n*cols_n;
|
|
} else {
|
|
sum+= 3*rows_n * cols_n;
|
|
}
|
|
|
|
}
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
void symm_ext2d(vector<vector<double> > &signal,vector<vector<double> > &temp2, int a) {
|
|
unsigned int rows = signal.size();
|
|
unsigned int cols = signal[0].size();
|
|
vector<vector<double> > temp_vec(rows ,vector<double>(cols + 2* a));
|
|
// vector<vector<double> > temp2(rows + 2 * a ,vector<double>(cols + 2* a));
|
|
|
|
for (unsigned int i=0; i < rows; i++) {
|
|
vector<double> sig;
|
|
for (unsigned int j=0; j< cols; j++) {
|
|
double temp = signal[i][j];
|
|
sig.push_back(temp);
|
|
}
|
|
symm_ext(sig,a);
|
|
for (unsigned int j=0; j< sig.size(); j++) {
|
|
temp_vec[i][j] = sig[j];
|
|
}
|
|
}
|
|
for (unsigned int j=0; j < temp_vec[0].size(); j++) {
|
|
vector<double> sig;
|
|
for (unsigned int i=0; i< rows; i++) {
|
|
double temp = temp_vec[i][j];
|
|
sig.push_back(temp);
|
|
}
|
|
symm_ext(sig,a);
|
|
for (unsigned int i=0; i< sig.size(); i++) {
|
|
temp2[i][j] = sig[i];
|
|
}
|
|
}
|
|
|
|
}
|
|
|
|
void* circshift2d(vector<vector<double> > &signal, int x, int y) {
|
|
unsigned int rows = signal.size();
|
|
unsigned int cols = signal[0].size();
|
|
vector<vector<double> > temp_vec(rows,vector<double>(cols));
|
|
|
|
for (unsigned int i=0; i < rows; i++) {
|
|
vector<double> sig;
|
|
for (unsigned int j=0; j< cols; j++) {
|
|
double temp = signal[i][j];
|
|
sig.push_back(temp);
|
|
}
|
|
circshift(sig,x);
|
|
for (unsigned int j=0; j< cols; j++) {
|
|
temp_vec[i][j] = sig[j];
|
|
}
|
|
}
|
|
|
|
for (unsigned int j=0; j < cols; j++) {
|
|
vector<double> sig;
|
|
for (unsigned int i=0; i< rows; i++) {
|
|
double temp = temp_vec[i][j];
|
|
sig.push_back(temp);
|
|
}
|
|
circshift(sig,y);
|
|
for (unsigned int i=0; i< rows; i++) {
|
|
signal[i][j] = sig[i];
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
void* idwt_2d_sym(vector<double> &dwtop,vector<double> &flag, string nm,
|
|
vector<vector<double> > &idwt_output, vector<int> &length){
|
|
int J =(int) flag[0];
|
|
int rows =length[0];
|
|
int cols =length[1];
|
|
|
|
int sum_coef =0;
|
|
vector<double> lp1,hp1,lp2,hp2;
|
|
filtcoef(nm,lp1,hp1,lp2,hp2);
|
|
unsigned int lf = lp1.size();
|
|
int U = 2;
|
|
vector<double> idwt_output2;
|
|
vector<vector<double> > cLL(rows, vector<double>(cols));
|
|
|
|
|
|
for (int iter=0; iter < J; iter++) {
|
|
|
|
int rows_n = length[2*iter];
|
|
int cols_n = length[2*iter + 1];
|
|
|
|
vector<vector<double> > cLH(rows_n, vector<double>(cols_n));
|
|
vector<vector<double> > cHL(rows_n, vector<double>(cols_n));
|
|
vector<vector<double> > cHH(rows_n, vector<double>(cols_n));
|
|
|
|
for (int i = 0 ; i < rows_n; i++ ){
|
|
for (int j = 0; j < cols_n; j++){
|
|
if (iter == 0) {
|
|
cLL[i][j] = dwtop[sum_coef+ i * cols_n + j];
|
|
|
|
cLH[i][j] = dwtop[sum_coef+ rows_n * cols_n+ i * cols_n + j];
|
|
|
|
cHL[i][j] = dwtop[sum_coef+ 2 * rows_n * cols_n + i * cols_n + j];
|
|
|
|
cHH[i][j] = dwtop[sum_coef+ 3* rows_n * cols_n + i * cols_n + j];
|
|
} else {
|
|
|
|
cLH[i][j] = dwtop[sum_coef+ i * cols_n + j];
|
|
|
|
cHL[i][j] = dwtop[sum_coef+ rows_n * cols_n + i * cols_n + j];
|
|
|
|
cHH[i][j] = dwtop[sum_coef+ 2* rows_n * cols_n + i * cols_n + j];
|
|
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
vector<vector<double> > temp_A;
|
|
// temp_A = cLL;
|
|
// idwt2_sym(nm,idwt_output2, cA, cH,cV,cD);
|
|
|
|
unsigned int len_x = cLH.size();
|
|
unsigned int len_y = cLH[0].size();
|
|
|
|
int ini = 2*(lf-1);
|
|
// Row Upsampling and Column Filtering at the first LP Stage
|
|
vector<vector<double> > cL(2 *len_x + lf - 1,vector<double>(len_y ));
|
|
vector<vector<double> > cH(2 * len_x + lf -1,vector<double>(len_y ));
|
|
|
|
if (iter ==0) {
|
|
for (unsigned int j =0; j < len_y; j++) {
|
|
|
|
vector<double> sigLL;
|
|
vector<double> sigLH;
|
|
for (unsigned int i=0;i < len_x;i++) {
|
|
|
|
double temp1 = cLL[i][j];
|
|
double temp2 = cLH[i][j];
|
|
sigLL.push_back(temp1);
|
|
sigLH.push_back(temp2);
|
|
}
|
|
vector<double> oup;
|
|
|
|
vector<double> cA_up;
|
|
vector<double> X_lp;
|
|
upsamp(sigLL, U, cA_up);
|
|
convfft(cA_up, lp2, X_lp);
|
|
|
|
vector<double> cD_up;
|
|
vector<double> X_hp;
|
|
upsamp(sigLH, U, cD_up);
|
|
convfft(cD_up, hp2, X_hp);
|
|
|
|
vecsum(X_lp,X_hp,oup);
|
|
|
|
sigLL.clear();
|
|
sigLH.clear();
|
|
for (int i=0;i < (int) oup.size();i++) {
|
|
cL[i][j] = oup[i];
|
|
}
|
|
|
|
}
|
|
} else{
|
|
// circshift2d(cLL,ini/2,ini);
|
|
unsigned int rows1 =cLL.size();
|
|
unsigned int cols1 =cLL[0].size();
|
|
vector<vector<double> > sigL1(2 * rows1 + lf -1,vector<double>(cols1));
|
|
for (unsigned int j =0; j < cols1;j++){
|
|
vector<double> temp_L1;
|
|
for (unsigned int i =0; i < rows1; i++){
|
|
double temp = cLL[i][j];
|
|
temp_L1.push_back(temp);
|
|
}
|
|
vector<double> cA_up;
|
|
vector<double> oup;
|
|
upsamp(temp_L1, U, cA_up);
|
|
convfft(cA_up, lp2, oup);
|
|
for (int i=0;i < (int) oup.size();i++) {
|
|
sigL1[i][j] = oup[i];
|
|
}
|
|
}
|
|
circshift2d(sigL1,ini/2,ini);
|
|
vector<vector<double> > sigL2(2 *len_x + lf - 1,vector<double>(len_y ));
|
|
|
|
for (unsigned int j =0; j < len_y; j++) {
|
|
|
|
vector<double> sigLH;
|
|
for (unsigned int i=0;i < len_x;i++) {
|
|
|
|
double temp2 = cLH[i][j];
|
|
sigLH.push_back(temp2);
|
|
}
|
|
vector<double> oup;
|
|
|
|
vector<double> cD_up;
|
|
vector<double> X_hp;
|
|
upsamp(sigLH, U, cD_up);
|
|
convfft(cD_up, hp2, oup);
|
|
|
|
sigLH.clear();
|
|
for (int i=0;i < (int) oup.size();i++) {
|
|
sigL2[i][j] = oup[i];
|
|
}
|
|
|
|
|
|
}
|
|
|
|
for (unsigned int i =0; i < 2* len_x + lf -1; i++){
|
|
for (unsigned int j =0; j < len_y; j++){
|
|
cL[i][j]=sigL1[i][j]+sigL2[i][j];
|
|
}
|
|
}
|
|
|
|
}
|
|
|
|
|
|
for (unsigned int j =0; j < len_y; j++) {
|
|
vector<double> sigHL;
|
|
vector<double> sigHH;
|
|
for (unsigned int i=0;i < len_x;i++) {
|
|
double temp3 = cHL[i][j];
|
|
double temp4 = cHH[i][j];
|
|
sigHL.push_back(temp3);
|
|
sigHH.push_back(temp4);
|
|
}
|
|
vector<double> oup2;
|
|
|
|
vector<double> cA_up;
|
|
vector<double> X_lp;
|
|
upsamp(sigHL, U, cA_up);
|
|
convfft(cA_up, lp2, X_lp);
|
|
|
|
vector<double> cD_up;
|
|
vector<double> X_hp;
|
|
upsamp(sigHH, U, cD_up);
|
|
convfft(cD_up, hp2, X_hp);
|
|
|
|
vecsum(X_lp,X_hp,oup2);
|
|
|
|
sigHL.clear();
|
|
sigHH.clear();
|
|
|
|
for (int i=0;i < (int) oup2.size();i++) {
|
|
cH[i][j] = oup2[i];
|
|
}
|
|
|
|
}
|
|
|
|
vector<vector<double> > signal(2*len_x+lf -1,vector<double>(2 *len_y + lf -1 ));
|
|
for (unsigned int i =0; i < 2 * len_x + lf -1; i++) {
|
|
vector<double> sigL;
|
|
vector<double> sigH;
|
|
for (unsigned int j=0;j < len_y;j++) {
|
|
double temp5 = cL[i][j];
|
|
double temp6 = cH[i][j];
|
|
sigL.push_back(temp5);
|
|
sigH.push_back(temp6);
|
|
}
|
|
vector<double> oup3;
|
|
|
|
vector<double> cA_up;
|
|
vector<double> X_lp;
|
|
upsamp(sigL, U, cA_up);
|
|
convfft(cA_up, lp2, X_lp);
|
|
|
|
vector<double> cD_up;
|
|
vector<double> X_hp;
|
|
upsamp(sigH, U, cD_up);
|
|
convfft(cD_up, hp2, X_hp);
|
|
|
|
vecsum(X_lp,X_hp,oup3);
|
|
|
|
sigL.clear();
|
|
sigH.clear();
|
|
for (int j=0;j < (int) oup3.size();j++) {
|
|
signal[i][j] = oup3[j];
|
|
}
|
|
|
|
}
|
|
|
|
unsigned int sz1=signal.size();
|
|
unsigned int sz2=signal[0].size();
|
|
int e = (int) flag[1];
|
|
for (unsigned int i = e + lf-1; i < sz1 -lf - e ; i++) {
|
|
for (unsigned int j = e +lf-1; j < sz2 -lf -e ; j++) {
|
|
idwt_output[i -lf - e+1][j -lf-e+1] = signal[i][j];
|
|
}
|
|
|
|
}
|
|
|
|
if (iter ==0) {
|
|
sum_coef+= 4 *rows_n * cols_n;
|
|
} else {
|
|
sum_coef+= 3 *rows_n * cols_n;
|
|
}
|
|
cLL = signal;
|
|
|
|
|
|
}
|
|
|
|
|
|
return 0;
|
|
}
|
|
|
|
|
|
void* dwt2_sym(string name,vector<vector<double> > &signal, vector<vector<double> > &cLL,
|
|
vector<vector<double> > &cLH, vector<vector<double> > &cHL, vector<vector<double> > &cHH){
|
|
//Analysis
|
|
int rows = signal.size();
|
|
int cols = signal[0].size();
|
|
int cols_lp1 = cLL[0].size();
|
|
int cols_hp1 = cLL[0].size();
|
|
vector<double> lp1,hp1,lp2,hp2;
|
|
filtcoef(name, lp1,hp1,lp2,hp2);
|
|
int D = 2;
|
|
vector<vector<double> > lp_dn1(rows, vector<double>( cols_lp1));
|
|
// Implementing row filtering and column downsampling in each branch.
|
|
for (int i =0; i < rows; i++) {
|
|
vector<double> temp_row;
|
|
for (int j=0;j < cols;j++) {
|
|
double temp = signal[i][j];
|
|
temp_row.push_back(temp);
|
|
}
|
|
vector<double> c_oup1;
|
|
convfft(temp_row,lp1,c_oup1);
|
|
temp_row.clear();
|
|
vector<double> oup;
|
|
downsamp(c_oup1,D,oup);
|
|
for (int j=0;j < (int) oup.size();j++) {
|
|
lp_dn1[i][j] = oup[j];
|
|
}
|
|
|
|
}
|
|
|
|
vector<vector<double> > hp_dn1(rows, vector<double>( cols_hp1));
|
|
|
|
|
|
for (int i =0; i < rows; i++) {
|
|
vector<double> temp_row2;
|
|
for (int j=0;j < cols;j++) {
|
|
double temp = signal[i][j];
|
|
temp_row2.push_back(temp);
|
|
}
|
|
|
|
vector<double> c_oup2;
|
|
convfft(temp_row2,hp1,c_oup2);
|
|
temp_row2.clear();
|
|
vector<double> oup;
|
|
downsamp(c_oup2,D,oup);
|
|
|
|
for (int j=0;j < (int) oup.size();j++) {
|
|
hp_dn1[i][j] = oup[j];
|
|
}
|
|
|
|
}
|
|
|
|
cols =cols_lp1;
|
|
// Implementing column filtering and row downsampling in Low Pass branch.
|
|
|
|
for (int j =0; j < cols; j++) {
|
|
vector<double> temp_row3;
|
|
for (int i=0;i < rows;i++) {
|
|
double temp = lp_dn1[i][j];
|
|
temp_row3.push_back(temp);
|
|
}
|
|
vector<double> c_oup3;
|
|
convfft(temp_row3,lp1,c_oup3);
|
|
temp_row3.clear();
|
|
vector<double> oup3;
|
|
downsamp(c_oup3,D,oup3);
|
|
|
|
for (int i=0;i < (int) oup3.size();i++) {
|
|
cLL[i][j] = oup3[i];
|
|
}
|
|
|
|
}
|
|
|
|
for (int j =0; j < cols; j++) {
|
|
vector<double> temp_row4;
|
|
for (int i=0;i < rows;i++) {
|
|
double temp = lp_dn1[i][j];
|
|
temp_row4.push_back(temp);
|
|
}
|
|
vector<double> c_oup4;
|
|
convfft(temp_row4,hp1,c_oup4);
|
|
temp_row4.clear();
|
|
vector<double> oup4;
|
|
downsamp(c_oup4,D,oup4);
|
|
|
|
for (int i=0;i < (int) oup4.size();i++) {
|
|
cLH[i][j] = oup4[i];
|
|
}
|
|
|
|
}
|
|
|
|
// Implementing column filtering and row downsampling in High Pass branch.
|
|
|
|
for (int j =0; j < cols; j++) {
|
|
vector<double> temp_row5;
|
|
for (int i=0;i < rows;i++) {
|
|
double temp = hp_dn1[i][j];
|
|
temp_row5.push_back(temp);
|
|
}
|
|
vector<double> c_oup5;
|
|
convfft(temp_row5,lp1,c_oup5);
|
|
temp_row5.clear();
|
|
vector<double> oup5;
|
|
downsamp(c_oup5,D,oup5);
|
|
|
|
for (int i=0;i < (int) oup5.size();i++) {
|
|
cHL[i][j] = oup5[i];
|
|
}
|
|
|
|
}
|
|
|
|
|
|
for (int j =0; j < cols; j++) {
|
|
vector<double> temp_row6;
|
|
for (int i=0;i < rows;i++) {
|
|
double temp = hp_dn1[i][j];
|
|
temp_row6.push_back(temp);
|
|
}
|
|
vector<double> c_oup6;
|
|
convfft(temp_row6,hp1,c_oup6);
|
|
temp_row6.clear();
|
|
vector<double> oup6;
|
|
downsamp(c_oup6,D,oup6);
|
|
|
|
for (int i=0;i < (int) oup6.size();i++) {
|
|
cHH[i][j] = oup6[i];
|
|
}
|
|
|
|
}
|
|
|
|
|
|
return 0;
|
|
}
|
|
|
|
|
|
void* dwt_2d_sym(vector<vector<double> > &origsig, int J, string nm, vector<double> &dwt_output
|
|
, vector<double> &flag , vector<int> &length, int ext) {
|
|
// flag will contain
|
|
|
|
vector<vector<double> > sig(origsig.size()+ 2* ext,vector<double>( origsig[0].size()+ 2 * ext));
|
|
|
|
symm_ext2d(origsig,sig, ext);
|
|
int rows_n = sig.size(); // No. of rows
|
|
int cols_n = sig[0].size(); //No. of columns
|
|
vector<vector<double> > original_copy(rows_n,vector<double>(cols_n));
|
|
|
|
original_copy = sig;
|
|
int Max_Iter;
|
|
Max_Iter = min((int) ceil(log( double(sig.size()))/log (2.0)),(int) ceil(log( double(sig[0].size()))/log (2.0)));
|
|
if ( Max_Iter < J) {
|
|
cout << J << " Iterations are not possible with signals of this dimension " << endl;
|
|
exit(1);
|
|
}
|
|
vector<double> lp1,hp1,lp2,hp2;
|
|
|
|
flag.push_back(double(J));
|
|
flag.push_back((double) ext);
|
|
|
|
|
|
length.insert(length.begin(),cols_n);
|
|
length.insert(length.begin(),rows_n);
|
|
|
|
|
|
// Flag Values
|
|
/*
|
|
double temp = (double) (sig2.size() - sig.size()); // Number of zeropad rows
|
|
flag.push_back(temp);
|
|
double temp2 = (double) (sig2[0].size() - sig[0].size());// Number of zpad cols
|
|
flag.push_back(temp2);
|
|
flag.push_back((double) J); // Number of Iterations
|
|
*/
|
|
int sum_coef = 0;
|
|
for (int iter = 0; iter < J; iter++) {
|
|
filtcoef(nm,lp1,hp1,lp2,hp2);
|
|
unsigned int lf = lp1.size();
|
|
|
|
rows_n =(int) ceil((double)(rows_n + lf -1)/2);
|
|
cols_n =(int) ceil((double) (cols_n + lf -1)/2);
|
|
length.insert(length.begin(),cols_n);
|
|
length.insert(length.begin(),rows_n);
|
|
|
|
vector<vector<double> > cA(rows_n, vector<double>(cols_n));
|
|
vector<vector<double> > cH(rows_n, vector<double>(cols_n));
|
|
vector<vector<double> > cV(rows_n, vector<double>(cols_n));
|
|
vector<vector<double> > cD(rows_n, vector<double>(cols_n));
|
|
|
|
if (iter == 0) {
|
|
dwt2_sym(nm,original_copy,cA,cH,cV,cD);
|
|
} else {
|
|
dwt2_sym(nm,original_copy,cA,cH,cV,cD);
|
|
|
|
}
|
|
vector<double> temp_sig2;
|
|
|
|
original_copy = cA;
|
|
if (iter == J-1) {
|
|
for(int i =0; i < rows_n; i++){
|
|
for (int j =0; j < cols_n; j++){
|
|
double temp=cA[i][j];
|
|
temp_sig2.push_back(temp);
|
|
}
|
|
}
|
|
}
|
|
for(int i =0; i < rows_n; i++){
|
|
for (int j = cols_n; j < cols_n * 2; j++){
|
|
double temp =cH[i][j - cols_n];
|
|
temp_sig2.push_back(temp);
|
|
}
|
|
}
|
|
|
|
for(int i = rows_n; i < rows_n * 2; i++){
|
|
for (int j =0; j < cols_n; j++){
|
|
double temp=cV[i - rows_n][j];
|
|
temp_sig2.push_back(temp);
|
|
}
|
|
}
|
|
|
|
for(int i = rows_n; i < rows_n * 2; i++){
|
|
for (int j = cols_n; j < cols_n * 2; j++){
|
|
double temp =cD[i- rows_n][j - cols_n];
|
|
temp_sig2.push_back(temp);
|
|
}
|
|
}
|
|
|
|
dwt_output.insert(dwt_output.begin(),temp_sig2.begin(),temp_sig2.end());
|
|
sum_coef += 4 * rows_n * cols_n;
|
|
|
|
|
|
|
|
}
|
|
/*
|
|
ofstream dwt2out("dwt2out.dat");
|
|
for (unsigned int i= 0; i < dwt_output.size(); i++){
|
|
dwt2out << dwt_output[i] <<endl;
|
|
}
|
|
*/
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
void* idwt1_sym(string wname, vector<double> &X, vector<double> &cA, vector<double> &cD) {
|
|
|
|
// Not Tested. Use dwt_sym and idwt_sym for any and all computations
|
|
vector<double> dwtop;
|
|
vector<double> flag;
|
|
vector<double> idwt_output;
|
|
vector<int> length;
|
|
length[0] = cA.size();
|
|
length[1] = cD.size();
|
|
dwtop = cA;
|
|
dwtop.insert(dwtop.end(),cD.begin(),cD.end());
|
|
flag.push_back(1);
|
|
flag.push_back(0);
|
|
idwt_sym(dwtop,flag,wname,idwt_output,length);
|
|
X = idwt_output;
|
|
|
|
return 0;
|
|
}
|
|
|
|
void* symm_ext(vector<double> &sig, int a) {
|
|
unsigned int len = sig.size();
|
|
for (int i =0; i < a; i++) {
|
|
double temp1= sig[1 + i * 2];
|
|
double temp2= sig[len - (i+1)*2];
|
|
sig.insert(sig.begin(),temp1);
|
|
sig.insert(sig.end(),temp2);
|
|
}
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
void* idwt_sym(vector<double> &dwtop,vector<double> &flag, string nm,
|
|
vector<double> &idwt_output, vector<int> &length) {
|
|
|
|
int J =(int) flag[1];
|
|
unsigned int lf;
|
|
|
|
vector<double> app;
|
|
vector<double> detail;
|
|
unsigned int app_len = length[0];
|
|
unsigned int det_len = length[1];
|
|
vector<double>::iterator dwt;
|
|
dwt = dwtop.begin();
|
|
app.assign(dwt,dwtop.begin()+app_len);
|
|
detail.assign(dwtop.begin()+app_len, dwtop.begin()+ 2* app_len);
|
|
unsigned int ini = 0;
|
|
for (int i = 0; i < J; i++) {
|
|
|
|
int U = 2; // Upsampling Factor
|
|
vector<double> lpd1,hpd1, lpr1, hpr1;
|
|
|
|
filtcoef(nm,lpd1,hpd1,lpr1,hpr1);
|
|
lf = lpr1.size();
|
|
|
|
|
|
// Operations in the Low Frequency branch of the Synthesis Filter Bank
|
|
|
|
vector<double> X_lp;
|
|
vector<double> cA_up;
|
|
upsamp(app, U,cA_up );
|
|
convfft(cA_up, lpr1, X_lp);
|
|
|
|
|
|
|
|
// Operations in the High Frequency branch of the Synthesis Filter Bank
|
|
|
|
vector<double> X_hp;
|
|
vector<double> cD_up;
|
|
upsamp(detail, U, cD_up);
|
|
convfft(cD_up, hpr1, X_hp);
|
|
|
|
if (i > 0) {
|
|
if (i == 1) {
|
|
ini = idwt_output.size() - det_len;
|
|
if (ini > (2 * (lpr1.size()-1))){
|
|
ini = 2 * (lpr1.size()-1);
|
|
}
|
|
circshift(X_lp, ini);
|
|
unsigned int temp = X_lp.size() - X_hp.size();
|
|
for (unsigned int j = 0; j < temp; j++ ){
|
|
X_lp.pop_back();
|
|
}
|
|
} else {
|
|
circshift(X_lp, ini);
|
|
unsigned int temp = X_lp.size() - X_hp.size();
|
|
for (unsigned int j = 0; j < temp; j++ ){
|
|
X_lp.pop_back();
|
|
}
|
|
}
|
|
}
|
|
app_len += det_len;
|
|
vecsum(X_lp,X_hp,idwt_output);
|
|
app.clear();
|
|
detail.clear();
|
|
if ( i < J - 1 ) {
|
|
det_len = length[i+2];
|
|
// detail.assign(dwtop.begin()+app_len, dwtop.begin()+ det_len);
|
|
|
|
for (unsigned int l = 0; l < det_len;l++) {
|
|
double temp = dwtop[app_len + l];
|
|
detail.push_back(temp);
|
|
}
|
|
|
|
}
|
|
app = idwt_output;
|
|
}
|
|
// app.clear();
|
|
// detail.clear();
|
|
|
|
// vector<double> signal;
|
|
// idwt1(nm,signal, appx, det);
|
|
|
|
// Remove ZeroPadding
|
|
|
|
int zerop =(int) flag[0];
|
|
int e =(int) flag[2];
|
|
idwt_output.erase(idwt_output.end()- zerop,idwt_output.end());
|
|
idwt_output.erase(idwt_output.end()- lf - e ,idwt_output.end());
|
|
idwt_output.erase(idwt_output.begin(),idwt_output.begin()+lf + e -1);
|
|
|
|
unsigned int count = idwt_output.size();
|
|
ofstream gnurecon("gnurecon.dat");
|
|
for (unsigned int i = 0;i < count; i++) {
|
|
gnurecon << i << " " << idwt_output[i] << endl;
|
|
}
|
|
gnurecon.close();
|
|
|
|
return 0;
|
|
}
|
|
|
|
void* dwt1_sym(string wname, vector<double> &signal, vector<double> &cA, vector<double> &cD) {
|
|
|
|
vector<double> lp1, hp1, lp2, hp2;
|
|
|
|
filtcoef(wname,lp1,hp1,lp2,hp2);
|
|
int D = 2; // Downsampling Factor is 2
|
|
|
|
// for (unsigned int i = 0; i < signal.size(); i++) {
|
|
// cout << signal[i] << endl;
|
|
// out2 << signal[i] <<endl;
|
|
// }
|
|
|
|
|
|
vector<double> cA_undec;
|
|
//sig value
|
|
convfft(signal,lp1,cA_undec);
|
|
downsamp(cA_undec, D, cA);
|
|
|
|
//High Pass Branch Computation
|
|
|
|
vector<double> cD_undec;
|
|
convfft(signal,hp1,cD_undec);
|
|
downsamp(cD_undec,D,cD);
|
|
|
|
|
|
|
|
filtcoef(wname,lp1,hp1,lp2,hp2);
|
|
unsigned int N = cA.size();
|
|
|
|
fstream appx_s ("appx.txt", fstream::out | fstream::app);
|
|
fstream det_s ("det.txt", fstream::out | fstream::app);
|
|
for (unsigned int i = 0; i < N; i++){
|
|
appx_s << cA[i] << endl;
|
|
det_s << cD[i] << endl;
|
|
}
|
|
|
|
// cout << lpd.size() << "filter size" << endl;
|
|
|
|
return 0;
|
|
}
|
|
|
|
|
|
void* dwt_sym(vector<double> &signal, int J,string nm, vector<double> &dwt_output,
|
|
vector<double> &flag, vector<int> &length, int e){
|
|
|
|
unsigned int temp_len = signal.size();
|
|
if ( (temp_len % 2) != 0) {
|
|
double temp =signal[temp_len - 1];
|
|
signal.push_back(temp);
|
|
flag.push_back(1);
|
|
temp_len++;
|
|
} else {
|
|
flag.push_back(0);
|
|
}
|
|
length.push_back(temp_len);
|
|
flag.push_back(double(J));
|
|
// flag[2] contains symmetric extension length
|
|
|
|
|
|
vector<double> original_copy, appx_sig, det_sig;
|
|
original_copy = signal;
|
|
|
|
symm_ext(signal,e);
|
|
flag.push_back(double(e));
|
|
ofstream appx("appx.txt", ios::trunc);
|
|
appx.close();
|
|
ofstream det("det.txt", ios::trunc);
|
|
det.close();
|
|
//<------------------------------------------------------------------->
|
|
// Preparing for GnuPlot
|
|
// Storing Signal for Gnuplot
|
|
unsigned int count = original_copy.size();
|
|
ofstream gnusig("gnusig.dat");
|
|
for (unsigned int i = 0;i < count; i++) {
|
|
gnusig << i << " " << original_copy[i] << endl;
|
|
}
|
|
gnusig.close();
|
|
|
|
// Storing Filter Values for GnuPlot
|
|
vector<double> lp1,hp1,lp2,hp2;
|
|
filtcoef(nm,lp1,hp1,lp2,hp2);
|
|
ofstream gnufilt("gnufilt.dat");
|
|
unsigned int len_filt = lp1.size();
|
|
for (unsigned int i = 0; i < len_filt; i++) {
|
|
gnufilt << i << " " << lp1[i] << " " << hp1[i] << " " << lp2[i] << " " << hp2[i] << endl;
|
|
}
|
|
gnufilt.close();
|
|
// <------------------------------------------------------------------->
|
|
|
|
for (int iter = 0; iter < J; iter++) {
|
|
dwt1_sym(nm,signal, appx_sig, det_sig);
|
|
dwt_output.insert(dwt_output.begin(),det_sig.begin(),det_sig.end());
|
|
int l_temp = det_sig.size();
|
|
length.insert(length.begin(),l_temp);
|
|
|
|
if (iter == J-1 ) {
|
|
dwt_output.insert(dwt_output.begin(),appx_sig.begin(),appx_sig.end());
|
|
int l_temp = appx_sig.size();
|
|
length.insert(length.begin(),l_temp);
|
|
|
|
}
|
|
// vector<double> lp1,hp1,lp2,hp2;
|
|
// filtcoef(nm,lp1,hp1,lp2,hp2);
|
|
// gnudwtplot(sig, appx_sig, det_sig,lp1,hp1,lp2,hp2);
|
|
signal.clear();
|
|
signal = appx_sig;
|
|
appx_sig.clear();
|
|
det_sig.clear();
|
|
|
|
}
|
|
|
|
|
|
// Outputting Dwt Output and Flag as text files
|
|
|
|
ofstream dwtout ("dwtout.txt");
|
|
for (unsigned int i = 0; i < dwt_output.size(); i++){
|
|
dwtout << dwt_output[i] << endl;
|
|
}
|
|
|
|
// cout << flag[0]<< " " << flag[1] << endl;
|
|
|
|
ofstream flagged("flag.txt");
|
|
for (int i =0; i < 2; i++){
|
|
flagged << flag[i] << endl;
|
|
}
|
|
|
|
|
|
// Processing Approximation and Detail Coefficients at each level for GnuPlot
|
|
|
|
vector<double> appx_c , det_c;
|
|
ifstream sig_inp("appx.txt");
|
|
int appx_len = 0;
|
|
|
|
int det_len = 0;
|
|
while (sig_inp) {
|
|
double temp;
|
|
sig_inp >> temp;
|
|
appx_c.push_back(temp);
|
|
appx_len++;
|
|
}
|
|
appx_c.pop_back();
|
|
appx_len--;
|
|
|
|
ifstream sig_inp2("det.txt");
|
|
while (sig_inp2) {
|
|
double temp;
|
|
sig_inp2 >> temp;
|
|
det_c.push_back(temp);
|
|
det_len++;
|
|
}
|
|
det_c.pop_back();
|
|
det_len--;
|
|
// cout << det_len + 1 << endl;
|
|
|
|
vector<vector<double> > coeff(appx_len, vector<double>(2*J + 1,0));
|
|
for (int i = 0; i < appx_len; i++) {
|
|
coeff[i][0] = i;
|
|
// cout << coeff[i][0] << endl;
|
|
}
|
|
|
|
int val = 0;
|
|
for (int j= 0; j < J ; j++ ) {
|
|
int temp = length[J-j];
|
|
for (int i = 0; i < temp; i++) {
|
|
coeff[i][2 * (j + 1 ) - 1]=appx_c[val + i];
|
|
coeff[i][2 * (j + 1)]=det_c[val + i];
|
|
|
|
}
|
|
val+=temp;
|
|
|
|
}
|
|
|
|
ofstream gnuout("gnuout.dat");
|
|
for (int i = 0; i < appx_len; i++){
|
|
for (int j =0; j < 2* J +1; j++) {
|
|
gnuout << coeff[i][j] << " ";
|
|
}
|
|
gnuout << endl;
|
|
}
|
|
|
|
signal = original_copy;
|
|
|
|
|
|
return 0;
|
|
}
|
|
|
|
|
|
void* freq(vector<double> &sig, vector<double> &freq_resp) {
|
|
unsigned int K = sig.size();
|
|
unsigned int N = (unsigned int) pow(2.0,ceil(log10 (static_cast<double>(K))/log10(2.0)));
|
|
vector<complex<double> > fft_oup;
|
|
for (unsigned int i =0; i < sig.size(); i++) {
|
|
double temp = sig[i];
|
|
fft_oup.push_back(complex<double>(temp,0));
|
|
}
|
|
fft(fft_oup,1,N);
|
|
|
|
ofstream freq("freq.dat");
|
|
for (unsigned int i = 0; i < N; i++){
|
|
double temp = abs(fft_oup[i]);
|
|
freq_resp.push_back(temp);
|
|
}
|
|
circshift(freq_resp, N/2);
|
|
const double PI = 3.14159;
|
|
double n = -PI ;
|
|
for (unsigned int i = 0; i < N; i++){
|
|
freq << n <<" " << freq_resp[i] << endl;
|
|
n+= 2* PI/N;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
double convfft(vector<double> &a, vector<double> &b, vector<double> &c) {
|
|
unsigned int N = a.size() + b.size() - 1;
|
|
vector<complex<double> > inp, filt;
|
|
for (unsigned int i =0; i < a.size(); i++) {
|
|
double temp = a[i];
|
|
inp.push_back(complex<double>(temp,0));
|
|
}
|
|
for (unsigned int i =0; i < b.size(); i++) {
|
|
double temp = b[i];
|
|
filt.push_back(complex<double>(temp,0));
|
|
}
|
|
fft(inp,1,N);
|
|
fft(filt,1,N);
|
|
vector<complex<double> > temp;
|
|
unsigned int K=inp.size();
|
|
for (unsigned int i =0; i < K; i++){
|
|
complex<double> mult = inp[i]*filt[i];
|
|
temp.push_back(mult);
|
|
}
|
|
fft(temp, -1 , K);
|
|
for (unsigned int i =0; i < N ; i++){
|
|
double temp1 =real(temp[i]);
|
|
c.push_back(temp1);
|
|
}
|
|
|
|
|
|
return 0;
|
|
}
|
|
|
|
void* fft(vector<complex<double> > &data, int sign,unsigned int N){
|
|
double pi = - 3.14159265358979;
|
|
if ( sign == 1 || sign == -1) {
|
|
pi = sign * pi;
|
|
} else {
|
|
cout << "Format fft(data, num), num = +1(fft) and num = -1 (Ifft)" << endl;
|
|
exit(1);
|
|
}
|
|
unsigned int len = data.size();
|
|
vector<complex<double> >::iterator it;
|
|
it = data.end();
|
|
if ( len != N) {
|
|
unsigned int al = N - len;
|
|
data.insert(it,al,complex<double>(0,0));
|
|
}
|
|
|
|
unsigned int K = (unsigned int) pow(2.0,ceil(log10(static_cast<double>(N))/log10(2.0)));
|
|
vector<complex<double> >::iterator it1;
|
|
it1 = data.end();
|
|
if ( N < K) {
|
|
unsigned int al = K - N;
|
|
data.insert(it1,al,complex<double>(0,0));
|
|
N = K;
|
|
}
|
|
|
|
bitreverse(data);
|
|
|
|
// radix2(data);
|
|
for (unsigned int iter = 1; iter < N; iter <<=1)
|
|
{
|
|
const unsigned int step = iter << 1;
|
|
|
|
const double theta = pi / double(iter);
|
|
|
|
double wtemp = sin(theta * .5);
|
|
// Multipliers
|
|
double wreal = -2 * wtemp * wtemp;
|
|
double wimag = sin(theta);
|
|
|
|
// Factors
|
|
double wr = 1.0;
|
|
double wi = 0.0;
|
|
// Iteration through two loops
|
|
|
|
for (unsigned int m = 0; m < iter; m++)
|
|
{
|
|
// Iteration within m
|
|
for (unsigned int i = m; i < N; i += step)
|
|
{
|
|
// jth position
|
|
const unsigned int j = i + iter;
|
|
|
|
double tempr= wr * real(data[j]) - wi * imag(data[j]);
|
|
double tempi= wr * imag(data[j]) + wi * real(data[j]);
|
|
|
|
complex<double> temp(tempr,tempi);
|
|
data[j]= data[i]- temp;
|
|
data[i] += temp;
|
|
|
|
}
|
|
// Twiddle Factors updated
|
|
wtemp = wr;
|
|
wr += wr * wreal - wi * wimag;
|
|
wi += wi * wreal + wtemp * wimag ;
|
|
}
|
|
|
|
}
|
|
|
|
if ( sign == -1) {
|
|
double scale = 1.0/double(N);
|
|
for (unsigned int i = 0; i < N; i++){
|
|
data[i]*=scale;
|
|
}
|
|
}
|
|
|
|
|
|
|
|
// Place holder
|
|
return 0;
|
|
}
|
|
|
|
|
|
void* bitreverse(vector<complex<double> > &sig) {
|
|
unsigned int len = sig.size();
|
|
unsigned int N = (unsigned int) pow(2.0,ceil(log10(static_cast<double>(len))/log10(2.0)));
|
|
unsigned int rev = 0;
|
|
// Processing Input Data
|
|
for (unsigned int iter = 0; iter < N; ++iter)
|
|
{
|
|
if (rev > iter)
|
|
{
|
|
// Replacing current values with reversed values
|
|
|
|
double tempr = real(sig[rev]);
|
|
double tempi = imag(sig[rev]);
|
|
complex<double> temp(tempr,tempi);
|
|
sig[rev] = sig[iter];
|
|
sig[iter] = temp;
|
|
|
|
}
|
|
// Using filter "filt" such that the value of reverse changes with each iteration
|
|
unsigned int filt = N;
|
|
while (rev & (filt >>= 1)) {
|
|
rev &= ~filt;
|
|
}
|
|
rev |= filt;
|
|
}
|
|
return 0;
|
|
|
|
}
|
|
|
|
void* dwt(vector<double> &sig, int J, string nm, vector<double> &dwt_output
|
|
, vector<double> &flag ) {
|
|
|
|
int Max_Iter;
|
|
Max_Iter = (int) ceil(log( double(sig.size()))/log (2.0)) - 1;
|
|
if ( Max_Iter < J) {
|
|
cout << J << " Iterations are not possible with signal of length " << sig.size() << endl;
|
|
exit(1);
|
|
}
|
|
|
|
vector<double> original_copy,orig, appx_sig, det_sig;
|
|
original_copy = sig;
|
|
|
|
// Zero Pad the Signal to nearest 2^ M value ,where M is an integer.
|
|
unsigned int n_size = sig.size();
|
|
flag.push_back(0);
|
|
|
|
double int_n_size = log10 (static_cast<double> (n_size)) / log10(2.0);
|
|
if ( (pow(2.0, double(int(ceil(int_n_size)))) - pow(2.0, int_n_size)) != 0) {
|
|
dyadic_zpad_1d(sig);
|
|
flag.pop_back();
|
|
int flag_1 = (int) (pow(2.0, double(int(ceil(int_n_size)))) - pow(2.0, int_n_size)) ;
|
|
flag.push_back(flag_1);
|
|
}
|
|
|
|
flag.push_back(J);
|
|
orig = sig;
|
|
|
|
ofstream appx("appx.txt", ios::trunc);
|
|
appx.close();
|
|
ofstream det("det.txt", ios::trunc);
|
|
det.close();
|
|
//<------------------------------------------------------------------->
|
|
// Preparing for GnuPlot
|
|
// Storing Signal for Gnuplot
|
|
unsigned int count = sig.size();
|
|
ofstream gnusig("gnusig.dat");
|
|
unsigned int ct_orig=original_copy.size();
|
|
for (unsigned int i = 0;i < ct_orig; i++) {
|
|
gnusig << i << " " << original_copy[i] << endl;
|
|
}
|
|
gnusig.close();
|
|
|
|
// Storing Filter Values for GnuPlot
|
|
vector<double> lp1,hp1,lp2,hp2;
|
|
filtcoef(nm,lp1,hp1,lp2,hp2);
|
|
ofstream gnufilt("gnufilt.dat");
|
|
unsigned int len_filt = lp1.size();
|
|
for (unsigned int i = 0; i < len_filt; i++) {
|
|
gnufilt << i << " " << lp1[i] << " " << hp1[i] << " " << lp2[i] << " " << hp2[i] << endl;
|
|
}
|
|
gnufilt.close();
|
|
// <------------------------------------------------------------------->
|
|
|
|
|
|
for (int iter = 0; iter < J; iter++) {
|
|
dwt1(nm,orig, appx_sig, det_sig);
|
|
dwt_output.insert(dwt_output.begin(),det_sig.begin(),det_sig.end());
|
|
|
|
|
|
|
|
if (iter == J-1 ) {
|
|
dwt_output.insert(dwt_output.begin(),appx_sig.begin(),appx_sig.end());
|
|
|
|
}
|
|
// vector<double> lp1,hp1,lp2,hp2;
|
|
// filtcoef(nm,lp1,hp1,lp2,hp2);
|
|
// gnudwtplot(sig, appx_sig, det_sig,lp1,hp1,lp2,hp2);
|
|
// sig.clear();
|
|
orig = appx_sig;
|
|
appx_sig.clear();
|
|
det_sig.clear();
|
|
|
|
}
|
|
|
|
// Outputting Dwt Output and Flag as text files
|
|
|
|
ofstream dwtout ("dwtout.txt");
|
|
for (unsigned int i = 0; i < dwt_output.size(); i++){
|
|
dwtout << dwt_output[i] << endl;
|
|
}
|
|
|
|
// cout << flag[0]<< " " << flag[1] << endl;
|
|
|
|
ofstream flagged("flag.txt");
|
|
for (int i =0; i < 2; i++){
|
|
flagged << flag[i] << endl;
|
|
}
|
|
|
|
|
|
// Processing Approximation and Detail Coefficients at each level for GnuPlot
|
|
|
|
vector<double> appx_c , det_c;
|
|
ifstream sig_inp("appx.txt");
|
|
int appx_len = 0;
|
|
|
|
int det_len = 0;
|
|
while (sig_inp) {
|
|
double temp;
|
|
sig_inp >> temp;
|
|
appx_c.push_back(temp);
|
|
appx_len++;
|
|
}
|
|
appx_c.pop_back();
|
|
appx_len--;
|
|
|
|
ifstream sig_inp2("det.txt");
|
|
while (sig_inp2) {
|
|
double temp;
|
|
sig_inp2 >> temp;
|
|
det_c.push_back(temp);
|
|
det_len++;
|
|
}
|
|
det_c.pop_back();
|
|
det_len--;
|
|
// cout << det_len + 1 << endl;
|
|
|
|
vector<vector<double> > coeff(appx_len, vector<double>(2*J + 1,0));
|
|
for (int i = 0; i < appx_len; i++) {
|
|
coeff[i][0] = i;
|
|
// cout << coeff[i][0] << endl;
|
|
}
|
|
|
|
int val = 0;
|
|
for (int j= 0; j < J ; j++ ) {
|
|
int temp = count / (int) pow (2.0, (double) j+1);
|
|
for (int i = 0; i < temp; i++) {
|
|
coeff[i][2 * (j + 1 ) - 1]=appx_c[val + i];
|
|
coeff[i][2 * (j + 1)]=det_c[val + i];
|
|
|
|
}
|
|
val+=temp;
|
|
|
|
}
|
|
|
|
ofstream gnuout("gnuout.dat");
|
|
for (int i = 0; i < appx_len; i++){
|
|
for (int j =0; j < 2* J +1; j++) {
|
|
gnuout << coeff[i][j] << " ";
|
|
}
|
|
gnuout << endl;
|
|
}
|
|
|
|
sig = original_copy;
|
|
return 0;
|
|
}
|
|
|
|
void circshift(vector<double> &sig_cir, int L){
|
|
if ( abs(L) >(signed int) sig_cir.size()) {
|
|
L = sign(L) * (abs(L) % sig_cir.size());
|
|
}
|
|
|
|
if ( L < 0 ){
|
|
L = (sig_cir.size() + L) % sig_cir.size();
|
|
// cout << "L" << L << endl;
|
|
}
|
|
for (int i = 0; i < L; i++){
|
|
sig_cir.push_back(sig_cir[0]);
|
|
sig_cir.erase(sig_cir.begin());
|
|
}
|
|
|
|
}
|
|
|
|
double convol(vector<double> &a, vector<double> &b, vector<double> &c) {
|
|
unsigned int len_c = a.size() + b.size() - 1;
|
|
double* oup= NULL;
|
|
|
|
oup = new double[len_c];
|
|
vector<double>::iterator a_it;
|
|
a_it = a.end();
|
|
signed int al = len_c - a.size();
|
|
a.insert(a_it,al,0);
|
|
|
|
|
|
vector<double>::iterator b_it;
|
|
b_it = b.end();
|
|
signed int bl = len_c - b.size();
|
|
b.insert(b_it,bl, 0);
|
|
|
|
|
|
for (unsigned int ini = 0; ini < len_c ; ini++){
|
|
double ou1 = 0;
|
|
oup[ini] = 0;
|
|
double temp = 0;
|
|
for (unsigned int jni = 0; jni <= ini; jni++) {
|
|
ou1 = a[jni] * b[ini - jni];
|
|
oup[ini]+= ou1;
|
|
}
|
|
temp = oup[ini];
|
|
c.push_back(temp);
|
|
}
|
|
delete [] oup;
|
|
oup = NULL;
|
|
return 0;
|
|
}
|
|
|
|
void downsamp(vector<double> &sig, int M, vector<double> &sig_d){
|
|
int len = sig.size();
|
|
double len_n = ceil( (double) len / (double) M);
|
|
for (int i = 0; i < (int) len_n; i++) {
|
|
double temp = sig[i*M];
|
|
sig_d.push_back(temp);
|
|
}
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
void* dwt1(string wname, vector<double> &signal, vector<double> &cA, vector<double> &cD) {
|
|
|
|
vector<double> lpd, hpd, lpr, hpr;
|
|
|
|
filtcoef(wname,lpd,hpd,lpr,hpr);
|
|
// for (unsigned int i = 0; i < signal.size(); i++) {
|
|
// cout << signal[i] << endl;
|
|
// out2 << signal[i] <<endl;
|
|
// }
|
|
|
|
unsigned int temp_len = signal.size();
|
|
|
|
if ( (temp_len % 2) != 0) {
|
|
double temp =signal[temp_len - 1];
|
|
signal.push_back(temp);
|
|
}
|
|
|
|
int len_sig = signal.size();
|
|
int len_lpfilt = lpd.size();
|
|
int len_hpfilt = hpd.size();
|
|
int len_avg = (len_lpfilt + len_hpfilt) / 2;
|
|
|
|
// cout << len_lpfilt << "Filter" << endl;
|
|
per_ext(signal,len_avg / 2); // Periodic Extension
|
|
// computations designed to deal with boundary distortions
|
|
|
|
// Low Pass Filtering Operations in the Analysis Filter Bank Section
|
|
// int len_cA =(int) floor(double (len_sig + len_lpfilt -1) / double (2));
|
|
vector<double> cA_undec;
|
|
// convolving signal with lpd, Low Pass Filter, and O/P is stored in cA_undec
|
|
convfft(signal,lpd,cA_undec);
|
|
int D = 2; // Downsampling Factor is 2
|
|
|
|
// Downsampling by 2 gives cA
|
|
downsamp(cA_undec, D, cA);
|
|
int N = len_sig / 2;
|
|
|
|
cA.erase(cA.begin(),cA.begin()+len_avg/2);
|
|
cA.erase(cA.end()-len_avg/2,cA.end());
|
|
|
|
// High Pass Filtering Operations in the Analysis Filter Bank Section
|
|
// int len_cA =(int) floor(double (len_sig + len_lpfilt -1) / double (2));
|
|
|
|
vector<double> cD_undec;
|
|
// convolving signal with lpd, Low Pass Filter, and O/P is stored in cA_undec
|
|
convfft(signal,hpd,cD_undec);
|
|
// Downsampling Factor is 2
|
|
|
|
// Downsampling by 2 gives cA
|
|
downsamp(cD_undec, D, cD);
|
|
|
|
cD.erase(cD.begin(),cD.begin()+len_avg/2);
|
|
cD.erase(cD.end()-len_avg/2,cD.end());
|
|
|
|
|
|
// File Outputs
|
|
filtcoef(wname,lpd,hpd,lpr,hpr);
|
|
|
|
fstream appx_s ("appx.txt", fstream::out | fstream::app);
|
|
fstream det_s ("det.txt", fstream::out | fstream::app);
|
|
for (int i = 0; i < N; i++){
|
|
appx_s << cA[i] << endl;
|
|
det_s << cD[i] << endl;
|
|
}
|
|
|
|
// cout << lpd.size() << "filter size" << endl;
|
|
|
|
return 0;
|
|
}
|
|
|
|
void* dyadic_zpad_1d(vector<double> &signal) {
|
|
unsigned int N = signal.size();
|
|
double M = log10 (static_cast<double> (N)) / log10(2.0);
|
|
int D = (int) ceil(M);
|
|
double int_val = pow(2.0, double(D)) - pow(2.0, M);
|
|
|
|
int z = (int) int_val;
|
|
vector<double>::iterator a_it;
|
|
a_it = signal.end();
|
|
double val = signal[N-1];
|
|
// double val = 0;
|
|
signal.insert(a_it,z,val);
|
|
return 0;
|
|
|
|
}
|
|
|
|
void* gnudwtplot(int J) {
|
|
|
|
ofstream gnudwt("gnudwt.gnu.txt");
|
|
gnudwt << "# This Script will Plot Signal, DWT Coefficients and Filters Used" << endl;
|
|
gnudwt << "set terminal wxt 1" << endl;
|
|
gnudwt <<"set title \" Input Signal \" " << endl;
|
|
gnudwt << "plot \"gnusig.dat\" using 1:2 with lines " << endl;
|
|
gnudwt << "set terminal wxt 2" << endl;
|
|
gnudwt << "set multiplot layout "<< J << "," << 2 << endl;
|
|
for (int i = 0;i < J ; i++){
|
|
gnudwt << "# Plot " << 2*(i + 1) -1 << endl;
|
|
gnudwt << "set title \"Approximation Coefficients Level " << i+ 1 << " \"" << endl;
|
|
gnudwt << "plot \"gnuout.dat\" using 1:"<< 2*(i+1) << " with lines" << endl;
|
|
gnudwt << "# Plot "<< 2*(i + 1)<< endl;
|
|
gnudwt << "set title \"Detail Coefficients Level " << i + 1 <<"\" " << endl;
|
|
gnudwt << "plot \"gnuout.dat\" using 1:"<< 2*(i+1)+1<< " with lines" << endl;
|
|
}
|
|
gnudwt << "unset multiplot" <<endl;
|
|
gnudwt << "set terminal wxt 3" << endl;
|
|
gnudwt << "set multiplot layout 2,2" << endl;
|
|
gnudwt << "set title \"Filter Coefficients\" " << endl;
|
|
gnudwt << "# Plot 1" << endl;
|
|
gnudwt << "set title \"Low Pass Decomposition Filter \" " << endl;
|
|
gnudwt << "plot \"gnufilt.dat\" using 1:2 with impulse" << endl;
|
|
gnudwt << "# Plot 2" << endl;
|
|
gnudwt << "set title \"High Pass Decomposition Filter \" " << endl;
|
|
gnudwt << "plot \"gnufilt.dat\" using 1:3 with impulse" << endl;
|
|
gnudwt << "# Plot 3" << endl;
|
|
gnudwt << "set title \"Low Pass Reconstruction Filter \" " << endl;
|
|
gnudwt << "plot \"gnufilt.dat\" using 1:4 with impulse" << endl;
|
|
gnudwt << "# Plot 4" << endl;
|
|
gnudwt << "set title \"High Pass Reconstruction Filter \" " << endl;
|
|
gnudwt << "plot \"gnufilt.dat\" using 1:5 with impulse" << endl;
|
|
gnudwt << "unset multiplot" <<endl;
|
|
gnudwt << "set terminal wxt 4" << endl;
|
|
gnudwt <<"set title \" Reconstructed Signal \" " << endl;
|
|
gnudwt << "plot \"gnurecon.dat\" using 1:2 with lines " << endl;
|
|
|
|
|
|
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
void* idwt(vector<double> &dwtop,vector<double> &flag, string nm,
|
|
vector<double> &idwt_output) {
|
|
|
|
int J =(int) flag[1];
|
|
// int zpad =(int) flag[0];
|
|
|
|
vector<double> app;
|
|
vector<double> detail;
|
|
unsigned int app_len = dwtop.size() / int(pow(2.0,J));
|
|
|
|
app.assign(dwtop.begin(),dwtop.begin()+app_len);
|
|
detail.assign(dwtop.begin()+app_len, dwtop.begin()+ 2* app_len);
|
|
|
|
for (int i = 0; i < J; i++) {
|
|
|
|
idwt1(nm,idwt_output, app,detail);
|
|
app_len = 2 * app_len;
|
|
app.clear();
|
|
detail.clear();
|
|
if ( i < J - 1 ) {
|
|
detail.assign(dwtop.begin()+app_len, dwtop.begin()+ 2* app_len);
|
|
}
|
|
app = idwt_output;
|
|
}
|
|
// app.clear();
|
|
// detail.clear();
|
|
|
|
// vector<double> signal;
|
|
// idwt1(nm,signal, appx, det);
|
|
|
|
// Remove ZeroPadding
|
|
|
|
int zerop =(int) flag[0];
|
|
idwt_output.erase(idwt_output.end()- zerop,idwt_output.end());
|
|
|
|
|
|
unsigned int count = idwt_output.size();
|
|
ofstream gnurecon("gnurecon.dat");
|
|
for (unsigned int i = 0;i < count; i++) {
|
|
gnurecon << i << " " << idwt_output[i] << endl;
|
|
}
|
|
gnurecon.close();
|
|
|
|
return 0;
|
|
}
|
|
|
|
|
|
void* idwt1(string wname, vector<double> &X, vector<double> &cA, vector<double> &cD) {
|
|
vector<double> lpd1,hpd1, lpr1, hpr1;
|
|
|
|
filtcoef(wname,lpd1,hpd1,lpr1,hpr1);
|
|
int len_lpfilt = lpr1.size();
|
|
int len_hpfilt = hpr1.size();
|
|
int len_avg = (len_lpfilt + len_hpfilt) / 2;
|
|
//unsigned int N = 2 * cA.size();
|
|
int U = 2; // Upsampling Factor
|
|
|
|
// Operations in the Low Frequency branch of the Synthesis Filter Bank
|
|
|
|
vector<double> cA_up;
|
|
vector<double> X_lp;
|
|
per_ext(cA,len_avg/2);
|
|
|
|
upsamp(cA, U, cA_up);
|
|
convfft(cA_up, lpr1, X_lp);
|
|
|
|
|
|
// Operations in the High Frequency branch of the Synthesis Filter Bank
|
|
|
|
vector<double> cD_up;
|
|
vector<double> X_hp;
|
|
per_ext(cD,len_avg/2);
|
|
upsamp(cD, U, cD_up);
|
|
convfft(cD_up, hpr1, X_hp);
|
|
|
|
|
|
|
|
|
|
vecsum(X_lp,X_hp,X);
|
|
// Remove periodic extension
|
|
|
|
X.erase(X.begin(),X.begin()+len_avg+len_avg/2-1);
|
|
X.erase(X.end()-len_avg-len_avg/2,X.end());
|
|
|
|
|
|
|
|
|
|
return 0;
|
|
}
|
|
|
|
int sign(int X) {
|
|
if (X >= 0)
|
|
return 1;
|
|
else
|
|
return -1;
|
|
}
|
|
|
|
void upsamp(vector<double> &sig, int M, vector<double> &sig_u) {
|
|
int len = sig.size();
|
|
double len_n = ceil( (double) len * (double) M);
|
|
|
|
for (int i = 0; i < (int) len_n; i++) {
|
|
if ( i % M == 0) {
|
|
double temp = sig[i / M];
|
|
sig_u.push_back(temp);
|
|
|
|
}
|
|
else
|
|
{
|
|
sig_u.push_back(0);
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
}
|
|
|
|
double op_sum(double i, double j) {
|
|
return (i+j);
|
|
}
|
|
|
|
int vecsum(vector<double> &a, vector<double> &b, vector<double> &c){
|
|
|
|
|
|
c.resize(a.size());
|
|
transform (a.begin(), a.end(), b.begin(), b.begin(), op_sum);
|
|
c = b;
|
|
return 0;
|
|
}
|
|
|
|
void* getcoeff2d(vector<vector<double> > &dwtoutput, vector<vector<double> > &cH,
|
|
vector<vector<double> > &cV,vector<vector<double> > &cD,vector<double> &flag, int &N) {
|
|
if (N > flag[2]) {
|
|
cout << "Signal is decimated only up to " << flag[2] << " levels" << endl;
|
|
exit(1);
|
|
}
|
|
int rows = dwtoutput.size();
|
|
int cols = dwtoutput[0].size();
|
|
// Getting Horizontal Coefficients
|
|
int r = (int) ceil((double) rows /pow(2.0,N)) ;
|
|
int c = (int) ceil((double) cols /pow(2.0,N)) ;
|
|
|
|
for (int i =0; i < (int) ceil ((double) rows /pow(2.0,N)); i++){
|
|
for (int j =0; j < (int) ceil ((double) cols /pow(2.0,N)); j++) {
|
|
cH[i][j]=dwtoutput[i][c+ j];
|
|
}
|
|
}
|
|
|
|
|
|
for (int i =0; i < (int) ceil ((double) rows /pow(2.0,N)); i++){
|
|
for (int j =0; j < (int) ceil ((double) cols /pow(2.0,N)); j++) {
|
|
cV[i][j]=dwtoutput[i + r][j];
|
|
}
|
|
}
|
|
|
|
for (int i =0; i < (int) ceil ((double) rows /pow(2.0,N)); i++){
|
|
for (int j =0; j < (int) ceil ((double) cols /pow(2.0,N)); j++) {
|
|
cD[i][j]=dwtoutput[i + r][c+ j];
|
|
}
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
void* zero_remove(vector<vector<double> > &input,vector<vector<double> > &output) {
|
|
int zero_rows = output.size()-input.size();
|
|
int zero_cols = output[0].size()-input[0].size();
|
|
|
|
vector<vector<double> >::iterator row = output.end()-zero_rows;
|
|
|
|
|
|
unsigned int ousize = output.size();
|
|
for (unsigned int i = input.size(); i < ousize; i++){
|
|
output.erase(row);
|
|
row++;
|
|
|
|
}
|
|
|
|
// unsigned int ousize2 = output[0].size();
|
|
|
|
|
|
for (unsigned int i = 0; i < ousize; i++){
|
|
vector<double> ::iterator col = output[i].end()-zero_cols;
|
|
|
|
output[i].erase(col, output[i].end());
|
|
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
void* dwt_output_dim(vector<vector<double> >&signal, int &r, int &c ){
|
|
int rows =signal.size();
|
|
int cols = signal[0].size();
|
|
|
|
double Mr = log10 (static_cast<double> (rows)) / log10(2.0);
|
|
int Dr = (int) ceil(Mr);
|
|
double int_val_row = pow(2.0, double(Dr));
|
|
int r1 = (int) int_val_row;
|
|
|
|
double Mc = log10 (static_cast<double> (cols)) / log10(2.0);
|
|
int Dc = (int) ceil(Mc);
|
|
double int_val_cols = pow(2.0, double(Dc));
|
|
int c1 = (int) int_val_cols;
|
|
r=max(r1,c1);
|
|
c=max(r1,c1);
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
void* dyadic_zpad_2d(vector<vector<double> > &signal,vector<vector<double> > &mod){
|
|
int rows =signal.size();
|
|
int cols = signal[0].size();
|
|
|
|
for (int i=0; i < rows; i++) {
|
|
for (int j = 0; j < cols; j++){
|
|
mod[i][j] = signal[i][j];
|
|
}
|
|
|
|
}
|
|
// Zeropadding the columns
|
|
|
|
double Mr = log10 (static_cast<double> (rows)) / log10(2.0);
|
|
int Dr = (int) ceil(Mr);
|
|
double int_val_row = pow(2.0, double(Dr)) - pow(2.0, Mr);
|
|
|
|
int zeros_row = (int) int_val_row;
|
|
|
|
double Mc = log10 (static_cast<double> (cols)) / log10(2.0);
|
|
int Dc = (int) ceil(Mc);
|
|
double int_val_cols = pow(2.0, double(Dc)) - pow(2.0, Mc);
|
|
|
|
int zeros_cols = (int) int_val_cols;
|
|
|
|
for (int i=0; i < rows + zeros_row; i++) {
|
|
for (int j = cols; j < cols+zeros_cols; j++){
|
|
|
|
mod[i][j] = 0;
|
|
}
|
|
|
|
}
|
|
|
|
for (int i= rows; i < rows + zeros_row; i++) {
|
|
for (int j = 0; j < cols+zeros_cols; j++){
|
|
mod[i][j] = 0;
|
|
}
|
|
|
|
}
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
void* idwt_2d(vector<vector<double> > &dwtop,vector<double> &flag, string nm,
|
|
vector<vector<double> > &idwt_output){
|
|
int J =(int) flag[2];
|
|
int rows =(int) ceil( dwtop.size() / pow(2.0,J));
|
|
int cols =(int) ceil(dwtop[0].size()/ pow(2.0,J));
|
|
int rows_n = rows;
|
|
int cols_n = cols;
|
|
for (int iter=0; iter < J; iter++) {
|
|
|
|
|
|
vector<vector<double> > idwt_output2(rows_n*2, vector<double>(cols_n * 2));
|
|
|
|
vector<vector<double> > cA(rows_n, vector<double>(cols_n));
|
|
vector<vector<double> > cH(rows_n, vector<double>(cols_n));
|
|
vector<vector<double> > cV(rows_n, vector<double>(cols_n));
|
|
vector<vector<double> > cD(rows_n, vector<double>(cols_n));
|
|
if (iter == 0) {
|
|
for (int i = 0 ; i < rows_n; i++ ){
|
|
for (int j = 0; j < cols_n; j++){
|
|
cA[i][j] = dwtop[i][j];
|
|
}
|
|
}}
|
|
else {
|
|
cA=idwt_output;
|
|
}
|
|
for (int i = 0 ; i < rows_n; i++ ){
|
|
for (int j = cols_n; j < cols_n * 2; j++){
|
|
cH[i][j - cols_n] = dwtop[i][j];
|
|
}
|
|
}
|
|
|
|
for (int i = rows_n ; i < rows_n * 2; i++ ){
|
|
for (int j = 0; j < cols_n; j++){
|
|
cV[i - rows_n][j] = dwtop[i][j];
|
|
}
|
|
}
|
|
|
|
for (int i = rows_n ; i < rows_n * 2; i++ ){
|
|
for (int j = cols_n; j < cols_n * 2; j++){
|
|
cD[i - rows_n][j - cols_n] = dwtop[i][j];
|
|
}
|
|
}
|
|
rows_n =rows_n * 2;
|
|
cols_n = cols_n * 2;
|
|
|
|
|
|
idwt2(nm,idwt_output2, cA, cH,cV,cD);
|
|
|
|
idwt_output = idwt_output2;
|
|
|
|
}
|
|
|
|
|
|
return 0;
|
|
}
|
|
|
|
void* dwt_2d(vector<vector<double> > &sig, int J, string nm, vector<vector<double> > &dwt_output
|
|
, vector<double> &flag ) {
|
|
// flag will contain 3 values flag[2] = J, flag[0] and flag[1] will contain zeropad dimensions
|
|
|
|
int Max_Iter;
|
|
Max_Iter = min((int) ceil(log( double(sig.size()))/log (2.0)),(int) ceil(log( double(sig[0].size()))/log (2.0)));
|
|
if ( Max_Iter < J) {
|
|
cout << J << " Iterations are not possible with signals of this dimension " << endl;
|
|
exit(1);
|
|
}
|
|
vector<vector<double> > original_copy;
|
|
original_copy = sig;
|
|
|
|
// Zeropadding the signal to nearest 2^ M X 2^ N values where M and N are int.
|
|
int m_size = sig.size(); // No. of rows
|
|
int n_size = sig[0].size(); //No. of columns
|
|
|
|
double int_m_size1 = log10 (static_cast<double> (m_size)) / log10(2.0);
|
|
double int_n_size1 = log10 (static_cast<double> (n_size)) / log10(2.0);
|
|
double int_m_size = max(int_m_size1,int_n_size1);
|
|
double int_n_size = max(int_m_size1,int_n_size1);
|
|
vector<vector<double> > sig2((int) pow(2.0,ceil(int_m_size)),vector<double>((int) pow(2.0,ceil(int_m_size))));
|
|
dyadic_zpad_2d(sig,sig2);
|
|
|
|
/* if ( (pow(2.0, double(int(ceil(int_m_size)))) - pow(2.0, int_m_size)) != 0 ||
|
|
(pow(2.0, double(int(ceil(int_n_size)))) - pow(2.0, int_n_size)) != 0) {
|
|
dyadic_zpad_2d(sig,sig2);
|
|
|
|
} else {
|
|
sig2 = sig;
|
|
}*/
|
|
|
|
int rows_n =(int) pow(2.0,ceil(int_m_size));
|
|
int cols_n =(int) pow(2.0,ceil(int_n_size));
|
|
for (int i = 0; i < rows_n; i++){
|
|
for (int j=0; j < cols_n; j++) {
|
|
dwt_output[i][j] =0;
|
|
}
|
|
}
|
|
// Flag Values
|
|
double temp = (double) (sig2.size() - sig.size()); // Number of zeropad rows
|
|
flag.push_back(temp);
|
|
double temp2 = (double) (sig2[0].size() - sig[0].size());// Number of zpad cols
|
|
flag.push_back(temp2);
|
|
flag.push_back((double) J); // Number of Iterations
|
|
|
|
|
|
for (int iter = 0; iter < J; iter++) {
|
|
|
|
|
|
rows_n = rows_n / 2;
|
|
cols_n = cols_n / 2;
|
|
|
|
vector<vector<double> > cA(rows_n, vector<double>(cols_n));
|
|
vector<vector<double> > cH(rows_n, vector<double>(cols_n));
|
|
vector<vector<double> > cV(rows_n, vector<double>(cols_n));
|
|
vector<vector<double> > cD(rows_n, vector<double>(cols_n));
|
|
|
|
if (iter == 0) {
|
|
dwt2(nm,sig2,cA,cH,cV,cD);
|
|
} else {
|
|
dwt2(nm,sig2,cA,cH,cV,cD);
|
|
|
|
}
|
|
vector<vector<double> > temp_sig2(rows_n, vector<double>(cols_n));
|
|
|
|
sig2 = cA;
|
|
temp_sig2 = cA;
|
|
|
|
for(int i =0; i < rows_n; i++){
|
|
for (int j =0; j < cols_n; j++){
|
|
dwt_output[i][j]=cA[i][j];
|
|
}
|
|
}
|
|
for(int i =0; i < rows_n; i++){
|
|
for (int j = cols_n; j < cols_n * 2; j++){
|
|
dwt_output[i][j]=cH[i][j - cols_n];
|
|
}
|
|
}
|
|
|
|
for(int i = rows_n; i < rows_n * 2; i++){
|
|
for (int j =0; j < cols_n; j++){
|
|
dwt_output[i][j]=cV[i - rows_n][j];
|
|
}
|
|
}
|
|
|
|
for(int i = rows_n; i < rows_n * 2; i++){
|
|
for (int j = cols_n; j < cols_n * 2; j++){
|
|
dwt_output[i][j]=cD[i- rows_n][j - cols_n];
|
|
}
|
|
}
|
|
|
|
|
|
}
|
|
|
|
ofstream dwt2out("dwt2out.dat");
|
|
for (unsigned int i= 0; i < dwt_output.size(); i++){
|
|
for (unsigned int j =0; j < dwt_output[0].size(); j++){
|
|
dwt2out << dwt_output[i][j] <<endl;
|
|
}
|
|
dwt2out << endl;
|
|
}
|
|
|
|
return 0;
|
|
|
|
}
|
|
void* branch_lp_hp_up(string wname,vector<double> &cA, vector<double> &cD, vector<double> &X) {
|
|
vector<double> lpd1,hpd1, lpr1, hpr1;
|
|
|
|
filtcoef(wname,lpd1,hpd1,lpr1,hpr1);
|
|
int len_lpfilt = lpr1.size();
|
|
int len_hpfilt = hpr1.size();
|
|
int len_avg = (len_lpfilt + len_hpfilt) / 2;
|
|
//unsigned int N = 2 * cA.size();
|
|
int U = 2; // Upsampling Factor
|
|
|
|
// Operations in the Low Frequency branch of the Synthesis Filter Bank
|
|
|
|
vector<double> cA_up;
|
|
vector<double> X_lp;
|
|
per_ext(cA,len_avg/2);
|
|
|
|
upsamp(cA, U, cA_up);
|
|
convfft(cA_up, lpr1, X_lp);
|
|
|
|
|
|
// Operations in the High Frequency branch of the Synthesis Filter Bank
|
|
|
|
vector<double> cD_up;
|
|
vector<double> X_hp;
|
|
per_ext(cD,len_avg/2);
|
|
upsamp(cD, U, cD_up);
|
|
convfft(cD_up, hpr1, X_hp);
|
|
|
|
|
|
|
|
|
|
vecsum(X_lp,X_hp,X);
|
|
// Remove periodic extension
|
|
|
|
X.erase(X.begin(),X.begin()+len_avg+len_avg/2-1);
|
|
X.erase(X.end()-len_avg-len_avg/2,X.end());
|
|
|
|
return 0;
|
|
}
|
|
|
|
void* branch_hp_dn(string wname, vector<double> &signal, vector<double> &sigop) {
|
|
|
|
vector<double> lpd, hpd, lpr, hpr;
|
|
|
|
filtcoef(wname,lpd,hpd,lpr,hpr);
|
|
// for (unsigned int i = 0; i < signal.size(); i++) {
|
|
// cout << signal[i] << endl;
|
|
// out2 << signal[i] <<endl;
|
|
// }
|
|
|
|
unsigned int temp_len = signal.size();
|
|
|
|
if ( (temp_len % 2) != 0) {
|
|
double temp =signal[temp_len - 1];
|
|
signal.push_back(temp);
|
|
}
|
|
|
|
int len_lpfilt = lpd.size();
|
|
int len_hpfilt = hpd.size();
|
|
int len_avg = (len_lpfilt + len_hpfilt) / 2;
|
|
|
|
// cout << len_lpfilt << "Filter" << endl;
|
|
per_ext(signal,len_avg / 2); // Periodic Extension
|
|
// computations designed to deal with boundary distortions
|
|
|
|
// Low Pass Filtering Operations in the Analysis Filter Bank Section
|
|
// int len_cA =(int) floor(double (len_sig + len_lpfilt -1) / double (2));
|
|
vector<double> cA_undec;
|
|
// convolving signal with lpd, Low Pass Filter, and O/P is stored in cA_undec
|
|
convfft(signal,hpd,cA_undec);
|
|
int D = 2; // Downsampling Factor is 2
|
|
|
|
// Downsampling by 2 gives cA
|
|
downsamp(cA_undec, D, sigop);
|
|
|
|
sigop.erase(sigop.begin(),sigop.begin()+len_avg/2);
|
|
sigop.erase(sigop.end()-len_avg/2,sigop.end());
|
|
return 0;
|
|
|
|
|
|
|
|
}
|
|
void* branch_lp_dn(string wname, vector<double> &signal, vector<double> &sigop){
|
|
|
|
vector<double> lpd, hpd, lpr, hpr;
|
|
|
|
filtcoef(wname,lpd,hpd,lpr,hpr);
|
|
// for (unsigned int i = 0; i < signal.size(); i++) {
|
|
// cout << signal[i] << endl;
|
|
// out2 << signal[i] <<endl;
|
|
// }
|
|
|
|
unsigned int temp_len = signal.size();
|
|
|
|
if ( (temp_len % 2) != 0) {
|
|
double temp =signal[temp_len - 1];
|
|
signal.push_back(temp);
|
|
}
|
|
|
|
int len_lpfilt = lpd.size();
|
|
int len_hpfilt = hpd.size();
|
|
int len_avg = (len_lpfilt + len_hpfilt) / 2;
|
|
|
|
// cout << len_lpfilt << "Filter" << endl;
|
|
per_ext(signal,len_avg / 2); // Periodic Extension
|
|
// computations designed to deal with boundary distortions
|
|
|
|
// Low Pass Filtering Operations in the Analysis Filter Bank Section
|
|
// int len_cA =(int) floor(double (len_sig + len_lpfilt -1) / double (2));
|
|
vector<double> cA_undec;
|
|
// convolving signal with lpd, Low Pass Filter, and O/P is stored in cA_undec
|
|
convfft(signal,lpd,cA_undec);
|
|
int D = 2; // Downsampling Factor is 2
|
|
|
|
// Downsampling by 2 gives cA
|
|
downsamp(cA_undec, D, sigop);
|
|
|
|
sigop.erase(sigop.begin(),sigop.begin()+len_avg/2);
|
|
sigop.erase(sigop.end()-len_avg/2,sigop.end());
|
|
|
|
|
|
return 0;
|
|
|
|
}
|
|
void* idwt2(string name,vector<vector<double> > &signal, vector<vector<double> > &cLL,
|
|
vector<vector<double> > &cLH, vector<vector<double> > &cHL, vector<vector<double> > &cHH) {
|
|
// Synthesis
|
|
int rows= cLL.size();
|
|
int cols= cLL[0].size();
|
|
int rows_n = 2 * rows;
|
|
// Row Upsampling and Column Filtering at the first LP Stage
|
|
vector<vector<double> > cL(rows_n,vector<double>(cols));
|
|
vector<vector<double> > cH(rows_n,vector<double>(cols));
|
|
|
|
for (int j =0; j < cols; j++) {
|
|
|
|
vector<double> sigLL;
|
|
vector<double> sigLH;
|
|
for (int i=0;i < rows;i++) {
|
|
|
|
double temp1 = cLL[i][j];
|
|
double temp2 = cLH[i][j];
|
|
sigLL.push_back(temp1);
|
|
sigLH.push_back(temp2);
|
|
}
|
|
vector<double> oup;
|
|
|
|
branch_lp_hp_up(name,sigLL,sigLH,oup);
|
|
sigLL.clear();
|
|
sigLH.clear();
|
|
for (int i=0;i < (int) oup.size();i++) {
|
|
cL[i][j] = oup[i];
|
|
}
|
|
|
|
}
|
|
|
|
for (int j =0; j < cols; j++) {
|
|
vector<double> sigHL;
|
|
vector<double> sigHH;
|
|
for (int i=0;i < rows;i++) {
|
|
double temp3 = cHL[i][j];
|
|
double temp4 = cHH[i][j];
|
|
sigHL.push_back(temp3);
|
|
sigHH.push_back(temp4);
|
|
}
|
|
vector<double> oup2;
|
|
branch_lp_hp_up(name,sigHL,sigHH,oup2);
|
|
sigHL.clear();
|
|
sigHH.clear();
|
|
|
|
for (int i=0;i < (int) oup2.size();i++) {
|
|
cH[i][j] = oup2[i];
|
|
}
|
|
|
|
}
|
|
|
|
for (int i =0; i < rows_n; i++) {
|
|
vector<double> sigL;
|
|
vector<double> sigH;
|
|
for (int j=0;j < cols;j++) {
|
|
double temp5 = cL[i][j];\
|
|
double temp6 = cH[i][j];
|
|
sigL.push_back(temp5);
|
|
sigH.push_back(temp6);
|
|
}
|
|
vector<double> oup3;
|
|
branch_lp_hp_up(name,sigL,sigH,oup3);
|
|
sigL.clear();
|
|
sigH.clear();
|
|
|
|
for (int j=0;j < (int) oup3.size();j++) {
|
|
signal[i][j] = oup3[j];
|
|
}
|
|
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
void* dwt2(string name,vector<vector<double> > &signal, vector<vector<double> > &cLL,
|
|
vector<vector<double> > &cLH, vector<vector<double> > &cHL, vector<vector<double> > &cHH){
|
|
//Analysis
|
|
int rows = signal.size();
|
|
int cols = signal[0].size();
|
|
int cols_lp1 =(int) ceil( (double) cols / 2);
|
|
int cols_hp1 =(int) ceil( (double) cols / 2);
|
|
vector<vector<double> > lp_dn1(rows, vector<double>( cols_lp1));
|
|
// Implementing row filtering and column downsampling in each branch.
|
|
for (int i =0; i < rows; i++) {
|
|
vector<double> temp_row;
|
|
for (int j=0;j < cols;j++) {
|
|
double temp = signal[i][j];
|
|
temp_row.push_back(temp);
|
|
}
|
|
vector<double> oup;
|
|
branch_lp_dn(name,temp_row,oup);
|
|
temp_row.clear();
|
|
|
|
for (int j=0;j < (int) oup.size();j++) {
|
|
lp_dn1[i][j] = oup[j];
|
|
}
|
|
|
|
}
|
|
|
|
vector<vector<double> > hp_dn1(rows, vector<double>( cols_hp1));
|
|
|
|
|
|
for (int i =0; i < rows; i++) {
|
|
vector<double> temp_row2;
|
|
for (int j=0;j < cols;j++) {
|
|
double temp = signal[i][j];
|
|
temp_row2.push_back(temp);
|
|
}
|
|
|
|
vector<double> oup2;
|
|
branch_hp_dn(name,temp_row2,oup2);
|
|
temp_row2.clear();
|
|
|
|
for (int j=0;j < (int) oup2.size();j++) {
|
|
hp_dn1[i][j] = oup2[j];
|
|
}
|
|
|
|
}
|
|
|
|
cols =(int) ceil( double (cols) / 2);
|
|
// Implementing column filtering and row downsampling in Low Pass branch.
|
|
|
|
for (int j =0; j < cols; j++) {
|
|
vector<double> temp_row3;
|
|
for (int i=0;i < rows;i++) {
|
|
double temp = lp_dn1[i][j];
|
|
temp_row3.push_back(temp);
|
|
}
|
|
vector<double> oup3;
|
|
branch_lp_dn(name,temp_row3,oup3);
|
|
temp_row3.clear();
|
|
|
|
for (int i=0;i < (int) oup3.size();i++) {
|
|
cLL[i][j] = oup3[i];
|
|
}
|
|
|
|
}
|
|
|
|
for (int j =0; j < cols; j++) {
|
|
vector<double> temp_row4;
|
|
for (int i=0;i < rows;i++) {
|
|
double temp = lp_dn1[i][j];
|
|
temp_row4.push_back(temp);
|
|
}
|
|
vector<double> oup4;
|
|
branch_hp_dn(name,temp_row4,oup4);
|
|
temp_row4.clear();
|
|
|
|
for (int i=0;i < (int) oup4.size();i++) {
|
|
cLH[i][j] = oup4[i];
|
|
}
|
|
|
|
}
|
|
|
|
// Implementing column filtering and row downsampling in Low Pass branch.
|
|
|
|
for (int j =0; j < cols; j++) {
|
|
vector<double> temp_row5;
|
|
for (int i=0;i < rows;i++) {
|
|
double temp = hp_dn1[i][j];
|
|
temp_row5.push_back(temp);
|
|
}
|
|
vector<double> oup5;
|
|
branch_lp_dn(name,temp_row5,oup5);
|
|
temp_row5.clear();
|
|
|
|
for (int i=0;i < (int) oup5.size();i++) {
|
|
cHL[i][j] = oup5[i];
|
|
}
|
|
|
|
}
|
|
|
|
|
|
for (int j =0; j < cols; j++) {
|
|
vector<double> temp_row6;
|
|
for (int i=0;i < rows;i++) {
|
|
double temp = hp_dn1[i][j];
|
|
temp_row6.push_back(temp);
|
|
}
|
|
vector<double> oup6;
|
|
branch_hp_dn(name,temp_row6,oup6);
|
|
temp_row6.clear();
|
|
|
|
for (int i=0;i < (int) oup6.size();i++) {
|
|
cHH[i][j] = oup6[i];
|
|
}
|
|
|
|
}
|
|
|
|
|
|
return 0;
|
|
}
|
|
|
|
|
|
|
|
void* downsamp2(vector<vector<double> > & vec1,vector<vector<double> > & vec2, int rows_dn, int cols_dn) {
|
|
|
|
int rows = vec1.size();
|
|
int cols = vec1[0].size();
|
|
double rows_n = ceil( (double) rows / (double) rows_dn);
|
|
double cols_n = ceil( (double) cols / (double) cols_dn);
|
|
for (int i =0; i < (int)rows_n; i++){
|
|
for (int j = 0; j< (int) cols_n; j++){
|
|
|
|
vec2[i][j] = vec1[i * rows_dn][j*cols_dn];
|
|
}
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
void* upsamp2(vector<vector<double> > & vec1,vector<vector<double> > & vec2, int rows_up, int cols_up){
|
|
|
|
int rows = vec1.size();
|
|
int cols = vec1[0].size();
|
|
int rows_n = rows * rows_up;
|
|
int cols_n = cols * cols_up;
|
|
for (int i = 0; i < rows_n; i++){
|
|
for (int j = 0; j < cols_n; j++){
|
|
if ( i % rows_up == 0 && j % cols_up == 0){
|
|
vec2[i][j]=vec1[(int) (i/rows_up)][(int) (j/cols_up)];
|
|
} else {
|
|
vec2[i][j] = 0;
|
|
}
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
|
|
int filtcoef(string name, vector<double> &lp1, vector<double> &hp1, vector<double> &lp2,
|
|
vector<double> &hp2){
|
|
if (name == "haar" || name == "db1" ) {
|
|
lp1.push_back(0.7071);lp1.push_back(0.7071);
|
|
hp1.push_back(-0.7071);hp1.push_back(0.7071);
|
|
lp2.push_back(0.7071);lp2.push_back(0.7071);
|
|
hp2.push_back(0.7071);hp2.push_back(-0.7071);
|
|
// cout << lp2[1] << endl;
|
|
// hpd = {-0.7071, 0.7071};
|
|
// lpr = {0.7071, 0.7071};
|
|
// hpr = {0.7071, -0.7071};
|
|
return 0;
|
|
}
|
|
else if ( name == "db2"){
|
|
double lp1_a[] = {-0.12940952255092145, 0.22414386804185735, 0.83651630373746899,
|
|
0.48296291314469025};
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {-0.48296291314469025, 0.83651630373746899, -0.22414386804185735,
|
|
-0.12940952255092145};
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {0.48296291314469025, 0.83651630373746899, 0.22414386804185735,
|
|
-0.12940952255092145};
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {-0.12940952255092145, -0.22414386804185735, 0.83651630373746899,
|
|
-0.48296291314469025};
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
|
|
else if ( name == "db3"){
|
|
double lp1_a[] = {0.035226291882100656, -0.085441273882241486, -0.13501102001039084,
|
|
0.45987750211933132, 0.80689150931333875, 0.33267055295095688};
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {-0.33267055295095688, 0.80689150931333875, -0.45987750211933132,
|
|
-0.13501102001039084, 0.085441273882241486, 0.035226291882100656 };
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {0.33267055295095688, 0.80689150931333875, 0.45987750211933132,
|
|
-0.13501102001039084, -0.085441273882241486, 0.035226291882100656 };
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {0.035226291882100656, 0.085441273882241486, -0.13501102001039084,
|
|
-0.45987750211933132, 0.80689150931333875, -0.33267055295095688 };
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
|
|
else if ( name == "db4"){
|
|
double lp1_a[] = {-0.010597401784997278, 0.032883011666982945, 0.030841381835986965,
|
|
-0.18703481171888114, -0.027983769416983849, 0.63088076792959036,
|
|
0.71484657055254153, 0.23037781330885523 };
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {-0.23037781330885523, 0.71484657055254153, -0.63088076792959036,
|
|
-0.027983769416983849, 0.18703481171888114, 0.030841381835986965,
|
|
-0.032883011666982945, -0.010597401784997278 };
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {0.23037781330885523, 0.71484657055254153, 0.63088076792959036,
|
|
-0.027983769416983849, -0.18703481171888114, 0.030841381835986965,
|
|
0.032883011666982945, -0.010597401784997278 };
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {-0.010597401784997278, -0.032883011666982945, 0.030841381835986965,
|
|
0.18703481171888114, -0.027983769416983849, -0.63088076792959036,
|
|
0.71484657055254153, -0.23037781330885523 };
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
|
|
else if ( name == "db5"){
|
|
double lp1_a[] = {0.0033357252850015492, -0.012580751999015526, -0.0062414902130117052,
|
|
0.077571493840065148, -0.03224486958502952, -0.24229488706619015,
|
|
0.13842814590110342, 0.72430852843857441, 0.60382926979747287,
|
|
0.16010239797412501 };
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {-0.16010239797412501, 0.60382926979747287, -0.72430852843857441,
|
|
0.13842814590110342, 0.24229488706619015, -0.03224486958502952,
|
|
-0.077571493840065148, -0.0062414902130117052, 0.012580751999015526,
|
|
0.0033357252850015492 };
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {0.16010239797412501, 0.60382926979747287, 0.72430852843857441,
|
|
0.13842814590110342, -0.24229488706619015, -0.03224486958502952,
|
|
0.077571493840065148, -0.0062414902130117052, -0.012580751999015526,
|
|
0.0033357252850015492 };
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {0.0033357252850015492, 0.012580751999015526, -0.0062414902130117052,
|
|
-0.077571493840065148, -0.03224486958502952, 0.24229488706619015,
|
|
0.13842814590110342, -0.72430852843857441, 0.60382926979747287,
|
|
-0.16010239797412501 };
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
|
|
else if ( name == "db6"){
|
|
double lp1_a[] = {-0.0010773010849955799,
|
|
0.0047772575110106514,
|
|
0.0005538422009938016,
|
|
-0.031582039318031156,
|
|
0.027522865530016288,
|
|
0.097501605587079362,
|
|
-0.12976686756709563,
|
|
-0.22626469396516913,
|
|
0.3152503517092432,
|
|
0.75113390802157753,
|
|
0.49462389039838539,
|
|
0.11154074335008017
|
|
};
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {-0.11154074335008017,
|
|
0.49462389039838539,
|
|
-0.75113390802157753,
|
|
0.3152503517092432,
|
|
0.22626469396516913,
|
|
-0.12976686756709563,
|
|
-0.097501605587079362,
|
|
0.027522865530016288,
|
|
0.031582039318031156,
|
|
0.0005538422009938016,
|
|
-0.0047772575110106514,
|
|
-0.0010773010849955799
|
|
};
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {0.11154074335008017,
|
|
0.49462389039838539,
|
|
0.75113390802157753,
|
|
0.3152503517092432,
|
|
-0.22626469396516913,
|
|
-0.12976686756709563,
|
|
0.097501605587079362,
|
|
0.027522865530016288,
|
|
-0.031582039318031156,
|
|
0.0005538422009938016,
|
|
0.0047772575110106514,
|
|
-0.0010773010849955799
|
|
};
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {-0.0010773010849955799,
|
|
-0.0047772575110106514,
|
|
0.0005538422009938016,
|
|
0.031582039318031156,
|
|
0.027522865530016288,
|
|
-0.097501605587079362,
|
|
-0.12976686756709563,
|
|
0.22626469396516913,
|
|
0.3152503517092432,
|
|
-0.75113390802157753,
|
|
0.49462389039838539,
|
|
-0.11154074335008017
|
|
};
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
|
|
else if ( name == "db7"){
|
|
double lp1_a[] = {0.00035371380000103988,
|
|
-0.0018016407039998328,
|
|
0.00042957797300470274,
|
|
0.012550998556013784,
|
|
-0.01657454163101562,
|
|
-0.038029936935034633,
|
|
0.080612609151065898,
|
|
0.071309219267050042,
|
|
-0.22403618499416572,
|
|
-0.14390600392910627,
|
|
0.4697822874053586,
|
|
0.72913209084655506,
|
|
0.39653931948230575,
|
|
0.077852054085062364
|
|
};
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {-0.077852054085062364,
|
|
0.39653931948230575,
|
|
-0.72913209084655506,
|
|
0.4697822874053586,
|
|
0.14390600392910627,
|
|
-0.22403618499416572,
|
|
-0.071309219267050042,
|
|
0.080612609151065898,
|
|
0.038029936935034633,
|
|
-0.01657454163101562,
|
|
-0.012550998556013784,
|
|
0.0004295779730047027,
|
|
0.0018016407039998328,
|
|
0.00035371380000103988
|
|
};
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {0.077852054085062364,
|
|
0.39653931948230575,
|
|
0.72913209084655506,
|
|
0.4697822874053586,
|
|
-0.14390600392910627,
|
|
-0.22403618499416572,
|
|
0.071309219267050042,
|
|
0.080612609151065898,
|
|
-0.038029936935034633,
|
|
-0.01657454163101562,
|
|
0.012550998556013784,
|
|
0.00042957797300470274,
|
|
-0.0018016407039998328,
|
|
0.00035371380000103988
|
|
};
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {0.00035371380000103988,
|
|
0.0018016407039998328,
|
|
0.00042957797300470274,
|
|
-0.01255099855601378,
|
|
-0.01657454163101562,
|
|
0.038029936935034633,
|
|
0.080612609151065898,
|
|
-0.071309219267050042,
|
|
-0.22403618499416572,
|
|
0.14390600392910627,
|
|
0.4697822874053586,
|
|
-0.72913209084655506,
|
|
0.39653931948230575,
|
|
-0.077852054085062364
|
|
};
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
|
|
else if ( name == "db8"){
|
|
double lp1_a[] = {-0.00011747678400228192,
|
|
0.00067544940599855677,
|
|
-0.00039174037299597711,
|
|
-0.0048703529930106603,
|
|
0.0087460940470156547,
|
|
0.013981027917015516,
|
|
-0.044088253931064719,
|
|
-0.017369301002022108,
|
|
0.12874742662018601,
|
|
0.00047248457399797254,
|
|
-0.28401554296242809,
|
|
-0.015829105256023893,
|
|
0.58535468365486909,
|
|
0.67563073629801285,
|
|
0.31287159091446592,
|
|
0.054415842243081609
|
|
};
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {-0.054415842243081609,
|
|
0.31287159091446592,
|
|
-0.67563073629801285,
|
|
0.58535468365486909,
|
|
0.015829105256023893,
|
|
-0.28401554296242809,
|
|
-0.00047248457399797254,
|
|
0.12874742662018601,
|
|
0.017369301002022108,
|
|
-0.044088253931064719,
|
|
-0.013981027917015516,
|
|
0.0087460940470156547,
|
|
0.0048703529930106603,
|
|
-0.00039174037299597711,
|
|
-0.00067544940599855677,
|
|
-0.00011747678400228192
|
|
};
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {0.054415842243081609,
|
|
0.31287159091446592,
|
|
0.67563073629801285,
|
|
0.58535468365486909,
|
|
-0.015829105256023893,
|
|
-0.28401554296242809,
|
|
0.00047248457399797254,
|
|
0.12874742662018601,
|
|
-0.017369301002022108,
|
|
-0.044088253931064719,
|
|
0.013981027917015516,
|
|
0.0087460940470156547,
|
|
-0.0048703529930106603,
|
|
-0.00039174037299597711,
|
|
0.00067544940599855677,
|
|
-0.00011747678400228192
|
|
};
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {-0.00011747678400228192,
|
|
-0.00067544940599855677,
|
|
-0.00039174037299597711,
|
|
0.0048703529930106603,
|
|
0.0087460940470156547,
|
|
-0.013981027917015516,
|
|
-0.044088253931064719,
|
|
0.017369301002022108,
|
|
0.12874742662018601,
|
|
-0.00047248457399797254,
|
|
-0.28401554296242809,
|
|
0.015829105256023893,
|
|
0.58535468365486909,
|
|
-0.67563073629801285,
|
|
0.31287159091446592,
|
|
-0.054415842243081609
|
|
};
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
|
|
else if ( name == "db9"){
|
|
double lp1_a[] = {3.9347319995026124e-05,
|
|
-0.00025196318899817888,
|
|
0.00023038576399541288,
|
|
0.0018476468829611268,
|
|
-0.0042815036819047227,
|
|
-0.004723204757894831,
|
|
0.022361662123515244,
|
|
0.00025094711499193845,
|
|
-0.067632829059523988,
|
|
0.030725681478322865,
|
|
0.14854074933476008,
|
|
-0.096840783220879037,
|
|
-0.29327378327258685,
|
|
0.13319738582208895,
|
|
0.65728807803663891,
|
|
0.6048231236767786,
|
|
0.24383467463766728,
|
|
0.038077947363167282
|
|
};
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {-0.038077947363167282,
|
|
0.24383467463766728,
|
|
-0.6048231236767786,
|
|
0.65728807803663891,
|
|
-0.13319738582208895,
|
|
-0.29327378327258685,
|
|
0.096840783220879037,
|
|
0.14854074933476008,
|
|
-0.030725681478322865,
|
|
-0.067632829059523988,
|
|
-0.00025094711499193845,
|
|
0.022361662123515244,
|
|
0.004723204757894831,
|
|
-0.0042815036819047227,
|
|
-0.0018476468829611268,
|
|
0.00023038576399541288,
|
|
0.00025196318899817888,
|
|
3.9347319995026124e-05
|
|
};
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {0.038077947363167282,
|
|
0.24383467463766728,
|
|
0.6048231236767786,
|
|
0.65728807803663891,
|
|
0.13319738582208895,
|
|
-0.29327378327258685,
|
|
-0.096840783220879037,
|
|
0.14854074933476008,
|
|
0.030725681478322865,
|
|
-0.067632829059523988,
|
|
0.00025094711499193845,
|
|
0.022361662123515244,
|
|
-0.004723204757894831,
|
|
-0.0042815036819047227,
|
|
0.0018476468829611268,
|
|
0.00023038576399541288,
|
|
-0.00025196318899817888,
|
|
3.9347319995026124e-05
|
|
};
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {3.9347319995026124e-05,
|
|
0.00025196318899817888,
|
|
0.00023038576399541288,
|
|
-0.0018476468829611268,
|
|
-0.0042815036819047227,
|
|
0.004723204757894831,
|
|
0.022361662123515244,
|
|
-0.00025094711499193845,
|
|
-0.067632829059523988,
|
|
-0.030725681478322865,
|
|
0.14854074933476008,
|
|
0.096840783220879037,
|
|
-0.29327378327258685,
|
|
-0.13319738582208895,
|
|
0.65728807803663891,
|
|
-0.6048231236767786,
|
|
0.24383467463766728,
|
|
-0.038077947363167282
|
|
};
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
|
|
else if ( name == "db10"){
|
|
double lp1_a[] = {-1.3264203002354869e-05,
|
|
9.3588670001089845e-05,
|
|
-0.0001164668549943862,
|
|
-0.00068585669500468248,
|
|
0.0019924052949908499,
|
|
0.0013953517469940798,
|
|
-0.010733175482979604,
|
|
0.0036065535669883944,
|
|
0.033212674058933238,
|
|
-0.029457536821945671,
|
|
-0.071394147165860775,
|
|
0.093057364603806592,
|
|
0.12736934033574265,
|
|
-0.19594627437659665,
|
|
-0.24984642432648865,
|
|
0.28117234366042648,
|
|
0.68845903945259213,
|
|
0.52720118893091983,
|
|
0.18817680007762133,
|
|
0.026670057900950818
|
|
};
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {-0.026670057900950818,
|
|
0.18817680007762133,
|
|
-0.52720118893091983,
|
|
0.68845903945259213,
|
|
-0.28117234366042648,
|
|
-0.24984642432648865,
|
|
0.19594627437659665,
|
|
0.12736934033574265,
|
|
-0.093057364603806592,
|
|
-0.071394147165860775,
|
|
0.029457536821945671,
|
|
0.033212674058933238,
|
|
-0.0036065535669883944,
|
|
-0.010733175482979604,
|
|
-0.0013953517469940798,
|
|
0.0019924052949908499,
|
|
0.00068585669500468248,
|
|
-0.0001164668549943862,
|
|
-9.3588670001089845e-05,
|
|
-1.3264203002354869e-05
|
|
};
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {0.026670057900950818,
|
|
0.18817680007762133,
|
|
0.52720118893091983,
|
|
0.68845903945259213,
|
|
0.28117234366042648,
|
|
-0.24984642432648865,
|
|
-0.19594627437659665,
|
|
0.12736934033574265,
|
|
0.093057364603806592,
|
|
-0.071394147165860775,
|
|
-0.029457536821945671,
|
|
0.033212674058933238,
|
|
0.0036065535669883944,
|
|
-0.010733175482979604,
|
|
0.0013953517469940798,
|
|
0.0019924052949908499,
|
|
-0.00068585669500468248,
|
|
-0.0001164668549943862,
|
|
9.3588670001089845e-05,
|
|
-1.3264203002354869e-05
|
|
};
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {-1.3264203002354869e-05,
|
|
-9.3588670001089845e-05,
|
|
-0.0001164668549943862,
|
|
0.00068585669500468248,
|
|
0.0019924052949908499,
|
|
-0.0013953517469940798,
|
|
-0.010733175482979604,
|
|
-0.0036065535669883944,
|
|
0.033212674058933238,
|
|
0.029457536821945671,
|
|
-0.071394147165860775,
|
|
-0.093057364603806592,
|
|
0.12736934033574265,
|
|
0.19594627437659665,
|
|
-0.24984642432648865,
|
|
-0.28117234366042648,
|
|
0.68845903945259213,
|
|
-0.52720118893091983,
|
|
0.18817680007762133,
|
|
-0.026670057900950818
|
|
};
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
|
|
else if ( name == "db12"){
|
|
double lp1_a[] = {-1.5290717580684923e-06,
|
|
1.2776952219379579e-05,
|
|
-2.4241545757030318e-05,
|
|
-8.8504109208203182e-05,
|
|
0.00038865306282092672,
|
|
6.5451282125215034e-06,
|
|
-0.0021795036186277044,
|
|
0.0022486072409952287,
|
|
0.0067114990087955486,
|
|
-0.012840825198299882,
|
|
-0.01221864906974642,
|
|
0.041546277495087637,
|
|
0.010849130255828966,
|
|
-0.09643212009649671,
|
|
0.0053595696743599965,
|
|
0.18247860592758275,
|
|
-0.023779257256064865,
|
|
-0.31617845375277914,
|
|
-0.044763885653777619,
|
|
0.51588647842780067,
|
|
0.65719872257929113,
|
|
0.37735513521420411,
|
|
0.10956627282118277,
|
|
0.013112257957229239
|
|
};
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {-0.013112257957229239,
|
|
0.10956627282118277,
|
|
-0.37735513521420411,
|
|
0.65719872257929113,
|
|
-0.51588647842780067,
|
|
-0.044763885653777619,
|
|
0.31617845375277914,
|
|
-0.023779257256064865,
|
|
-0.18247860592758275,
|
|
0.0053595696743599965,
|
|
0.09643212009649671,
|
|
0.010849130255828966,
|
|
-0.041546277495087637,
|
|
-0.01221864906974642,
|
|
0.012840825198299882,
|
|
0.0067114990087955486,
|
|
-0.0022486072409952287,
|
|
-0.0021795036186277044,
|
|
-6.5451282125215034e-06,
|
|
0.00038865306282092672,
|
|
8.8504109208203182e-05,
|
|
-2.4241545757030318e-05,
|
|
-1.2776952219379579e-05,
|
|
-1.5290717580684923e-06
|
|
};
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {0.013112257957229239,
|
|
0.10956627282118277,
|
|
0.37735513521420411,
|
|
0.65719872257929113,
|
|
0.51588647842780067,
|
|
-0.044763885653777619,
|
|
-0.31617845375277914,
|
|
-0.023779257256064865,
|
|
0.18247860592758275,
|
|
0.0053595696743599965,
|
|
-0.09643212009649671,
|
|
0.010849130255828966,
|
|
0.041546277495087637,
|
|
-0.01221864906974642,
|
|
-0.012840825198299882,
|
|
0.0067114990087955486,
|
|
0.0022486072409952287,
|
|
-0.0021795036186277044,
|
|
6.5451282125215034e-06,
|
|
0.00038865306282092672,
|
|
-8.8504109208203182e-05,
|
|
-2.4241545757030318e-05,
|
|
1.2776952219379579e-05,
|
|
-1.5290717580684923e-06
|
|
};
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {-1.5290717580684923e-06,
|
|
-1.2776952219379579e-05,
|
|
-2.4241545757030318e-05,
|
|
8.8504109208203182e-05,
|
|
0.00038865306282092672,
|
|
-6.5451282125215034e-06,
|
|
-0.0021795036186277044,
|
|
-0.0022486072409952287,
|
|
0.0067114990087955486,
|
|
0.012840825198299882,
|
|
-0.01221864906974642,
|
|
-0.041546277495087637,
|
|
0.010849130255828966,
|
|
0.09643212009649671,
|
|
0.0053595696743599965,
|
|
-0.18247860592758275,
|
|
-0.023779257256064865,
|
|
0.31617845375277914,
|
|
-0.044763885653777619,
|
|
-0.51588647842780067,
|
|
0.65719872257929113,
|
|
-0.37735513521420411,
|
|
0.10956627282118277,
|
|
-0.013112257957229239
|
|
};
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
else if ( name == "db13"){
|
|
double lp1_a[] = {5.2200350984547998e-07,
|
|
-4.7004164793608082e-06,
|
|
1.0441930571407941e-05,
|
|
3.0678537579324358e-05,
|
|
-0.00016512898855650571,
|
|
4.9251525126285676e-05,
|
|
0.00093232613086724904,
|
|
-0.0013156739118922766,
|
|
-0.002761911234656831,
|
|
0.0072555894016171187,
|
|
0.0039239414487955773,
|
|
-0.023831420710327809,
|
|
0.0023799722540522269,
|
|
0.056139477100276156,
|
|
-0.026488406475345658,
|
|
-0.10580761818792761,
|
|
0.072948933656788742,
|
|
0.17947607942935084,
|
|
-0.12457673075080665,
|
|
-0.31497290771138414,
|
|
0.086985726179645007,
|
|
0.58888957043121193,
|
|
0.61105585115878114,
|
|
0.31199632216043488,
|
|
0.082861243872901946,
|
|
0.0092021335389622788
|
|
};
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {-0.0092021335389622788,
|
|
0.082861243872901946,
|
|
-0.31199632216043488,
|
|
0.61105585115878114,
|
|
-0.58888957043121193,
|
|
0.086985726179645007,
|
|
0.31497290771138414,
|
|
-0.12457673075080665,
|
|
-0.17947607942935084,
|
|
0.072948933656788742,
|
|
0.10580761818792761,
|
|
-0.026488406475345658,
|
|
-0.056139477100276156,
|
|
0.0023799722540522269,
|
|
0.023831420710327809,
|
|
0.0039239414487955773,
|
|
-0.0072555894016171187,
|
|
-0.002761911234656831,
|
|
0.0013156739118922766,
|
|
0.00093232613086724904,
|
|
-4.9251525126285676e-05,
|
|
-0.00016512898855650571,
|
|
-3.0678537579324358e-05,
|
|
1.0441930571407941e-05,
|
|
4.7004164793608082e-06,
|
|
5.2200350984547998e-07
|
|
};
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {0.0092021335389622788,
|
|
0.082861243872901946,
|
|
0.31199632216043488,
|
|
0.61105585115878114,
|
|
0.58888957043121193,
|
|
0.086985726179645007,
|
|
-0.31497290771138414,
|
|
-0.12457673075080665,
|
|
0.17947607942935084,
|
|
0.072948933656788742,
|
|
-0.10580761818792761,
|
|
-0.026488406475345658,
|
|
0.056139477100276156,
|
|
0.0023799722540522269,
|
|
-0.023831420710327809,
|
|
0.0039239414487955773,
|
|
0.0072555894016171187,
|
|
-0.002761911234656831,
|
|
-0.0013156739118922766,
|
|
0.00093232613086724904,
|
|
4.9251525126285676e-05,
|
|
-0.00016512898855650571,
|
|
3.0678537579324358e-05,
|
|
1.0441930571407941e-05,
|
|
-4.7004164793608082e-06,
|
|
5.2200350984547998e-07
|
|
};
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {5.2200350984547998e-07,
|
|
4.7004164793608082e-06,
|
|
1.0441930571407941e-05,
|
|
-3.0678537579324358e-05,
|
|
-0.00016512898855650571,
|
|
-4.9251525126285676e-05,
|
|
0.00093232613086724904,
|
|
0.0013156739118922766,
|
|
-0.002761911234656831,
|
|
-0.0072555894016171187,
|
|
0.0039239414487955773,
|
|
0.023831420710327809,
|
|
0.0023799722540522269,
|
|
-0.056139477100276156,
|
|
-0.026488406475345658,
|
|
0.10580761818792761,
|
|
0.072948933656788742,
|
|
-0.17947607942935084,
|
|
-0.12457673075080665,
|
|
0.31497290771138414,
|
|
0.086985726179645007,
|
|
-0.58888957043121193,
|
|
0.61105585115878114,
|
|
-0.31199632216043488,
|
|
0.082861243872901946,
|
|
-0.0092021335389622788
|
|
};
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
|
|
else if ( name == "db11"){
|
|
double lp1_a[] = {4.4942742772363519e-06,
|
|
-3.4634984186983789e-05,
|
|
5.4439074699366381e-05,
|
|
0.00024915252355281426,
|
|
-0.00089302325066623663,
|
|
-0.00030859285881515924,
|
|
0.0049284176560587777,
|
|
-0.0033408588730145018,
|
|
-0.015364820906201324,
|
|
0.020840904360180039,
|
|
0.031335090219045313,
|
|
-0.066438785695020222,
|
|
-0.04647995511667613,
|
|
0.14981201246638268,
|
|
0.066043588196690886,
|
|
-0.27423084681792875,
|
|
-0.16227524502747828,
|
|
0.41196436894789695,
|
|
0.68568677491617847,
|
|
0.44989976435603013,
|
|
0.14406702115061959,
|
|
0.018694297761470441
|
|
};
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {-0.018694297761470441,
|
|
0.14406702115061959,
|
|
-0.44989976435603013,
|
|
0.68568677491617847,
|
|
-0.41196436894789695,
|
|
-0.16227524502747828,
|
|
0.27423084681792875,
|
|
0.066043588196690886,
|
|
-0.14981201246638268,
|
|
-0.04647995511667613,
|
|
0.066438785695020222,
|
|
0.031335090219045313,
|
|
-0.020840904360180039,
|
|
-0.015364820906201324,
|
|
0.0033408588730145018,
|
|
0.0049284176560587777,
|
|
0.00030859285881515924,
|
|
-0.00089302325066623663,
|
|
-0.00024915252355281426,
|
|
5.4439074699366381e-05,
|
|
3.4634984186983789e-05,
|
|
4.4942742772363519e-06
|
|
};
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {0.018694297761470441,
|
|
0.14406702115061959,
|
|
0.44989976435603013,
|
|
0.68568677491617847,
|
|
0.41196436894789695,
|
|
-0.16227524502747828,
|
|
-0.27423084681792875,
|
|
0.066043588196690886,
|
|
0.14981201246638268,
|
|
-0.04647995511667613,
|
|
-0.066438785695020222,
|
|
0.031335090219045313,
|
|
0.020840904360180039,
|
|
-0.015364820906201324,
|
|
-0.0033408588730145018,
|
|
0.0049284176560587777,
|
|
-0.00030859285881515924,
|
|
-0.00089302325066623663,
|
|
0.00024915252355281426,
|
|
5.4439074699366381e-05,
|
|
-3.4634984186983789e-05,
|
|
4.4942742772363519e-06
|
|
};
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {4.4942742772363519e-06,
|
|
3.4634984186983789e-05,
|
|
5.4439074699366381e-05,
|
|
-0.00024915252355281426,
|
|
-0.00089302325066623663,
|
|
0.00030859285881515924,
|
|
0.0049284176560587777,
|
|
0.0033408588730145018,
|
|
-0.015364820906201324,
|
|
-0.020840904360180039,
|
|
0.031335090219045313,
|
|
0.066438785695020222,
|
|
-0.04647995511667613,
|
|
-0.14981201246638268,
|
|
0.066043588196690886,
|
|
0.27423084681792875,
|
|
-0.16227524502747828,
|
|
-0.41196436894789695,
|
|
0.68568677491617847,
|
|
-0.44989976435603013,
|
|
0.14406702115061959,
|
|
-0.018694297761470441
|
|
};
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
|
|
else if ( name == "db14"){
|
|
double lp1_a[] = {-1.7871399683109222e-07,
|
|
1.7249946753674012e-06,
|
|
-4.3897049017804176e-06,
|
|
-1.0337209184568496e-05,
|
|
6.875504252695734e-05,
|
|
-4.1777245770370672e-05,
|
|
-0.00038683194731287514,
|
|
0.00070802115423540481,
|
|
0.001061691085606874,
|
|
-0.003849638868019787,
|
|
-0.00074621898926387534,
|
|
0.012789493266340071,
|
|
-0.0056150495303375755,
|
|
-0.030185351540353976,
|
|
0.026981408307947971,
|
|
0.05523712625925082,
|
|
-0.071548955503983505,
|
|
-0.086748411568110598,
|
|
0.13998901658445695,
|
|
0.13839521386479153,
|
|
-0.21803352999321651,
|
|
-0.27168855227867705,
|
|
0.21867068775886594,
|
|
0.63118784910471981,
|
|
0.55430561794077093,
|
|
0.25485026779256437,
|
|
0.062364758849384874,
|
|
0.0064611534600864905
|
|
};
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {-0.0064611534600864905,
|
|
0.062364758849384874,
|
|
-0.25485026779256437,
|
|
0.55430561794077093,
|
|
-0.63118784910471981,
|
|
0.21867068775886594,
|
|
0.27168855227867705,
|
|
-0.21803352999321651,
|
|
-0.13839521386479153,
|
|
0.13998901658445695,
|
|
0.086748411568110598,
|
|
-0.071548955503983505,
|
|
-0.05523712625925082,
|
|
0.026981408307947971,
|
|
0.030185351540353976,
|
|
-0.0056150495303375755,
|
|
-0.012789493266340071,
|
|
-0.00074621898926387534,
|
|
0.003849638868019787,
|
|
0.001061691085606874,
|
|
-0.00070802115423540481,
|
|
-0.00038683194731287514,
|
|
4.1777245770370672e-05,
|
|
6.875504252695734e-05,
|
|
1.0337209184568496e-05,
|
|
-4.3897049017804176e-06,
|
|
-1.7249946753674012e-06,
|
|
-1.7871399683109222e-07
|
|
};
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {0.0064611534600864905,
|
|
0.062364758849384874,
|
|
0.25485026779256437,
|
|
0.55430561794077093,
|
|
0.63118784910471981,
|
|
0.21867068775886594,
|
|
-0.27168855227867705,
|
|
-0.21803352999321651,
|
|
0.13839521386479153,
|
|
0.13998901658445695,
|
|
-0.086748411568110598,
|
|
-0.071548955503983505,
|
|
0.05523712625925082,
|
|
0.026981408307947971,
|
|
-0.030185351540353976,
|
|
-0.0056150495303375755,
|
|
0.012789493266340071,
|
|
-0.00074621898926387534,
|
|
-0.003849638868019787,
|
|
0.001061691085606874,
|
|
0.00070802115423540481,
|
|
-0.00038683194731287514,
|
|
-4.1777245770370672e-05,
|
|
6.875504252695734e-05,
|
|
-1.0337209184568496e-05,
|
|
-4.3897049017804176e-06,
|
|
1.7249946753674012e-06,
|
|
-1.7871399683109222e-07
|
|
};
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {-1.7871399683109222e-07,
|
|
-1.7249946753674012e-06,
|
|
-4.3897049017804176e-06,
|
|
1.0337209184568496e-05,
|
|
6.875504252695734e-05,
|
|
4.1777245770370672e-05,
|
|
-0.00038683194731287514,
|
|
-0.00070802115423540481,
|
|
0.001061691085606874,
|
|
0.003849638868019787,
|
|
-0.00074621898926387534,
|
|
-0.012789493266340071,
|
|
-0.0056150495303375755,
|
|
0.030185351540353976,
|
|
0.026981408307947971,
|
|
-0.05523712625925082,
|
|
-0.071548955503983505,
|
|
0.086748411568110598,
|
|
0.13998901658445695,
|
|
-0.13839521386479153,
|
|
-0.21803352999321651,
|
|
0.27168855227867705,
|
|
0.21867068775886594,
|
|
-0.63118784910471981,
|
|
0.55430561794077093,
|
|
-0.25485026779256437,
|
|
0.062364758849384874,
|
|
-0.0064611534600864905
|
|
};
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
else if ( name == "db15"){
|
|
double lp1_a[] = {6.1333599133037138e-08,
|
|
-6.3168823258794506e-07,
|
|
1.8112704079399406e-06,
|
|
3.3629871817363823e-06,
|
|
-2.8133296266037558e-05,
|
|
2.579269915531323e-05,
|
|
0.00015589648992055726,
|
|
-0.00035956524436229364,
|
|
-0.00037348235413726472,
|
|
0.0019433239803823459,
|
|
-0.00024175649075894543,
|
|
-0.0064877345603061454,
|
|
0.0051010003604228726,
|
|
0.015083918027862582,
|
|
-0.020810050169636805,
|
|
-0.025767007328366939,
|
|
0.054780550584559995,
|
|
0.033877143923563204,
|
|
-0.11112093603713753,
|
|
-0.039666176555733602,
|
|
0.19014671400708816,
|
|
0.065282952848765688,
|
|
-0.28888259656686216,
|
|
-0.19320413960907623,
|
|
0.33900253545462167,
|
|
0.64581314035721027,
|
|
0.49263177170797529,
|
|
0.20602386398692688,
|
|
0.046743394892750617,
|
|
0.0045385373615773762
|
|
};
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {-0.0045385373615773762,
|
|
0.046743394892750617,
|
|
-0.20602386398692688,
|
|
0.49263177170797529,
|
|
-0.64581314035721027,
|
|
0.33900253545462167,
|
|
0.19320413960907623,
|
|
-0.28888259656686216,
|
|
-0.065282952848765688,
|
|
0.19014671400708816,
|
|
0.039666176555733602,
|
|
-0.11112093603713753,
|
|
-0.033877143923563204,
|
|
0.054780550584559995,
|
|
0.025767007328366939,
|
|
-0.020810050169636805,
|
|
-0.015083918027862582,
|
|
0.0051010003604228726,
|
|
0.0064877345603061454,
|
|
-0.00024175649075894543,
|
|
-0.0019433239803823459,
|
|
-0.00037348235413726472,
|
|
0.00035956524436229364,
|
|
0.00015589648992055726,
|
|
-2.579269915531323e-05,
|
|
-2.8133296266037558e-05,
|
|
-3.3629871817363823e-06,
|
|
1.8112704079399406e-06,
|
|
6.3168823258794506e-07,
|
|
6.1333599133037138e-08
|
|
};
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {0.0045385373615773762,
|
|
0.046743394892750617,
|
|
0.20602386398692688,
|
|
0.49263177170797529,
|
|
0.64581314035721027,
|
|
0.33900253545462167,
|
|
-0.19320413960907623,
|
|
-0.28888259656686216,
|
|
0.065282952848765688,
|
|
0.19014671400708816,
|
|
-0.039666176555733602,
|
|
-0.11112093603713753,
|
|
0.033877143923563204,
|
|
0.054780550584559995,
|
|
-0.025767007328366939,
|
|
-0.020810050169636805,
|
|
0.015083918027862582,
|
|
0.0051010003604228726,
|
|
-0.0064877345603061454,
|
|
-0.00024175649075894543,
|
|
0.0019433239803823459,
|
|
-0.00037348235413726472,
|
|
-0.00035956524436229364,
|
|
0.00015589648992055726,
|
|
2.579269915531323e-05,
|
|
-2.8133296266037558e-05,
|
|
3.3629871817363823e-06,
|
|
1.8112704079399406e-06,
|
|
-6.3168823258794506e-07,
|
|
6.1333599133037138e-08
|
|
};
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {6.1333599133037138e-08,
|
|
6.3168823258794506e-07,
|
|
1.8112704079399406e-06,
|
|
-3.3629871817363823e-06,
|
|
-2.8133296266037558e-05,
|
|
-2.579269915531323e-05,
|
|
0.00015589648992055726,
|
|
0.00035956524436229364,
|
|
-0.00037348235413726472,
|
|
-0.0019433239803823459,
|
|
-0.00024175649075894543,
|
|
0.0064877345603061454,
|
|
0.0051010003604228726,
|
|
-0.015083918027862582,
|
|
-0.020810050169636805,
|
|
0.025767007328366939,
|
|
0.054780550584559995,
|
|
-0.033877143923563204,
|
|
-0.11112093603713753,
|
|
0.039666176555733602,
|
|
0.19014671400708816,
|
|
-0.065282952848765688,
|
|
-0.28888259656686216,
|
|
0.19320413960907623,
|
|
0.33900253545462167,
|
|
-0.64581314035721027,
|
|
0.49263177170797529,
|
|
-0.20602386398692688,
|
|
0.046743394892750617,
|
|
-0.0045385373615773762
|
|
};
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
else if ( name == "bior1.1"){
|
|
double lp1_a[] = {0.70710678118654757,
|
|
0.70710678118654757
|
|
};
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {-0.70710678118654757,
|
|
0.70710678118654757
|
|
};
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {0.70710678118654757,
|
|
0.70710678118654757
|
|
};
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {0.70710678118654757,
|
|
-0.70710678118654757
|
|
};
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
|
|
else if ( name == "bior1.3"){
|
|
double lp1_a[] = {-0.088388347648318447,
|
|
0.088388347648318447,
|
|
0.70710678118654757,
|
|
0.70710678118654757,
|
|
0.088388347648318447,
|
|
-0.088388347648318447,
|
|
};
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {0.0,
|
|
0.0,
|
|
-0.70710678118654757,
|
|
0.70710678118654757,
|
|
0.0,
|
|
0.0
|
|
};
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {0.0,
|
|
0.0,
|
|
0.70710678118654757,
|
|
0.70710678118654757,
|
|
0.0,
|
|
0.0
|
|
};
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {-0.088388347648318447,
|
|
-0.088388347648318447,
|
|
0.70710678118654757,
|
|
-0.70710678118654757,
|
|
0.088388347648318447,
|
|
0.088388347648318447
|
|
};
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
|
|
else if ( name == "bior1.5"){
|
|
double lp1_a[] = {0.01657281518405971,
|
|
-0.01657281518405971,
|
|
-0.12153397801643787,
|
|
0.12153397801643787,
|
|
0.70710678118654757,
|
|
0.70710678118654757,
|
|
0.12153397801643787,
|
|
-0.12153397801643787,
|
|
-0.01657281518405971,
|
|
0.01657281518405971
|
|
};
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
-0.70710678118654757,
|
|
0.70710678118654757,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0
|
|
};
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.70710678118654757,
|
|
0.70710678118654757,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0
|
|
};
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {0.01657281518405971,
|
|
0.01657281518405971,
|
|
-0.12153397801643787,
|
|
-0.12153397801643787,
|
|
0.70710678118654757,
|
|
-0.70710678118654757,
|
|
0.12153397801643787,
|
|
0.12153397801643787,
|
|
-0.01657281518405971,
|
|
-0.01657281518405971
|
|
};
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
|
|
else if ( name == "bior2.2"){
|
|
double lp1_a[] = {0.0,
|
|
-0.17677669529663689,
|
|
0.35355339059327379,
|
|
1.0606601717798214,
|
|
0.35355339059327379,
|
|
-0.17677669529663689
|
|
};
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {0.0,
|
|
0.35355339059327379,
|
|
-0.70710678118654757,
|
|
0.35355339059327379,
|
|
0.0,
|
|
0.0
|
|
};
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {0.0,
|
|
0.35355339059327379,
|
|
0.70710678118654757,
|
|
0.35355339059327379,
|
|
0.0,
|
|
0.0
|
|
};
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {0.0,
|
|
0.17677669529663689,
|
|
0.35355339059327379,
|
|
-1.0606601717798214,
|
|
0.35355339059327379,
|
|
0.17677669529663689
|
|
|
|
};
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
|
|
else if ( name == "bior2.4"){
|
|
double lp1_a[] = {0.0,
|
|
0.033145630368119419,
|
|
-0.066291260736238838,
|
|
-0.17677669529663689,
|
|
0.4198446513295126,
|
|
0.99436891104358249,
|
|
0.4198446513295126,
|
|
-0.17677669529663689,
|
|
-0.066291260736238838,
|
|
0.033145630368119419
|
|
};
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {0.0,
|
|
0.0,
|
|
0.0,
|
|
0.35355339059327379,
|
|
-0.70710678118654757,
|
|
0.35355339059327379,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0
|
|
|
|
};
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {0.0,
|
|
0.0,
|
|
0.0,
|
|
0.35355339059327379,
|
|
0.70710678118654757,
|
|
0.35355339059327379,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0
|
|
|
|
};
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {0.0,
|
|
-0.033145630368119419,
|
|
-0.066291260736238838,
|
|
0.17677669529663689,
|
|
0.4198446513295126,
|
|
-0.99436891104358249,
|
|
0.4198446513295126,
|
|
0.17677669529663689,
|
|
-0.066291260736238838,
|
|
-0.033145630368119419
|
|
};
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
|
|
else if ( name == "bior2.6"){
|
|
double lp1_a[] = {0.0,
|
|
-0.0069053396600248784,
|
|
0.013810679320049757,
|
|
0.046956309688169176,
|
|
-0.10772329869638811,
|
|
-0.16987135563661201,
|
|
0.44746600996961211,
|
|
0.96674755240348298,
|
|
0.44746600996961211,
|
|
-0.16987135563661201,
|
|
-0.10772329869638811,
|
|
0.046956309688169176,
|
|
0.013810679320049757,
|
|
-0.0069053396600248784
|
|
};
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.35355339059327379,
|
|
-0.70710678118654757,
|
|
0.35355339059327379,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0
|
|
};
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.35355339059327379,
|
|
0.70710678118654757,
|
|
0.35355339059327379,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0
|
|
};
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {0.0,
|
|
0.0069053396600248784,
|
|
0.013810679320049757,
|
|
-0.046956309688169176,
|
|
-0.10772329869638811,
|
|
0.16987135563661201,
|
|
0.44746600996961211,
|
|
-0.96674755240348298,
|
|
0.44746600996961211,
|
|
0.16987135563661201,
|
|
-0.10772329869638811,
|
|
-0.046956309688169176,
|
|
0.013810679320049757,
|
|
0.0069053396600248784
|
|
};
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
else if ( name == "bior2.8"){
|
|
double lp1_a[] = {0.0,
|
|
0.0015105430506304422,
|
|
-0.0030210861012608843,
|
|
-0.012947511862546647,
|
|
0.028916109826354178,
|
|
0.052998481890690945,
|
|
-0.13491307360773608,
|
|
-0.16382918343409025,
|
|
0.46257144047591658,
|
|
0.95164212189717856,
|
|
0.46257144047591658,
|
|
-0.16382918343409025,
|
|
-0.13491307360773608,
|
|
0.052998481890690945,
|
|
0.028916109826354178,
|
|
-0.012947511862546647,
|
|
-0.0030210861012608843,
|
|
0.0015105430506304422
|
|
};
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.35355339059327379,
|
|
-0.70710678118654757,
|
|
0.35355339059327379,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0
|
|
};
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.35355339059327379,
|
|
0.70710678118654757,
|
|
0.35355339059327379,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0
|
|
};
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {0.0,
|
|
-0.0015105430506304422,
|
|
-0.0030210861012608843,
|
|
0.012947511862546647,
|
|
0.028916109826354178,
|
|
-0.052998481890690945,
|
|
-0.13491307360773608,
|
|
0.16382918343409025,
|
|
0.46257144047591658,
|
|
-0.95164212189717856,
|
|
0.46257144047591658,
|
|
0.16382918343409025,
|
|
-0.13491307360773608,
|
|
-0.052998481890690945,
|
|
0.028916109826354178,
|
|
0.012947511862546647,
|
|
-0.0030210861012608843,
|
|
-0.0015105430506304422
|
|
};
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
|
|
else if ( name == "bior3.1"){
|
|
double lp1_a[] = {-0.35355339059327379,
|
|
1.0606601717798214,
|
|
1.0606601717798214,
|
|
-0.35355339059327379
|
|
};
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {-0.17677669529663689,
|
|
0.53033008588991071,
|
|
-0.53033008588991071,
|
|
0.17677669529663689
|
|
};
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {0.17677669529663689,
|
|
0.53033008588991071,
|
|
0.53033008588991071,
|
|
0.17677669529663689
|
|
};
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {-0.35355339059327379,
|
|
-1.0606601717798214,
|
|
1.0606601717798214,
|
|
0.35355339059327379
|
|
};
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
else if ( name == "bior3.3"){
|
|
double lp1_a[] = {0.066291260736238838,
|
|
-0.19887378220871652,
|
|
-0.15467960838455727,
|
|
0.99436891104358249,
|
|
0.99436891104358249,
|
|
-0.15467960838455727,
|
|
-0.19887378220871652,
|
|
0.066291260736238838
|
|
};
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {0.0,
|
|
0.0,
|
|
-0.17677669529663689,
|
|
0.53033008588991071,
|
|
-0.53033008588991071,
|
|
0.17677669529663689,
|
|
0.0,
|
|
0.0
|
|
};
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {0.0,
|
|
0.0,
|
|
0.17677669529663689,
|
|
0.53033008588991071,
|
|
0.53033008588991071,
|
|
0.17677669529663689,
|
|
0.0,
|
|
0.0
|
|
};
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {0.066291260736238838,
|
|
0.19887378220871652,
|
|
-0.15467960838455727,
|
|
-0.99436891104358249,
|
|
0.99436891104358249,
|
|
0.15467960838455727,
|
|
-0.19887378220871652,
|
|
-0.066291260736238838
|
|
};
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
else if ( name == "bior3.5"){
|
|
double lp1_a[] = {-0.013810679320049757,
|
|
0.041432037960149271,
|
|
0.052480581416189075,
|
|
-0.26792717880896527,
|
|
-0.071815532464258744,
|
|
0.96674755240348298,
|
|
0.96674755240348298,
|
|
-0.071815532464258744,
|
|
-0.26792717880896527,
|
|
0.052480581416189075,
|
|
0.041432037960149271,
|
|
-0.013810679320049757
|
|
};
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
-0.17677669529663689,
|
|
0.53033008588991071,
|
|
-0.53033008588991071,
|
|
0.17677669529663689,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0
|
|
};
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.17677669529663689,
|
|
0.53033008588991071,
|
|
0.53033008588991071,
|
|
0.17677669529663689,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0
|
|
};
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {-0.013810679320049757,
|
|
-0.041432037960149271,
|
|
0.052480581416189075,
|
|
0.26792717880896527,
|
|
-0.071815532464258744,
|
|
-0.96674755240348298,
|
|
0.96674755240348298,
|
|
0.071815532464258744,
|
|
-0.26792717880896527,
|
|
-0.052480581416189075,
|
|
0.041432037960149271,
|
|
0.013810679320049757
|
|
};
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
|
|
else if ( name == "bior3.7"){
|
|
double lp1_a[] = {0.0030210861012608843,
|
|
-0.0090632583037826529,
|
|
-0.016831765421310641,
|
|
0.074663985074019001,
|
|
0.031332978707362888,
|
|
-0.301159125922835,
|
|
-0.026499240945345472,
|
|
0.95164212189717856,
|
|
0.95164212189717856,
|
|
-0.026499240945345472,
|
|
-0.301159125922835,
|
|
0.031332978707362888,
|
|
0.074663985074019001,
|
|
-0.016831765421310641,
|
|
-0.0090632583037826529,
|
|
0.0030210861012608843
|
|
};
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
-0.17677669529663689,
|
|
0.53033008588991071,
|
|
-0.53033008588991071,
|
|
0.17677669529663689,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0
|
|
};
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.17677669529663689,
|
|
0.53033008588991071,
|
|
0.53033008588991071,
|
|
0.17677669529663689,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0
|
|
};
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {0.0030210861012608843,
|
|
0.0090632583037826529,
|
|
-0.016831765421310641,
|
|
-0.074663985074019001,
|
|
0.031332978707362888,
|
|
0.301159125922835,
|
|
-0.026499240945345472,
|
|
-0.95164212189717856,
|
|
0.95164212189717856,
|
|
0.026499240945345472,
|
|
-0.301159125922835,
|
|
-0.031332978707362888,
|
|
0.074663985074019001,
|
|
0.016831765421310641,
|
|
-0.0090632583037826529,
|
|
-0.0030210861012608843
|
|
};
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
else if ( name == "bior3.9"){
|
|
double lp1_a[] = {-0.00067974437278369901,
|
|
0.0020392331183510968,
|
|
0.0050603192196119811,
|
|
-0.020618912641105536,
|
|
-0.014112787930175846,
|
|
0.09913478249423216,
|
|
0.012300136269419315,
|
|
-0.32019196836077857,
|
|
0.0020500227115698858,
|
|
0.94212570067820678,
|
|
0.94212570067820678,
|
|
0.0020500227115698858,
|
|
-0.32019196836077857,
|
|
0.012300136269419315,
|
|
0.09913478249423216,
|
|
-0.014112787930175846,
|
|
-0.020618912641105536,
|
|
0.0050603192196119811,
|
|
0.0020392331183510968,
|
|
-0.00067974437278369901
|
|
};
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
-0.17677669529663689,
|
|
0.53033008588991071,
|
|
-0.53033008588991071,
|
|
0.17677669529663689,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0
|
|
};
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.17677669529663689,
|
|
0.53033008588991071,
|
|
0.53033008588991071,
|
|
0.17677669529663689,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0
|
|
};
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {-0.00067974437278369901,
|
|
-0.0020392331183510968,
|
|
0.0050603192196119811,
|
|
0.020618912641105536,
|
|
-0.014112787930175846,
|
|
-0.09913478249423216,
|
|
0.012300136269419315,
|
|
0.32019196836077857,
|
|
0.0020500227115698858,
|
|
-0.94212570067820678,
|
|
0.94212570067820678,
|
|
-0.0020500227115698858,
|
|
-0.32019196836077857,
|
|
-0.012300136269419315,
|
|
0.09913478249423216,
|
|
0.014112787930175846,
|
|
-0.020618912641105536,
|
|
-0.0050603192196119811,
|
|
0.0020392331183510968,
|
|
0.00067974437278369901
|
|
};
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
else if ( name == "bior4.4"){
|
|
double lp1_a[] = {0.0,
|
|
0.03782845550726404,
|
|
-0.023849465019556843,
|
|
-0.11062440441843718,
|
|
0.37740285561283066,
|
|
0.85269867900889385,
|
|
0.37740285561283066,
|
|
-0.11062440441843718,
|
|
-0.023849465019556843,
|
|
0.03782845550726404
|
|
};
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {0.0,
|
|
-0.064538882628697058,
|
|
0.040689417609164058,
|
|
0.41809227322161724,
|
|
-0.7884856164055829,
|
|
0.41809227322161724,
|
|
0.040689417609164058,
|
|
-0.064538882628697058,
|
|
0.0,
|
|
0.0
|
|
};
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {0.0,
|
|
-0.064538882628697058,
|
|
-0.040689417609164058,
|
|
0.41809227322161724,
|
|
0.7884856164055829,
|
|
0.41809227322161724,
|
|
-0.040689417609164058,
|
|
-0.064538882628697058,
|
|
0.0,
|
|
0.0
|
|
};
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {0.0,
|
|
-0.03782845550726404,
|
|
-0.023849465019556843,
|
|
0.11062440441843718,
|
|
0.37740285561283066,
|
|
-0.85269867900889385,
|
|
0.37740285561283066,
|
|
0.11062440441843718,
|
|
-0.023849465019556843,
|
|
-0.03782845550726404
|
|
};
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
else if ( name == "bior5.5"){
|
|
double lp1_a[] = {0.0,
|
|
0.0,
|
|
0.03968708834740544,
|
|
0.0079481086372403219,
|
|
-0.054463788468236907,
|
|
0.34560528195603346,
|
|
0.73666018142821055,
|
|
0.34560528195603346,
|
|
-0.054463788468236907,
|
|
0.0079481086372403219,
|
|
0.03968708834740544,
|
|
0.0
|
|
};
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {-0.013456709459118716,
|
|
-0.0026949668801115071,
|
|
0.13670658466432914,
|
|
-0.093504697400938863,
|
|
-0.47680326579848425,
|
|
0.89950610974864842,
|
|
-0.47680326579848425,
|
|
-0.093504697400938863,
|
|
0.13670658466432914,
|
|
-0.0026949668801115071,
|
|
-0.013456709459118716,
|
|
0.0
|
|
};
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {0.013456709459118716,
|
|
-0.0026949668801115071,
|
|
-0.13670658466432914,
|
|
-0.093504697400938863,
|
|
0.47680326579848425,
|
|
0.89950610974864842,
|
|
0.47680326579848425,
|
|
-0.093504697400938863,
|
|
-0.13670658466432914,
|
|
-0.0026949668801115071,
|
|
0.013456709459118716,
|
|
0.0
|
|
};
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {0.0,
|
|
0.0,
|
|
0.03968708834740544,
|
|
-0.0079481086372403219,
|
|
-0.054463788468236907,
|
|
-0.34560528195603346,
|
|
0.73666018142821055,
|
|
-0.34560528195603346,
|
|
-0.054463788468236907,
|
|
-0.0079481086372403219,
|
|
0.03968708834740544,
|
|
0.0
|
|
};
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
else if ( name == "bior6.8"){
|
|
double lp1_a[] = {0.0,
|
|
0.0019088317364812906,
|
|
-0.0019142861290887667,
|
|
-0.016990639867602342,
|
|
0.01193456527972926,
|
|
0.04973290349094079,
|
|
-0.077263173167204144,
|
|
-0.09405920349573646,
|
|
0.42079628460982682,
|
|
0.82592299745840225,
|
|
0.42079628460982682,
|
|
-0.09405920349573646,
|
|
-0.077263173167204144,
|
|
0.04973290349094079,
|
|
0.01193456527972926,
|
|
-0.016990639867602342,
|
|
-0.0019142861290887667,
|
|
0.0019088317364812906
|
|
};
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {0.0,
|
|
0.0,
|
|
0.0,
|
|
0.014426282505624435,
|
|
-0.014467504896790148,
|
|
-0.078722001062628819,
|
|
0.040367979030339923,
|
|
0.41784910915027457,
|
|
-0.75890772945365415,
|
|
0.41784910915027457,
|
|
0.040367979030339923,
|
|
-0.078722001062628819,
|
|
-0.014467504896790148,
|
|
0.014426282505624435,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0
|
|
};
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {0.0,
|
|
0.0,
|
|
0.0,
|
|
0.014426282505624435,
|
|
0.014467504896790148,
|
|
-0.078722001062628819,
|
|
-0.040367979030339923,
|
|
0.41784910915027457,
|
|
0.75890772945365415,
|
|
0.41784910915027457,
|
|
-0.040367979030339923,
|
|
-0.078722001062628819,
|
|
0.014467504896790148,
|
|
0.014426282505624435,
|
|
0.0,
|
|
0.0,
|
|
0.0,
|
|
0.0
|
|
};
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {0.0,
|
|
-0.0019088317364812906,
|
|
-0.0019142861290887667,
|
|
0.016990639867602342,
|
|
0.01193456527972926,
|
|
-0.04973290349094079,
|
|
-0.077263173167204144,
|
|
0.09405920349573646,
|
|
0.42079628460982682,
|
|
-0.82592299745840225,
|
|
0.42079628460982682,
|
|
0.09405920349573646,
|
|
-0.077263173167204144,
|
|
-0.04973290349094079,
|
|
0.01193456527972926,
|
|
0.016990639867602342,
|
|
-0.0019142861290887667,
|
|
-0.0019088317364812906
|
|
};
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
|
|
else if ( name == "coif1"){
|
|
double lp1_a[] = {-0.01565572813546454,
|
|
-0.072732619512853897,
|
|
0.38486484686420286,
|
|
0.85257202021225542,
|
|
0.33789766245780922,
|
|
-0.072732619512853897
|
|
};
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {0.072732619512853897,
|
|
0.33789766245780922,
|
|
-0.85257202021225542,
|
|
0.38486484686420286,
|
|
0.072732619512853897,
|
|
-0.01565572813546454
|
|
};
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {-0.072732619512853897,
|
|
0.33789766245780922,
|
|
0.85257202021225542,
|
|
0.38486484686420286,
|
|
-0.072732619512853897,
|
|
-0.01565572813546454
|
|
};
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {-0.01565572813546454,
|
|
0.072732619512853897,
|
|
0.38486484686420286,
|
|
-0.85257202021225542,
|
|
0.33789766245780922,
|
|
0.072732619512853897
|
|
};
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
else if ( name == "coif2"){
|
|
double lp1_a[] = {-0.00072054944536451221,
|
|
-0.0018232088707029932,
|
|
0.0056114348193944995,
|
|
0.023680171946334084,
|
|
-0.059434418646456898,
|
|
-0.076488599078306393,
|
|
0.41700518442169254,
|
|
0.81272363544554227,
|
|
0.38611006682116222,
|
|
-0.067372554721963018,
|
|
-0.041464936781759151,
|
|
0.016387336463522112
|
|
};
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {-0.016387336463522112,
|
|
-0.041464936781759151,
|
|
0.067372554721963018,
|
|
0.38611006682116222,
|
|
-0.81272363544554227,
|
|
0.41700518442169254,
|
|
0.076488599078306393,
|
|
-0.059434418646456898,
|
|
-0.023680171946334084,
|
|
0.0056114348193944995,
|
|
0.0018232088707029932,
|
|
-0.00072054944536451221
|
|
};
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {0.016387336463522112,
|
|
-0.041464936781759151,
|
|
-0.067372554721963018,
|
|
0.38611006682116222,
|
|
0.81272363544554227,
|
|
0.41700518442169254,
|
|
-0.076488599078306393,
|
|
-0.059434418646456898,
|
|
0.023680171946334084,
|
|
0.0056114348193944995,
|
|
-0.0018232088707029932,
|
|
-0.00072054944536451221
|
|
};
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {-0.00072054944536451221,
|
|
0.0018232088707029932,
|
|
0.0056114348193944995,
|
|
-0.023680171946334084,
|
|
-0.059434418646456898,
|
|
0.076488599078306393,
|
|
0.41700518442169254,
|
|
-0.81272363544554227,
|
|
0.38611006682116222,
|
|
0.067372554721963018,
|
|
-0.041464936781759151,
|
|
-0.016387336463522112
|
|
};
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
else if ( name == "coif3"){
|
|
double lp1_a[] = {-3.4599772836212559e-05,
|
|
-7.0983303138141252e-05,
|
|
0.00046621696011288631,
|
|
0.0011175187708906016,
|
|
-0.0025745176887502236,
|
|
-0.0090079761366615805,
|
|
0.015880544863615904,
|
|
0.034555027573061628,
|
|
-0.082301927106885983,
|
|
-0.071799821619312018,
|
|
0.42848347637761874,
|
|
0.79377722262562056,
|
|
0.4051769024096169,
|
|
-0.061123390002672869,
|
|
-0.0657719112818555,
|
|
0.023452696141836267,
|
|
0.0077825964273254182,
|
|
-0.0037935128644910141
|
|
};
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {0.0037935128644910141,
|
|
0.0077825964273254182,
|
|
-0.023452696141836267,
|
|
-0.0657719112818555,
|
|
0.061123390002672869,
|
|
0.4051769024096169,
|
|
-0.79377722262562056,
|
|
0.42848347637761874,
|
|
0.071799821619312018,
|
|
-0.082301927106885983,
|
|
-0.034555027573061628,
|
|
0.015880544863615904,
|
|
0.0090079761366615805,
|
|
-0.0025745176887502236,
|
|
-0.0011175187708906016,
|
|
0.00046621696011288631,
|
|
7.0983303138141252e-05,
|
|
-3.4599772836212559e-05
|
|
};
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {-0.0037935128644910141,
|
|
0.0077825964273254182,
|
|
0.023452696141836267,
|
|
-0.0657719112818555,
|
|
-0.061123390002672869,
|
|
0.4051769024096169,
|
|
0.79377722262562056,
|
|
0.42848347637761874,
|
|
-0.071799821619312018,
|
|
-0.082301927106885983,
|
|
0.034555027573061628,
|
|
0.015880544863615904,
|
|
-0.0090079761366615805,
|
|
-0.0025745176887502236,
|
|
0.0011175187708906016,
|
|
0.00046621696011288631,
|
|
-7.0983303138141252e-05,
|
|
-3.4599772836212559e-05
|
|
};
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {-3.4599772836212559e-05,
|
|
7.0983303138141252e-05,
|
|
0.00046621696011288631,
|
|
-0.0011175187708906016,
|
|
-0.0025745176887502236,
|
|
0.0090079761366615805,
|
|
0.015880544863615904,
|
|
-0.034555027573061628,
|
|
-0.082301927106885983,
|
|
0.071799821619312018,
|
|
0.42848347637761874,
|
|
-0.79377722262562056,
|
|
0.4051769024096169,
|
|
0.061123390002672869,
|
|
-0.0657719112818555,
|
|
-0.023452696141836267,
|
|
0.0077825964273254182,
|
|
0.0037935128644910141
|
|
};
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
else if ( name == "coif4"){
|
|
double lp1_a[] = {-1.7849850030882614e-06,
|
|
-3.2596802368833675e-06,
|
|
3.1229875865345646e-05,
|
|
6.2339034461007128e-05,
|
|
-0.00025997455248771324,
|
|
-0.00058902075624433831,
|
|
0.0012665619292989445,
|
|
0.0037514361572784571,
|
|
-0.0056582866866107199,
|
|
-0.015211731527946259,
|
|
0.025082261844864097,
|
|
0.039334427123337491,
|
|
-0.096220442033987982,
|
|
-0.066627474263425038,
|
|
0.4343860564914685,
|
|
0.78223893092049901,
|
|
0.41530840703043026,
|
|
-0.056077313316754807,
|
|
-0.081266699680878754,
|
|
0.026682300156053072,
|
|
0.016068943964776348,
|
|
-0.0073461663276420935,
|
|
-0.0016294920126017326,
|
|
0.00089231366858231456
|
|
};
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {-0.00089231366858231456,
|
|
-0.0016294920126017326,
|
|
0.0073461663276420935,
|
|
0.016068943964776348,
|
|
-0.026682300156053072,
|
|
-0.081266699680878754,
|
|
0.056077313316754807,
|
|
0.41530840703043026,
|
|
-0.78223893092049901,
|
|
0.4343860564914685,
|
|
0.066627474263425038,
|
|
-0.096220442033987982,
|
|
-0.039334427123337491,
|
|
0.025082261844864097,
|
|
0.015211731527946259,
|
|
-0.0056582866866107199,
|
|
-0.0037514361572784571,
|
|
0.0012665619292989445,
|
|
0.00058902075624433831,
|
|
-0.00025997455248771324,
|
|
-6.2339034461007128e-05,
|
|
3.1229875865345646e-05,
|
|
3.2596802368833675e-06,
|
|
-1.7849850030882614e-06
|
|
};
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {0.00089231366858231456,
|
|
-0.0016294920126017326,
|
|
-0.0073461663276420935,
|
|
0.016068943964776348,
|
|
0.026682300156053072,
|
|
-0.081266699680878754,
|
|
-0.056077313316754807,
|
|
0.41530840703043026,
|
|
0.78223893092049901,
|
|
0.4343860564914685,
|
|
-0.066627474263425038,
|
|
-0.096220442033987982,
|
|
0.039334427123337491,
|
|
0.025082261844864097,
|
|
-0.015211731527946259,
|
|
-0.0056582866866107199,
|
|
0.0037514361572784571,
|
|
0.0012665619292989445,
|
|
-0.00058902075624433831,
|
|
-0.00025997455248771324,
|
|
6.2339034461007128e-05,
|
|
3.1229875865345646e-05,
|
|
-3.2596802368833675e-06,
|
|
-1.7849850030882614e-06
|
|
};
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {-1.7849850030882614e-06,
|
|
3.2596802368833675e-06,
|
|
3.1229875865345646e-05,
|
|
-6.2339034461007128e-05,
|
|
-0.00025997455248771324,
|
|
0.00058902075624433831,
|
|
0.0012665619292989445,
|
|
-0.0037514361572784571,
|
|
-0.0056582866866107199,
|
|
0.015211731527946259,
|
|
0.025082261844864097,
|
|
-0.039334427123337491,
|
|
-0.096220442033987982,
|
|
0.066627474263425038,
|
|
0.4343860564914685,
|
|
-0.78223893092049901,
|
|
0.41530840703043026,
|
|
0.056077313316754807,
|
|
-0.081266699680878754,
|
|
-0.026682300156053072,
|
|
0.016068943964776348,
|
|
0.0073461663276420935,
|
|
-0.0016294920126017326,
|
|
-0.00089231366858231456
|
|
};
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
else if ( name == "coif5"){
|
|
double lp1_a[] = {-9.517657273819165e-08,
|
|
-1.6744288576823017e-07,
|
|
2.0637618513646814e-06,
|
|
3.7346551751414047e-06,
|
|
-2.1315026809955787e-05,
|
|
-4.1340432272512511e-05,
|
|
0.00014054114970203437,
|
|
0.00030225958181306315,
|
|
-0.00063813134304511142,
|
|
-0.0016628637020130838,
|
|
0.0024333732126576722,
|
|
0.0067641854480530832,
|
|
-0.0091642311624818458,
|
|
-0.019761778942572639,
|
|
0.032683574267111833,
|
|
0.041289208750181702,
|
|
-0.10557420870333893,
|
|
-0.062035963962903569,
|
|
0.43799162617183712,
|
|
0.77428960365295618,
|
|
0.42156620669085149,
|
|
-0.052043163176243773,
|
|
-0.091920010559696244,
|
|
0.02816802897093635,
|
|
0.023408156785839195,
|
|
-0.010131117519849788,
|
|
-0.004159358781386048,
|
|
0.0021782363581090178,
|
|
0.00035858968789573785,
|
|
-0.00021208083980379827
|
|
};
|
|
lp1.assign (lp1_a,lp1_a + sizeof(lp1_a)/sizeof(double));
|
|
|
|
double hp1_a[] = {0.00021208083980379827,
|
|
0.00035858968789573785,
|
|
-0.0021782363581090178,
|
|
-0.004159358781386048,
|
|
0.010131117519849788,
|
|
0.023408156785839195,
|
|
-0.02816802897093635,
|
|
-0.091920010559696244,
|
|
0.052043163176243773,
|
|
0.42156620669085149,
|
|
-0.77428960365295618,
|
|
0.43799162617183712,
|
|
0.062035963962903569,
|
|
-0.10557420870333893,
|
|
-0.041289208750181702,
|
|
0.032683574267111833,
|
|
0.019761778942572639,
|
|
-0.0091642311624818458,
|
|
-0.0067641854480530832,
|
|
0.0024333732126576722,
|
|
0.0016628637020130838,
|
|
-0.00063813134304511142,
|
|
-0.00030225958181306315,
|
|
0.00014054114970203437,
|
|
4.1340432272512511e-05,
|
|
-2.1315026809955787e-05,
|
|
-3.7346551751414047e-06,
|
|
2.0637618513646814e-06,
|
|
1.6744288576823017e-07,
|
|
-9.517657273819165e-08
|
|
};
|
|
hp1.assign (hp1_a,hp1_a + sizeof(hp1_a)/sizeof(double));
|
|
|
|
double lp2_a[] = {-0.00021208083980379827,
|
|
0.00035858968789573785,
|
|
0.0021782363581090178,
|
|
-0.004159358781386048,
|
|
-0.010131117519849788,
|
|
0.023408156785839195,
|
|
0.02816802897093635,
|
|
-0.091920010559696244,
|
|
-0.052043163176243773,
|
|
0.42156620669085149,
|
|
0.77428960365295618,
|
|
0.43799162617183712,
|
|
-0.062035963962903569,
|
|
-0.10557420870333893,
|
|
0.041289208750181702,
|
|
0.032683574267111833,
|
|
-0.019761778942572639,
|
|
-0.0091642311624818458,
|
|
0.0067641854480530832,
|
|
0.0024333732126576722,
|
|
-0.0016628637020130838,
|
|
-0.00063813134304511142,
|
|
0.00030225958181306315,
|
|
0.00014054114970203437,
|
|
-4.1340432272512511e-05,
|
|
-2.1315026809955787e-05,
|
|
3.7346551751414047e-06,
|
|
2.0637618513646814e-06,
|
|
-1.6744288576823017e-07,
|
|
-9.517657273819165e-08
|
|
};
|
|
lp2.assign (lp2_a,lp2_a + sizeof(lp2_a)/sizeof(double));
|
|
|
|
double hp2_a[] = {-9.517657273819165e-08,
|
|
1.6744288576823017e-07,
|
|
2.0637618513646814e-06,
|
|
-3.7346551751414047e-06,
|
|
-2.1315026809955787e-05,
|
|
4.1340432272512511e-05,
|
|
0.00014054114970203437,
|
|
-0.00030225958181306315,
|
|
-0.00063813134304511142,
|
|
0.0016628637020130838,
|
|
0.0024333732126576722,
|
|
-0.0067641854480530832,
|
|
-0.0091642311624818458,
|
|
0.019761778942572639,
|
|
0.032683574267111833,
|
|
-0.041289208750181702,
|
|
-0.10557420870333893,
|
|
0.062035963962903569,
|
|
0.43799162617183712,
|
|
-0.77428960365295618,
|
|
0.42156620669085149,
|
|
0.052043163176243773,
|
|
-0.091920010559696244,
|
|
-0.02816802897093635,
|
|
0.023408156785839195,
|
|
0.010131117519849788,
|
|
-0.004159358781386048,
|
|
-0.0021782363581090178,
|
|
0.00035858968789573785,
|
|
0.00021208083980379827
|
|
};
|
|
hp2.assign (hp2_a,hp2_a + sizeof(hp2_a)/sizeof(double));
|
|
return 0;
|
|
}
|
|
else {
|
|
cout << "Filter Not in Database" << endl;
|
|
return -1;
|
|
}
|
|
|
|
}
|
|
|
|
|