boxit - subroutine to apply a box car filter to a seismic trace
call boxit(npts,x,y,z,iwide,isign,ntimes)
Basic Seismic
Utilities (BSU) applies box car filter to a seismic trace.
The filter can be be a simple smoother, or one of two
possible high-pass filter options are also available.
Fortran Version.
Arguments
npts (int)
Number of samples in a trace
x (float)
Input seismic trace (float array).
y (float)
Filtered output trace (float array).
z (float)
Scratch array.
iwide (int)
Width of box car in samples.
isign (int)
Switch to select smoother (low-pass) or high-pass filter.
-1=low-pass smoother (box car)
0=high-pass (1-sinc**ntimes)
+1=high-pass
(1-sinc)**ntimes
ntimes (int)
Number of times to iteratively apply the filter.
bwht(1)
No known bugs.
Copyright © 2024 by Paul Michaels
This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
P. Michaels, PE. <[email protected]>