R/V Melville Knudsen example
SIOSEIS script to do the Hilbert transform and analytic trace
followed by forming the intantaneous amplityde trace, bandpass
filter and plot.


sioseis << eof
procs diskin t2f f2t gains filter plot end
diskin
   allno no
    ipath melville-sample-1.sgy end
end
gains
   type 7 end  ! complex modulus
end
t2f
   end
end
f2t
   type analytic end
end
filter
   fno 1 lno 99999 pass 50 1000 ftype 0 end 
end
prout
   fno 1 lno 99999 ftr 1 ltr 99999 end
end
plot
    stime 6.980
   wiggle 0  ann gmtint anninc 1
   trpin 150 clip .005 def .002 tlines .002
   srpath sunfil
  nibs 2859  vscale 75.75758
   nsecs .04
   end
end
end
eof
xloadimage -r 90 sunfil &

Go to the list of seismic processes.      Go to SIOSEIS introduction.