Return to Edgetech example Return to SIOSEIS examples
SIOSEIS script used to pick the water bottom, mute to the water bottom, apply a gain, and generate and display a gray scale plot. sioseis << eof procs diskin header wbt tredit mute gains plot end diskin fno 253000 lno 255000 allno no ipath yr2001day203-1643z.filtered end end tredit ses -.011 -.001 addwb yes sel 0 .02 kill yes fac .5 end end header # force the rp number to be the shot number fno 0 lno 999999 l6 = l3 end end gains addwb yes tgp 0 .5 .15 .5 .4 8 .8 16 end end mute fno 1 lno 999999 ttp 1 -.002 addwb yes end end prout fno 0 lno 999999 ftr 0 ltr 999 end end wbt thres .11e-08 track .0025 end end plot scalar 2.0E+07 stime .24 nibs 200 vscale 75 nsecs .1 tlines .01 .05 .1 colors gray opath siofil wiggle 0 anninc 5 ann gmtint trpin 200 def .02 clip .03 end end end eof sio2sun siofil sunfil xloadimage -r 270 sunfil