DOCUMENTATION

SYNOPSIS

PERL PROGRAM NAME: iSelect_tr_Sumute_bottom.pm
AUTHOR: Juan Lorenzo
DATE: April 2 2009 V1.
Aug 9, 2011 V1.2
Sept. 2015, V 3
August 2016, V 3.1
June 12, 2017 V 3.1
adapted from iSelect_tr_Sumute_top3.pm
DESCRIPTION:
plot data to select bottom mute values

USE

NOTES

Examples

Instantiate

other packages
Create a new version of the package
Personalize to give it a new name if you wish
Use the following classes:

Establish

just the localally scoped variables

hash array

of important variables used within
this package

sub clear

to blank out hash array values

subroutine gather

sets gather number to consider

sub gather_header

define the message family to use

sub gather_type

define the message family to use

sub offset_type

define the message family to use

sub file_in

Required file name
on which to pick top mute values

sub freq

creates the bandpass frequencies to filter data before
conducting semblance analysis
e.g., "3,6,40,50"

sub min_amplitude

minumum amplitude to plot

sub max_amplitude

maximum amplitude to plot

sub number_of_tries

keep track of the number of attempts
at picking top mute

subroutine calcNdisplay

main processing flow
calculate mute and display results

GAIN

DATA

WINDOW DATA

by

Set

filtering parameters
use lib "./libAll";
use iTop_Mute_config qw( $href_sufilter);

DISPLAY

DATA

Set suxwigb

DEFINE FLOW(S)

in interactive mode:
first time you see the image, number_of_tries =0
second, third, etc. times number_of_tries >0
The pick file can be saved

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