Constant Velocity Stack scripts sioseis << eof procs diskin prout velan stack diskoa end diskin fno 312401 lno 312500 allno no set 3 6 ipath line29.cmps.segy end end prout fno 0 lno 999999 ftr 1 ltr 1 noinc 10 end end velan vels 1500 10 1600 nrp 100 type cvel stretc .6 end end diskoa opath cv.312401 end end end sioseis << eof procs diskin filter agc plot end diskin ipath cv.312401 end end filter ftype 0 pass 20 220 dbdrop 48 end end agc winlen .5 end end plot nibs 75 nsecs 3 vscale 5 ann fanno fanno 1500 ftag 1 taginc 100 anninc 10 fspace 100 spacei 100 def .04 clip .02 wiggle 0 srpath sunfil end end end eof suntops -w 8 -h 10.5 < sunfil > psfil lpr -Pxyz psfilReturn to EW0008 example. Go to SIOSEIS examples.
Go to the list of seismic processes. Go to SIOSEIS introduction.