反褶积程序

各种反褶积的代码，主要是在地球物理行业的应用。

function [w_min] = kolmog（wtype_of_inputL）;  
%KOLMOG: Kolmogoroff spectral factorization.
%        Given a wavelet this function retrieves the minimum 
%        phase wavelet using Kolmogoroff factorization.
%        If the input is a trace the spectral factorization
%        is applied to the autocorrelation after smoothing.
%
%  [w_min] = kolmog（wtype_of_inputL）
%
%  IN   w:     a wavelet of arbitrary phase if
%              type_of_input = ‘w‘ 
%              or a seismic trace if 
%              type_of_input = ‘t‘
%       L:     lenght of wavelet if type_of_input=‘t‘
%
%  OUT  w_min: a min phase wavelet 
%
%  Reference: Claerbout 1976 Fundamentals of geophysical data processing 
%     
%  Example:
%
%    w = [1;2;-1;0;0;0;0]
%    wmin = kolmog（w‘w‘）;
%    subplot（221）; stem（

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件       2243  2008-05-27 06:51  decon\kolmog.m

     文件       2189  2008-06-02 11:56  decon\ls_inv_filter.m

     文件       1230  2008-05-27 06:52  decon\polar_plot.m

     文件       1957  2008-05-27 06:52  decon\predictive.m

     文件       2228  2009-02-23 13:24  decon\smooth_spectrum.m

     文件       2247  2008-05-27 06:53  decon\sparse_decon.m

     文件       2268  2008-05-31 04:18  decon\spiking.m

     文件        941  2008-05-27 06:53  decon\zeros_wav.m

     目录          0  2009-05-14 22:05  decon

----------- ---------  ---------- -----  ----

                15303                    9