DOCUMENTATION
SYNOPSIS
PERL PROGRAM NAME: iApply_bottom_mute
AUTHOR: Juan Lorenzo
DESCRIPTION:
Purpose: Linear Top Mute of Data
V3 Sept. 23, 2015: added oop functionality
1.0.4, Nov. 2022
=head2 USE
NOTES
1.0.4 now include suxwigb as well as suximage
Examples
inherit other packages
1. Instantiate classes
Create a new version of the package
Personalize to give it a new name if you wish
Use the following classes:
Import file-name and directory definitions
establish just the locally scoped variables
hash array of important variables used within
this package
Assume that the parameter file already exists
Assume that the name of this parameter file is:
$itemp_bot_mute_picks_sorted_par_.$iApply_bottom_mute->{_file_in}
subroutine clear
to blank out hash array values
subroutine gather_header
define the header for the xmute values
binheader type value helps define the xmute values
e.g. if gather_header = 'gather'
the the xmute values are 'offset'
subroutine offset_type
define the header for the xmute values
offset type value helps define the xmute values
e.g. if offset_type = 'gather'
the the xmute values are 'offset'
subroutine gather
sets gather number to consider
subroutine freq
creates the bandpass frequencies to filter data
e.g., "3,6,40,50"
subroutine file_in
Required file name
on which to apply top mute values
subroutine minumum amplitude to plot
subroutine maximum amplitude to plot
subroutine calcNdisplay
main processing flow
calculate mute and display results
Assume that the parameter file already exists
Assume that the name of this parameter file is:
$itemp_bot_mute_picks_sorted_par_.$iApply_bottom_mute->{_file_in}
MUTE DATA by
WINDOW DATA
set filtering parameters
GAIN DATA
DISPLAY DATA
DISPLAY DATA (SUXWIGB)
DEFINE FLOW(S)
RUN FLOW(S)
output copy of picked data points
only occurs after the number of tries
is updated
LOG FLOW(S)TO SCREEN AND FILE