DOCUMENTATION $Time[$i] = $$ref_T[$i]; =head2 SYNOPSIS

PACKAGE NAME
iVrms2Vint.pm
Purpose: Convert Vrms to Vinterval  
Juan M. Lorenzo
April 7 2009 
Nov. 19 2013

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$Time[$i] = $$ref_T[$i]; 
   Seismic Unix programs

2. build a list or hash with all the possible variable
   names you may use and you can even change them

instantiate programs

set defaults

VELAN DATA 
m/s

subroutine clear

sets all variable strings to '' 

subroutine cdp

sets cdp number to consider  

variables of local scope

some SUB-STEPS in Vrms2Vint:

1. sort i/p 'ivpicks_old'.'_'.$sufile_in[1].$suffix[3]
         o/p ivpicks_old'.'_'.'sorted'.'_'.$sufile_in[1].$suffix[3]

2. convert rms to int 
         i/p 'ivpicks_old'.'_'.'sorted'
         o/p 'ivint_old'.'_'.$sufile_in[1].$suffix[3];

3. generate a data file for plotting
         o/p 'plot'.'_'.'ivint_old'.'_'.$sufile_in[1].$suffix[3];

SORT a TEXT FILE

RUN FLOW(S)

 Must run this flow BEFORE converting Vrms to Vint
TOD create an individual sort package

LOG FLOW(S)TO SCREEN AND FILE

TEXT to BINARY CONVERSION

read Vrms file
 i/p 
   'ivpicks_old'.'_'.'sorted'.'_'.$sufile_in[1].$suffix[3];

CONVERT VRMS to VINT FILE

CREATE PLOTTING VALUES

normally, first time i value is  >0

write Vint

file for plotting

XGRAPH FILE(s)

DEFINE FLOW(S)

RUN FLOW(S)

LOG FLOW(S)

TO SCREEN AND FILE

WRITE OUTPUT FILE

write Vint file 

subroutine file_in

Required file name
on which to perform velocity analyses 

subroutine first_velocity

subroutine number_of_velocities

subroutine tmax_s

subroutine velocity increment

cpanm App::SeismicUnixGui

perl -MCPAN -e shell
install App::SeismicUnixGui