Return to SIOSEIS examples. Return to Eel River chirp example.
WITH DATUM CORRECTION sioseis << eof procs diskin wbt filter header mix shift gains plot end diskin set .1 .8 ! need for big datum shifts fno 86738 lno 89938 allno no ! fno 86738 lno 87938 allno no noinc 2 ipath yr1999day217-2244z.segy end end header r59 = r50 - r60 ! subtract the picked time from the theoretical end end mix type 4 hdr 59 weight 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 end end prout indices l3 l16 r50 r59 r60 fno 0 lno 99999 ftr 0 ltr 999 end end shift indices r59 end end filter ftype 0 pass 500 1000 dbdrop 48 end end wbt ! xstar put the water bottom time in buf(50) index 60 ! put this pick in real word 60 thres .2e-08 track .1 end end gains tgp .005 1 .03 4 .04 8 addwb yes end end plot stime .5 nibs 2859 vscale 20 nsecs .25 tlines .01 .05 .1 colors gray opath siofil.gray wiggle 0 anninc 1 ann gmtint trpin 300 def .004 end end end eof sio2sun siofil.gray sunfil xloadimage -r 90 sunfil &Go to the list of seismic processes. Go to SIOSEIS introduction.
Return to SIOSEIS examples. Return to Eel River chirp example.