DOCUMENTATION

SYNOPSIS

PROGRAM NAME:iSave_top_mute_picks.pm
AUTHOR:  Juan Lorenzo
DATE:   September 2015  
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 top mute parameters to toptom mute parameters
Aug 12, 2011
V3.0 September 2015 :
         updated to oop
         introduced Tk widgets
         Made all event-driven

STEPS

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

needed packages

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 top 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
itop_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