THESE/codes/wave/allcode/unnormcoef.m

   1 function [W]= normcoef(W,L,nor)
   2
   3
   4 for scale = 1:L
   5     for part = 1:2
   6         for dir = 1:2
   7                 for dir1 = 1:3
   8                         W{scale}{part}{dir}{dir1} = W{scale}{part}{dir}{dir1}*nor{scale}{part}{dir}{dir1};
   9                 end
  10         end
  11     end
  12 end