THESE/codes/wave/allcode/FSfarras.m

   1 function [af, sf] = FSfarras
   2
   3 % Farras filters organized for the dual-tree
   4 % complex DWT.
   5 %
   6 % USAGE:
   7 %    [af, sf] = FSfarras
   8 % OUTPUT:
   9 %    af{i}, i = 1,2 - analysis filters for tree i
  10 %    sf{i}, i = 1,2 - synthesis filters for tree i
  11 % See farras, dualtree, dualfilt1.
  12 %
  13 % WAVELET SOFTWARE AT POLYTECHNIC UNIVERSITY, BROOKLYN, NY
  14 % http://taco.poly.edu/WaveletSoftware/
  15
  16 af{1} = [
  17                   0                  0
  18   -0.08838834764832  -0.01122679215254
  19    0.08838834764832   0.01122679215254
  20    0.69587998903400   0.08838834764832
  21    0.69587998903400   0.08838834764832
  22    0.08838834764832  -0.69587998903400
  23   -0.08838834764832   0.69587998903400
  24    0.01122679215254  -0.08838834764832
  25    0.01122679215254  -0.08838834764832
  26                   0                  0
  27  ];
  28
  29 sf{1} = af{1}(end:-1:1, :);
  30
  31 af{2} = [
  32    0.01122679215254                  0
  33    0.01122679215254                  0
  34   -0.08838834764832  -0.08838834764832
  35    0.08838834764832  -0.08838834764832
  36    0.69587998903400   0.69587998903400
  37    0.69587998903400  -0.69587998903400
  38    0.08838834764832   0.08838834764832
  39   -0.08838834764832   0.08838834764832
  40                   0   0.01122679215254
  41                   0  -0.01122679215254
  42 ];
  43
  44 sf{2} = af{2}(end:-1:1, :);