bsegout - subroutine to write a seismic trace
call bsegout(iunit,icall,npts,traces,fsamin,outfil,jrec)
Basic Seismic
Utilities (BSU) subroutine which writes a seismic trace.
Fortran Version.
Arguments
iunit (int)
fortran unit number
icall (int)
=0 on first call, will open file, outfil
=1 on second and later calls,
assumes outfil already open
npts (int)
number of samples in a trace
traces (float)
name of array in which samples to be stored, dimension ndim.
fsamin (float)
sample interval in seconds
outfil (char)
name of output file to be written
jrec (int)
trace number to be written (direct access)
NOTE:
Trace header data are passed in a common block (see
bsegy.inc include file). Thus, header data do not appear in
the argument list.
outfil |
character variable which stores name of output file to be written. |
bsegin(3), chktrc(3), bmst(1), bsegy(5)
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]>