DOCUMENTATION

SYNOPSIS

PERL PROGRAM NAME: iWrite_All_iva_out 
AUTHOR: Juan Lorenzo
DATE: April 9 2009 
        sept. 13 2013
        oct. 21 2013
        July 15 2015
Purpose: Write out best vpicked files from iWrite_All_iva_out 

DESCRIPTION: 
Version: 1.1
update to oop

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 can even change them

set defaults

VELAN DATA m/s

Import directory definitions

subroutine clear

sets all variable strings to '' 
declare local variables

subroutine cdp

sets cdp number to consider  
subroutine file_in
Required file name
on which to perform velocity analyses 
subroutine flows
 read in :   ivpicks_old from the PL directory
 write out: 'Final_ivpicks_iva' to the PL directory

           'ivpicks_old' is stored locally