NAME

Mute - Mute a SEP77 dataset


SYNOPSIS

Mute par= < in.H > out.H


INPUT PARAMETERS

vmute - real

      1.45 ; outer mute velocity
tmute - real

      0.0  ; start time of (hyperbolic) outer mute
tramp - real

      0.25 ; linear mute time ramp in seconds.
Scale(t<Tmute)- real

      0. ; Scale(t>Tmute+tramp) = 1.
tpow - real

      0 ; gain trace data by  t**tpow
xpow - real

      0 ; scale offset (x) traces by (x/xmin)**xpow 
trcbal - integer

      0 ; no trace balancing
      1 ; trace balance by sum of absolute values
      2 ; trace balance by rms amplitude value 
      3 ; trace balance by trace energy (sum of squared values)
weight - real

      0 ; no weighting
      1 ; Jon's weight by 1/(t+xmax/vmute), 
      like dividing by the number of traces:
      radial weight by r / ( 1. + (r*r)**2 )
      r = r0 * x / (t * vmute)
      r0 = sqrt( sqrt( drop - 1. ) )
drop - real

       [10.] good till
tape - real

       0 ; no taper
       N ; linear taper on the last N traces at either  end of gather.
kill - integer[]

       list ; list of trace numbers to kill 
       (first trace no. is 1)
emute - real

       end of trace  ; start time for end of data mute
eramp - real

       0.25 ; ramp length at end of trace


DESCRIPTION

   Apply linear outer mute to gather + preprocess for velocity analysis


CATEGORY

seis/filter