function h = l2h(l)
% FUNCTION:    l2h    part of DPWT Toolbox
%
% SYNOPSIS:    H = l2h(L)
%
% DESCRIPTION: l2h creates the conjugate filter H from the original
%              filter L. H is such that L*H = 0 and H*H=1.
%
% EXAMPLE:     hL = daubcofs(2);
%              H = l2h(L),
%              L*H', H*H'
%              ans =
%                  3.3881e-21
%              ans =
%                  1.0000
%

% AUTHOR:      Neil Getz
% DATE:        3-30-94
%
%
h = l;	% For length.
MATSHIFT = 1;
Ntimes2 = length(l);
for k = 0:Ntimes2-1,
  h( MATSHIFT + k ) = (-1)^(MATSHIFT + k) * l(MATSHIFT + Ntimes2 - 1 - k);
end