DOCUMENTATION

SYNOPSIS

PROGRAM NAME: Sudipfilt.pl
Purpose: f-k spectral analysis 
AUTHOR:  Juan M. Lorenzo
DEPENDS: Seismic Unix modules from CSM 
DATE:    Feb 15 2008 V0.1
         V0.2 June 30 2016 make oop
DESCRIPTION:  based upon non-oop Xamine.pl  

USES

(for subroutines) 
    manage_files_by 

    (for variable definitions)
    SeismicUnix (Seismic Unix modules)

use App::SeismicUnixGui::misc::SeismicUnix qw($in $out $on $go $to $suffix_ascii $off $suffix_su) ;

USAGE

Sucat 

NEEDS

EXAMPLES

NOTES

We are using Moose 
moose already declares that you need debuggers turned on
so you don't need a line like the following:

use warnings;


 sample rate = 125 us
 d1 = sample rate in ms = .000125

Instantiate classes

Create a new version of the package
Personalize to give it a new name if you wish

Use classes:
flow
log
message
sufilter
sugain
sureduce
suspecfk
suxwigb
suximage
sudipfilt

notes

Get configuration information

TOP LEFT PLOT

includes sugain variables

Declare file names

sugain

Set gain variables for TOP LEFT PLOT

suinterp

Set interpolation to reduce aliasing

sufilter

Set frequency filter ing parameters

suwind

Set windowing parameters

Window

by time

Window

by field record 

f-k analysis

make non-dimensional 

TODO linear moveout

# LINEAR MOVEOUT @sureduce[1] = (" sureduce \\ rv=1.5 \\ ");

# LINEAR MOVEOUT @sureduce[2] = (" sureduce \\ rv=-1.5 \\ ");

Dip filter

set parameters 

Dip filter

set parameters 

DISPLAY DATA as wiggles

Set parameters
Top middle image

DISPLAY DATA as wiggles

Set parameters

DISPLAY DATA as IMAGE

Set parameters
Top left image

DISPLAY DATA as IMAGE

Set parameters
Top right image

DISPLAY DATA as IMAGE

Set parameters
Bottom left image

DISPLAY DATA as IMAGE

Set parameters
Bottom-right image

Standard:
1. DEFINE FLOW(S)

top left image
top middle plot
top right plot
bottom left image
bottom middle plot
bottom right image
output filtered data set
2. RUN FLOW(S)
3. LOG FLOW(S)TO SCREEN AND FILE