DOCUMENTATION

SYNOPSIS System_Variables::

 PERL PROGRAM NAME:iPicks2sort.pm
 AUTHOR: Juan Lorenzo
 DATE: June 14 2019

 DESCRIPTION: 

 Purpose: write data pairs to par format for input 
	into another progam 

USE

NOTES

Examples

SEISMIC UNIX NOTES

CHANGES and their DATES

STEPS

1. define the types of variables you are using these would be the values you enter into each of the Seismic Unix programs each of the Seismic Unix programs

2. build a list or hash with all the possible variable
   names you may use and you canSystem_Variables:: even change them
instantiate classes
declare variables types
establish just the locally scoped variables
create hash with important variables

Import file-name  and directory definitions

subroutine calc

main processing flow
sorts data 

establish pfile names

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

subroutine clear

sets all variable strings to '' 

subroutine file_in

Required file name
on which to pick x,t values

sub type

switches for old data of two different types

 for type: tx or taup