In[]:=
WaveletFilterCoefficients[BiorthogonalSplineWavelet[2,2],"PrimalHighpass",WorkingPrecision->Infinity]
Out[]=
0,-,1,,2,-
1
4
1
2
1
4
In[]:=
WaveletFilterCoefficients[BiorthogonalSplineWavelet[2,2],"DualLowpass",WorkingPrecision->Infinity]
Out[]=
-1,,0,,1,
1
4
1
2
1
4