Wilson - Wilson's factorization for helix filters

Wilson < filt.H  niter=20 [n1= lag=] > minphase.H

Reads a helix autocorrelation (positive side of it). Outputs its minimum-phase factor.

from/to history	integer	n1	filter size
	integer array	lag	comma-separated list of filter lags
	real	a0 =1	zero-lag coefficient
from par	integer	niter =20	number of Newton's iterations
	integer	n1 (optional)	number of coefficients
	integer array	lag (optional)	comma-separated list of filter lags

Modules: wilson.lop , helix.r90 , compress.r90