NAME

cross_wilson - wilson factorization of cross-correlation


SYNOPSIS

call cross_factor( niter, s0, ss, a0, aa, b0, bb)


PARAMETERS

niter - integer
      maximum number of iteratons
s0 - real
      Initial zero lag coef. value
ss - type(filter)
      Input cross correlation
a0,b0 - real
      Zero lag coef
aa,bb - type(filter)
      Output minimum phase filters


DESCRIPTION

Factorize a cross correlation


SEE ALSO

the wilson manpage


LIBRARY

geef90