DOCUMENTATION

SYNOPSIS

PROGRAM NAME:iSave_bottom_mute_picks.pm
AUTHOR:  Juan Lorenzo
DATE:    Nue 12 2017  
Version: 3.0 

DESCRIPTION: Originally to Save final Top Mute of Data

USE

Examples

SEISMIC UNIX NOTES

CHANGES and their DATES

V1 May 5 2009 
V2. change mute parameters to top mute parameters
Aug 12, 2011
V3.0 September 2015 :
         updated to oop
         introduced Tk widgets
         Made all event-driven
June 12 2017 adapted from iSave_top_mute_picks.pm

STEPS

use the local library of the user
bring is user variables from a local file
create instances of the needed subroutines

instantiate classes

declare variables types
establish just the locally scoped variables

create hash with important variables

Import directory definitions

subroutine clear

sets all variable strings to '' 

subroutine file_in

Required file name
on which to pick bottom mute values

subroutine gather

sets gather number to consider  

subroutine gather_type

sets gather_type number to consider  

subroutine gather_header

sets gather_header number to consider  

sub calc

rewrite sorted picks into a permanent file

append file name to an output list
ibottom_mute_file_list

DEFINE FLOW(S)

RUN FLOW(S)

LOG FLOW(S)TO SCREEN AND FILE

cpanm App::SeismicUnixGui

perl -MCPAN -e shell
install App::SeismicUnixGui