% Ãàóññîâñêèé ôèëüòð - ìîæíî ñãåíåðèðîâàòü ñ ïîìîùüþ
% W=gausswin(91,alpha); W=W/sum(W);
%   alpha = 2.86152327656746; - ïîäáîð ñ ïîìîùüþ fminsearch()

% 31.03.2012    - êîììåíòàðèé ïî âîçìîæíîñòè ðàñ÷åòà W
% 26.11.2012    - äîáàâëåí ðàñ÷åò äëÿ dt=2.5 cåê (W25, 37 òî÷åê)

% INTERMAGNET Gauss filter coefficients for 1-second data
W1=[0.00045933; 0.00054772; 0.00065055; 0.00076964; 0.00090693;
    0.00106449; 0.00124449; 0.00144918; 0.00168089; 0.00194194;
    0.00223468; 0.00256140; 0.00292430; 0.00332543; 0.00376666;
    0.00424959; 0.00477552; 0.00534535; 0.00595955; 0.00661811;
    0.00732042; 0.00806530; 0.00885090; 0.00967467; 0.01053338;
    0.01142303; 0.01233892; 0.01327563; 0.01422707; 0.01518651;
    0.01614667; 0.01709976; 0.01803763; 0.01895183; 0.01983377;
    0.02067480; 0.02146643; 0.02220039; 0.02286881; 0.02346437;
    0.02398040; 0.02441104; 0.02475132; 0.02499727; 0.02514602;
    0.02519580];
W1=[W1;flipud(W1(1:45))];

% INTERMAGNET Gauss filter coefficients for 5-second data
W5=[0.00229315; 0.00531440; 0.01115655; 0.02121585; 0.03654680;
    0.05702885; 0.08061140; 0.10321785; 0.11972085; 0.12578865];
W5=[W5;flipud(W5(1:9))];

% 15.06.2008, Õîìóòîâ Ñ.Þ.
% ïåðåíîðìèðîâêà, ò.ê. èçíà÷àëüíî ñóììà W1 è W5 íå ðàâíà 1 (2 è 5 åä. 10-ãî
% çíàêà)

W1=W1/sum(W1);
W5=W5/sum(W5);

% Ðàñ÷åò êîýô-òîâ äëÿ ñêâàæíîñòè 2.5 ñåê
% length(-45:2.5:45) = 37 - êîë-âî îòñ÷åòîâ ìåæäó -45 è +45 ñåê
alpha = 2.86152327656746;
W25=gausswin(37,alpha);W25=W25/sum(W25);
