next up previous print clean
Next: Miss - Missing data Up: SERGEY'S MAIN PROGRAM DOCS Previous: Make - generate simple

Minphase - create minimum-phase filters 

Minphase < filt.H niter=20 > minphase.H

Uses Wilson's factorization. The phase information is lost.

from history integer n1 number of filter coefficients
  integer array n2,n3,... number of filters
  integer array lag helix filter lags
from par integer niter =20 number of WIlson's iterations

Modules: wilson.r90 , autocorr.r90

next up previous print clean
Next: Miss - Missing data Up: SERGEY'S MAIN PROGRAM DOCS Previous: Make - generate simple
Stanford Exploration Project
4/27/2004